You are currently viewing Erste Gehversuche: Hallo Welt! – Da bin ich!

Erste Gehversuche: Hallo Welt! – Da bin ich!

Sub Hallo()
    MsgBox "Hallo Welt! Da bin ich!", vbInformation, "Super - mein erstes Programm"
End Sub

So oder ähnlich beginnen die meisten Programmiereinsteiger ihre ersten Erfahrungen zu sammeln. Hinweisboxen, die, wenn irgendwas passiert, einen Text ausgeben wie bspw. „Hallo Welt“.

Um diese kurze, einfache Prozedur zu schreiben und zu testen müssen Sie kein großer Programmierer oder Excel-Freak sein 😉 Öffnen Sie bspw. Microsoft Excel, erstellen Sie eine neue leere Datei im „Makro-Format“, also mit der Dateiendung „.xlsm“ und speichern Sie diese zum Beispiel auf Ihrem Desktop: „Mein erstes Programm.xlsm“.

Drücken Sie anschließend die Tasten Alt+F11 auf Ihrer Tatstaur um den VBA-Editor aufzurufen (alternativ klicken Sie mit der rechten Maustaste auf den unteren Tab der Tabelle1 » Code anzeigen):

Wählen Sie im rechten Fenster des Editors, in der linken oberen Dropbox (Allgemein) den Eintrag „Worksheet“ aus. Der Editor erstellt darauf hin selbständig eine erste Standard-Prozedur: „SelectionChange“ in der rechten Dropbox (Deklarationen). Diese Prozedur wird immer dann ausgeführt, wenn Sie in Tabelle1 dieser Arbeitsmappe eine Zelle auswählen (selektieren). Das Ereignis, dass bei jeder Änderung der Auswahl – einer anderen Zelle – auftritt heisst also „SelectionChange“, welches die Prozedur „Worksheet_SelectionChange“ auslöst.

VBA2

Geben Sie nun im Editor-Textbereich (im Bild rechts im Fenster), innerhalb der automatisch erstellten Prozedur „SelectionChange“, zwischen den Zeilen „Private Sub…“ und „End Sub“, folgenden Code, vollständig und inklusive Anführungszeichen ein (wenn Sie den Code selbst eintippen und nicht einfach nur kopieren/einfügen, werden Sie merken, dass der Editor Ihnen bei der Eingabe behilflich ist und beim Schreiben von Code bereits passende Auswahlmöglichkeiten zur Verfügung stellt):

MsgBox "Hallo Welt! Da bin ich!" & vbCrLf & "Und das ging so fix!", vbInformation, "Super - mein erstes Programm!"

Die gesamte Prozedur sollte dann inhaltlich bei Ihnen so aussehen:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    MsgBox "Hallo Welt! Da bin ich!" & vbCrLf & "Und das ging so fix!", vbInformation, "Super - mein erstes Programm!"
End Sub

Wechseln Sie nun vom VBA-Editor zu Microsoft Excel in die Tabelle1 und wählen (selektieren) Sie beliebige Zellen aus:

VBA2

Ihr erstes kleines Programm… herzlichen Glückwunsch!
Ich freue mich über Meinungen, Ideen oder Kritik… schreiben Sie mir eine E-Mail »