HERBERS Excel-Forum - das Archiv

Thema: Zelle A1 auswählen | Herbers Excel-Forum

Zelle A1 auswählen
uppe

Hallo Experten,
ich möchte in meiner Arbeitsmappe in jeder Tabelle die Zelle A1 auswählen.
Leider funktioniert
For i = 1 To Worksheets.Count
Worksheets(i).Range("A1").Activate
Next i
nicht.
Ich bekomme einen Laufzeitfehler beim Aktivieren.
Warum?
Danke und Gruß
Uppe

AW: Zelle A1 auswählen
Rudi

Hallo,
auf einem nicht aktiven Blatt kannst du nichts aktivieren.
For i = 1 To Worksheets.Count
With Worksheets(i)
.Activate
.Range("A1").Activate
End With
Next i
Gruß
Rudi
AW: Zelle A1 auswählen
Oberschlumpf

Hi Name?
...weil eine Zelle nur dann gewählt werden kann, wenn das zugehörige Tabellenblatt aktiv ist.
Schreib lieber ins Modul "DieseArbeitsmappe" diesen Code:
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
Range("A1").Select
End Sub
So wird - jedes mal - wenn irgdeine Tabelle angezeigt wird, automatisch die Zelle A1 ausgewählt.
Hilfts?
Ciao
Thorsten
Vielen Dank!! owT
uppe