commandbutton

• commandbutton von Jule vom 07.10.2003 15:09:09
  • AW: commandbutton - von ChrisL am 07.10.2003 15:22:37
    • AW: commandbutton - von Jule am 07.10.2003 15:37:37
      • so gehts natürlich auch :-) - von ChrisL am 07.10.2003 15:43:00
  • AW: commandbutton - von mar.s am 07.10.2003 15:42:24
    • AW: commandbutton - von Jule am 07.10.2003 15:46:39

Betrifft: commandbutton
von: Jule
Geschrieben am: 07.10.2003 15:09:09

Hallloooo...

kann mir jemand helfen??

ich habe in einem Tabellenblatt in excel einen commandbutton und will per klick ins nächste tabellenblatt wechseln!

wie mach ich n das??

danke

Betrifft: AW: commandbutton
von: ChrisL
Geschrieben am: 07.10.2003 15:22:37

Hi Jule

Private Sub CommandButton1_Click()
If ActiveSheet.Index < Sheets.Count Then Sheets(ActiveSheet.Index + 1).Select
End Sub

Unterscheidet aber nicht zwischen Tabellenblättern und z.B. Diagrammblättern. Falls diese ausgeschlossen werden sollen, kannst du dich nochmals melden.

Gruss
Chris




Betrifft: AW: commandbutton
von: Jule
Geschrieben am: 07.10.2003 15:37:37

danke danke...

habs dann doch noch gefunden!

Worksheets("Tabellenblattname").Select

tschoe




Betrifft: so gehts natürlich auch :-)
von: ChrisL
Geschrieben am: 07.10.2003 15:43:00

Danke für die Rückmeldung
Chris




Betrifft: AW: commandbutton
von: mar.s
Geschrieben am: 07.10.2003 15:42:24

hi jule

probier's damit

Sub NächstesSheet()
For i = 1 To Sheets.Count
    If Sheets(i).Name = ActiveSheet.Name Then
        Sheets(i + 1).Activate
        Exit Sub
    End If
Next
End Sub

gruss Mar.S




Betrifft: AW: commandbutton
von: Jule
Geschrieben am: 07.10.2003 15:46:39

boah kraasss!

öhm...meine lösung scheint mir n bisschen einfacher....danke trotzdem Mar.S!

schön tach noch!

bai

Beiträge aus den Excel-Beispielen zum Thema " commandbutton"