ich würde gerne per Makro in einer Zeile nach einem bestimmten Zellinhalt suchen, die entsprechende Spalte und eine bestimmte Anzahl Spalten rechts davon markieren.
Wie stelle ich das am besten an?
Vielen Dank,
STEFAN
Sub test()
Dim suchbegriff As String, zelle
Dim z As Long
suchbegriff = "test"
' Unter Range den Suchbereich eingeben (hier "A1:J65536").
Set zelle = Range(Cells(1, 1), Cells(65536, 10)).Cells.Find(suchbegriff)
If Not zelle Is Nothing Then
z = zelle.Column
Range(Columns(z), Columns(z + 2)).Select
End If
End Sub
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen