Message Box

Computer: Software & Programmierung Office Software
1

Hallo zusammen,

ich breche mir gerade wieder die Füße …
Helft mir doch mal bitte.

Eine Message box beim Öffnen der Datei bekomme ich mit

Option Explicit
Private Sub Workbook_Open()
MsgBox „xyz“
End Sub

in „dieser Arbeitsmappe“

Die Datei öffnet mit Tabelle 4 der Arbeitsmappe.
Die Message box soll nun erscheinen, wenn Tabelle 1
angewählt wird.

Ist bestimmt was Einfaches - oder?

Gruß und danke

Rolf

2

Hi Rolf,

Die Datei öffnet mit Tabelle 4 der Arbeitsmappe.
Die Message box soll nun erscheinen, wenn Tabelle 1
angewählt wird.
Ist bestimmt was Einfaches - oder?

Ja, *g
im Codeteil von Tabelle1

Private Sub Worksheet_Activate()
MsgBox „Huhu“
End Sub

Gruß
Reinhard

3

Eine Message box beim Öffnen der Datei bekomme ich mit

Option Explicit
Private Sub Workbook_Open()
MsgBox „xyz“
End Sub

in „dieser Arbeitsmappe“

Die Datei öffnet mit Tabelle 4 der Arbeitsmappe.
Die Message box soll nun erscheinen, wenn Tabelle 1
angewählt wird.

könntest du das evtl. mal etwas gedanklich ordnen, ich verstehe nicht genau was du machen willst.
prinzipiell sieht die msgbox so aus:

Dim Mldg, Stil, Titel
Mldg = „Hier steht dein Text“
Stil = vbokbutton 'Button Ok aktiv
Titel = „Fenstertitel“
Antwort = MsgBox(Mldg, Stil, Titel)

mfg sebastian

4

Hallo Sebastian,

da gibbet nix zu ordnen, so wie es da steht funktionierts,
nur halt in Tabelle 4. Aber jetzt habbichs.

Danke

Rolf

[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]

5

Hallo Reinhard,

jaja, ich sags ja… :wink:

Danke

Rolf

[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]