Springen zw Tabellenblättern mit CommandButton

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
Bild

Betrifft: Springen zw Tabellenblättern mit CommandButton
von: Matthias
Geschrieben am: 19.04.2005 15:25:44
Hallo!
Ich will via eines Command Buttons von einem Tabellenblatt in eine Range eines anderen Tabellenblattes springen. Der Makro an sich funktioniert. Mit dem Command Button geht es allerdings nicht? (
hier mal der Sub:


Private Sub CommandButton2_Click() 
Sheets("NameTabelle").Select 
Range("Name_Range").Select 
End Sub

Wie gesagt, merkwürdig ist, dass wenn ich den Sub als Makro aufzeichne, funktioniert es; nur nicht mit einem CommandButton.
Vielleicht kennt jemand eine Antwort auf mein kleines Problem:-)
Grüße
Matthias
Bild

Betrifft: AW: Springen zw Tabellenblättern mit CommandButton
von: Hans-Georg
Geschrieben am: 19.04.2005 15:39:15
Hallo,
wenn du ein Makro aufzeichnest siehet das etwa so aus :
Sub Makro1()
'
' Makro1 Makro
' Makro am 19.04.2005 von Hans - Georg
'
'
Sheets("Tabelle2").Select
End Sub
Kopiere den Inhalt zwischen Sub Makro1 ()
und
End Sub
und füge es bei deinem Schaltbutton ein. Sieht dann etwa so aus :


Private Sub CommandButton1_Click()
'
' Makro1 Makro
' Makro am 19.04.2005 von Hans - Georg
'
'
    Sheets("Tabelle2").Select
End Sub


MfG
Hans-Georg
Bild

Betrifft: AW: Springen zw Tabellenblättern mit CommandButton
von: Matthias
Geschrieben am: 19.04.2005 16:08:49
Danke!
ich konnte es das Problem mit folgender Syntax lösen.

Private Sub CommandButton1_Click()
Worksheets("Name").Activate
ActiveSheet.range("Name").Select
End Sub

Ich musste mich genau auf das aktive Sheet beziehen, dann ging´s.
Gruß
Matthias
 Bild

Beiträge aus den Excel-Beispielen zum Thema "Springen zw Tabellenblättern mit CommandButton"