19. marts 2011 - 08:31Der er
5 kommentarer og 1 løsning
Søgepromt frem med en macro
Hej Eksperter
Jeg forsøger at bringe søgepromten frem med en macro. Ideen er at man med macroen skal have den tomme søgeromt frem så man blot skriver sit søgeord klikker "find", hvorefter der søger i en specifik kolonne.
Jeg sætter en macro over, markerer hele kolonne A, taster Ctrl+f og afslutter macroen. Men det eneste der bliver optaget er markeringen af kolonne A. Ctrl+f funktionen bliver ikke optaget.
Kan man skrive sig ud af det i VBA koden, så man får markeret kolonne A og smidt den tomme søgepromt i hovedet?
Sub Find() Dim C As Range, Svar As String Svar = InputBox("Hvad skal der søges efter", "Søg") If Svar = "" Then Exit Sub With Worksheets(1).Columns("A:A") Set C = .Find(Svar, LookIn:=xlValues) C.Activate End With End Sub
Jeg har prøvet begge og den løsning jeg søgte er bak's. Jeg har dog en lille ting mere. Hvordan vil koden se ud hvis jeg ønsker kun at markere række 9 til 50 i kolonne A, istedet for hele kolonnen?
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.
