Supportnet Computer
Planet of Tech

Supportnet / Forum / Tabellenkalkulation

Wie funktioniert ein Button in Microsoft Excel?





Frage

Ich kenn mich in Excel etwas aus. Jedoch habe ich keine Ahnung wie Makros funktionieren. Für meinen Chef soll ich ein Programm in Excel erstellen. Könnt ihr mir bitte helfen? Wie schaffe ich es, dass ein Button so funktioniert, dass er mich bei anklicken auf eine bestimmte Seite bringt ?(So wie ein Hyperlink). Wär super wenn ihr mir kleine Tipps geben könntet z.B auch über Visual Basic. mfg Benni921

Antwort 1 von M.O.

Hallo Benni,

wenn du einen Button aus der Steuerelement-Toolbox nimmst, öffnet sich mit einem Doppelklick auf den Button der VBA-Editor.
Das müsste dann so aussehen:

Private Sub CommandButton1_Click()

End Sub


Mit dem Befehl

Sheets("Tabelle2").Activate


wird auf das Blatt mit den Namen Tabelle2 gewechselt, sobald der Button gedrückt wird.
Insgesamt sieht dein Code dann so aus:

Private Sub CommandButton1_Click()
Sheets("Tabelle2").Activate
End Sub


Bevor du den Button benutzen kannst, musst du noch den Entwurfsmodus beenden (Symbol mit den blauen Dreieck).

Nutzt du eine Schaltfläche aus der Symbolleiste Formular, musst du dieser ein Makro zuweisen.
Drücke hierzu Alt + F11, füge in ein Modul den folgenden Code ein:

Sub Seite_wechseln()
Sheets("Tabelle2").Activate
End Sub


Eine Anleitung wie du einen Code in ein Modul einfügst findest du z.B. hier unter der Rubrik "Anleitungen".

Gruß

M.O.

Antwort 2 von benni921

Hallo M.O.

Dankeschön. Ich hab mich für den Button aus der Formular Symbolleiste entschieden. Dieser kann man anscheinend danach noch besser bearbeiten.

Aus einem früheren Projekt hab ich gesehen, dass man mit hilfe eines Buttons auch markierte Felder in Zellen z.B. auf einer anderen Seite einfügen kann. Kannst du mir da auch weiter helfen?

mfg Benni

Antwort 3 von M.O.

Hallo Benni,

folgender Code kopiert den Wert der Zelle B3 aus der Tabelle 1 in die Zelle A1 der Tabelle 2:


Sub kopieren()
Sheets("Tabelle2").Range("A1") = Sheets("Tabelle1").Range("B3")
End Sub


Ich hoffe das hilft dir weiter.

Gruß

M.O.

Antwort 4 von benni921

Das hilft mir weiter. Dankeschön.

mfg Benni

Ich möchte kostenlos eine Frage an die Mitglieder stellen:


Ähnliche Themen:


Suche in allen vorhandenen Beiträgen: