ich hab mal wieder ein kleines Problem. Ich will die Namen aller Arbeistblätter der Arbeitsmappe in einem weiteren Arbeitsblatt (Tabelle 7) untereinander auflisten. Das funktioniert vom Prinzip her auch, aber nur, wenn sich der Cursor auch in Tabelle 7 befindet. Wenn im Moment des Startens der Prozedur ein anderes Arbeitsblatt aktiviert ist, meldet Excel ab dem Schritt Worksheets("Tabelle7").Cells(1,1).Activate einen Fehler. Warum kann ich nicht aus einem Arbeitsblatt heraus (z.B. wenn ich unten angeführtes Makro dort auf einen Button lege) ein anderes Arbeitsblatt aktivieren? Das schnall ich nicht und bitte Euch um Hilfe.
Sub NameArbeitsblätter()
Dim wks As Worksheet
Worksheets("Tabelle7").Cells(1, 1).Activate
For Each wks In ActiveWorkbook
ActiveCell = wks.Name
ActiveCell.Offset(1, 0).Activate
Next wks
End Sub
Vielen Dank im Voraus
Johannes
P.S.: im Übrigen funktionierts auch nicht mit Sheets, statt Worksheets. Auch nicht mit Range statt Cells. Auch nicht, wenn ich zuerst das Arbeitsblatt (worksheets("Tabelle7").Activate) und dann die Zelle (activeworksheet.cells(1,1).activate) aktivieren will.