Microsoft Excel

Herbers Excel/VBA-Archiv

Informationen und Beispiele zum Thema TextBox
BildScreenshot zu TextBox TextBox-Seite mit Beispielarbeitsmappe aufrufen

Hyperlink als Button

Betrifft: Hyperlink als Button von: Gerd
Geschrieben am: 14.07.2008 17:40:32

Hallo,

ich habe folgendes Problem: Ich habe einen Fragebogen erstellt, der sich über mehrere Tabellenblätter erstreckt. Nun möchte ich am Ende jeden Tabellenblatts einen Button derart anfügen, dass man durch Anklicken des Buttons auf das nächste Tabellenbltt gelangt.

Ich habe das zwar schon mit einem Hyperlink hinbekommen, das sieht aber noch nicht optimal aus (kein 3D-Effekt). Ich würde es gerne mit dem Steuerelement Befehlsschaltfläche realisieren, habe aber keine Ahnung, wie man das macht (da ich noch nie etwas mit VBA gemacht habe).

Kann mir jemand helfen?

Gerd

  

Betrifft: AW: Hyperlink als Button von: mumpel
Geschrieben am: 14.07.2008 17:44:11

Hallo!

Mit dem folgenden Code gelangst Du zum nächsten Blatt.

Private Sub commandbutton1_click()
ActiveSheet.Next.Activate
End Sub

Code eingefügt mit VBA in HTML 1.2 ( Hilfe zum Programm)

Gruß, René


  

Betrifft: Nachtrag: von: mumpel
Geschrieben am: 14.07.2008 17:47:31

Schaltfläche Zeichnen, doppelt anklicken und das Grundgerüst durch zuvor genanntes Makro ersetzen. Zum Schluß den bearbeitungsmodus beenden.


  

Betrifft: AW: Nachtrag: von: Gerd
Geschrieben am: 14.07.2008 17:57:45

Vielen Dank René!

Es hat geklappt mit dem Code. Eine Frage habe ich noch: Was muss ich anstelle von "next" eingeben, wenn ich auf die vorhergehende Tabelle gelangen will.

Gruß, Gerhard


  

Betrifft: AW: Nachtrag: von: mumpel
Geschrieben am: 14.07.2008 17:59:06

ActiveSheet.Previous.Activate


  

Betrifft: AW: Hyperlink als Button von: Klaus M.vdT.
Geschrieben am: 14.07.2008 17:53:15

Hallo Gerd,

rechtsclick in die Tool-Leiste, "Visual Basic" aktivieren.

Auf "Steuerelement-Toolbox" clicken (gekreutzter Hammer+Schraubendreher)

Den Button oder genauer die Befehlsschaltflache anwählen, Cursor wird ein kreuz

Den Button mit dem Kreuz per ziehen in der Größe an dem Ort erzeugen wo du ihn haben willst.

Der "Entwurfsmodus" sollte sich von selbst aktiviert haben. Das ist das Geodreieck-Lineal-Stift Icon. Das ist gut, im Entwurfsmodus bleiben.

Rechtsclick auf den Button und "Eigenschaften". Unter Caption schreibst du "nächste Seite" oder sowas.
Gewöhn dir gleich sorgfältige Namensgebung an und bennenne den Button im Feld (Name) zB mit "CmB_SeiteWeiter". Sonst verlierst du später den überblick.

Immer noch in den Buttoneigenschaften stellst du "TakeFocusOnClick" auf "False".

Nun click in der VBA-Toolleiste auf "Aufzeichnen" (der rote Punkt), benenne das Makro zB. mit "MakroNextTabelle" und mache genau das was der Button machen soll manuell (also Tabelle 2 anwählen) und drücke "Aufzeichnung beenden" (das Viereck, wie beim Kasettenrekorder).

Stelle den Entwurfsmodus wieder an (s.o.).

Doppelclick links auf den Button.

schreibe zwischen Private Sub CmB_SeiteWeiter_Click() und End Sub den Namen deines Makros, also "MakroNextTabelle". Das ganze sollte so aussehen:

Private Sub CmB_SeiteWeiter_Click()
MakroSeiteWeiter
End Sub



Beende die VBA-Ebene, beende den Entwurfsmodus und probier aus, ob dein Button funktioniert!

Grüße,
Klaus M.vdT.


  

Betrifft: AW: Hyperlink als Button von: mumpel
Geschrieben am: 14.07.2008 17:57:56

@ Klaus.

Und was soll dieser umständliche Unsinn? gefällt Dir mein Code nicht?


  

Betrifft: AW: Hyperlink als Button von: Klaus M.vdT.
Geschrieben am: 14.07.2008 19:05:41

Hallo Rene,

kein Angriff, ich habe das getippt bevor ich deine und Gerds antworten gesehen habe. Ich dachte mir blos ich geh mal auf das (da ich noch nie etwas mit VBA gemacht habe) von Gerd ein und mach eine Schritt-für-Schritt Anleitung ...
als ich an den Anfängen von VBA stand, hätte ich mit einer dahingeworfenen Codezeile nichts anfangen können. Aber Gerd wurde geholfen, er hat dein Vorschlag verstanden und sich bedankt, also ist doch alles gut.

Grüße,
Klaus M.vdT.


  

Betrifft: AW: Hyperlink als Button von: mumpel
Geschrieben am: 15.07.2008 04:20:28

Aber doch bitte nicht den Makrorecorder empfehlen. Der "Select" und "Activate" zu viel, was unsinnig ist. Das sollte man eine Anfänger von Anfang an beibringen. Lieber die Codezeile schreiben und eine Erklärung dazu.


 

Beiträge aus den Excel-Beispielen zum Thema "Hyperlink als Button"