11. oktober 2009 - 17:09Der er
5 kommentarer og 1 løsning
Søg efter tekst i område og returner rækkenummer
Hej
Jeg har brug for en funktion, der kan søge i et område af celler efter en given tekststreng og returnere rækkenummeret på den celle som tekststregnen findes i - er der en der kan hjælpe?
De fleste virksomheder har efterhånden bevist, at AI virker.
Pilotprojekter leverer resultater. Medarbejdere bruger generative AI-værktøjer. Nye use cases dukker op på tværs af organisationen.
Private Sub søg() Dim række As Long række = findRække(ThisWorkbook.Sheets(2), "A:A", "aaa")
If række > 0 Then MsgBox ("Fundet i række: " & CStr(række)) Else MsgBox ("Ej fundet") End If End Sub Private Function findRække(ark, område, tekst) With ark.Range(område) Set c = .Find(tekst, LookIn:=xlValues, LookAt:=xlWhole) If Not c Is Nothing Then findRække = c.Row Else findRække = 0 End If End With End Function
Du mener om funktionen kan indsætte rækkenr i VOPSLAG - måske, hvis VBA-funktionen returnerer i en celle, der refereres til via INDIREKTE...
Synes godt om
Ny brugerNybegynder
Din løsning...
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.