VBA-Programmierung in Microsoft Excel

Tutorial: Excel-Beispiele

Aufhebung der Suchstringbegrenzung von 255 Zeichen

Gruppe

Allgemein

Bereich

Zeichenfolge

Thema

Aufhebung der Suchstringbegrenzung von 255 Zeichen

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.

Lösung

Den nachstehenden Code in ein Standardmodul eingeben, einer Schaltfläche zuweisen und starten.




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

    


Beiträge aus dem Excel-Forum zu den Themen Allgemein und Zeichenfolge