Moin zusammen,
ich fange grade erst an VBA zu lernen, insofern habe ich (wahrscheinlich) ein paar einfache Fragen. Ich habe aus einem Buch zwei Beispiele abgeschrieben, die bei mir beide nicht funktionieren und ich weiß nicht warum.
Der erste Code läuft ohne Fehlermeldung durch und sollte die Menüleiste in Excel verschwinden lassen (das passiert aber nicht):
Sub ArbeitsplatzmenüLeisteAusblenden()
Dim Leiste As CommandBar
Set Leiste = Application.CommandBars(1)
Leiste.Enabled = False
Set Leiste = Nothing
End Sub
Der zweite Code sollte den Excel Assistenten aufrufen:
Sub OfficeAssistentenAufrufen()
Dim OffAss As Balloon
Set OffAss = Assistant.NewBalloon
With OffAss
.Heading = "Office-Assistent"
.Icon = msoIconTip
.Mode = msoModeAutoDown
.BalloonType = msoBalloonTypeButtons
.Labels(1).Text = "bla"
.Labels(2).Text = "blu"
.Labels(3).Text = "blub"
.Animation = msoAnimationGreeting
.Button = msoButtonSetOK
.Show
End With
Set OffAss = Nothing
End Sub
Da bekomm ich aber eine Fehlermeldung in .Heading = "Office-Assistent": "Objektvariable oder With-Blockvariable nicht festgelegt", was für mich keinen Sinn macht, da OffAss direkt davor definiert wird.
|