Gruppe
Allgemein
Problem
Excel findet über das Suchen-Feature keine Texte, die länger als 255 Zeichen sind. Gesucht wird eine VBA-Lösung als Behebung des Problems.
StandardModule: Modul1
Sub SuchenFinden()
Dim sTxt As String
Dim iRow As Integer
sTxt = Worksheets("Tabelle2").Range("A1").Value
For iRow = 1 To WorksheetFunction.CountA(Columns(1))
If Cells(iRow, 1).Value = sTxt Then
MsgBox Cells(iRow, 1).Address
End If
Next iRow
End Sub