Excel, söka med VBA-kod, macro och Inputbox

[lany002]

Jag har en tabell med 2 kolumner. I kolumn A finns tal (Nr) i kolumn B finns text. Jag vill kunna köra ett makro där man söker ett ord i kolumn B, genom att skriva in sökordet i en Inputbox. Det ska vara samma funktion som  "Sök" via verktygsfältet, fast det ska vara ett makro inklusive Inputbox.

[Monshi]

Måste det gå via makro? Går utmärkt att lösa via formler.

 

1: Länka din inputbox till en cell, säg G1

2: Skriv in en lite avancerad version av PASSA, börja i cell H2. H1 ska vara tom

=PASSA("*"&$G$1&"*";FÖRSKJUTNING($B$1;H1;0;100;1);0)+H1

och dra ned så många rader som du tror du kan behöva träffar p.

3: Använd OMFEL(INDEX(B:B;H2);"")

för att hämta dina värden dit där du vill ha dem.

 

Ingen VBA-kod, bara onödigt komplext att gå via VBA.

[lany002]

Hej!

 

Tack för ett snabbt svar.

 

Jag var kanske lite otydlig i min fråga. Min tabell ser ut så här;

 

Kolumn A = Kontonr, Kolumn B = Kontonamn

 

Tabellen täcker cellerna A6;B515, på Rad 6 finns tabellrubriker.

 

Jag vill kunna söka på ord eller del av ord och få förslag på kontonr från kolumn A och kontonamn från kolumn B¨.

 

Jag vill få förslag på kontonr i cell E7 och kontonamnet i cell G7.

 

Jag vill kunna söka på del av ord eller mening.

 

Jag vill skriva in min sökning av ord eller del av ord i cell D4.

 

Hur länkar jag en Inputbox till en speciell cell?

 

Jag bifogar filen med tabellen.

konto_tabell.xlsx

[Monshi]

Se bifogad fil

 

Frågor på den lösning?

 

Inputboxen länkad till K1, i L6 står radnumret för rubrikraden, under denna börjar sökningen.

Sedan används PASSA för att söka efter det del-ord som står i K1.

Som sista steget använd INDEX för att hämta värden på den rad som PASSA ger som svar.

OMFEL kapslar in så vi undviker felvärden.

 

Kopia av konto_tabell.xlsx

[lany002]

Kanonbra........

 

Tack för hjälpen........