ich möchte in meiner aktiven Arbeitsmappe nach dem Arbeitsblatt suchen, welches mit xyz beginnt und mich in dieses Arbeitsblatt dann in Zelle A1 stellen.
Wie bekommt man das denn hin?
Gruß
Sabine
Option Explicit
Sub MeineTabelle()
Dim x As Long
Application.ScreenUpdating = False
For x = 1 To Worksheets.Count
If Left(Worksheets(x).Name, 3) = "xyz" Then
Worksheets(x).Activate
Cells(1, 1).Select
Exit For
End If
Next
End Sub
Gruß Matthias