Herbers Excel-Forum - das Archiv

Fehler beim Button erstellen mit VBA

Bild

Betrifft: Fehler beim Button erstellen mit VBA
von: Susanne
Geschrieben am: 12.12.2003 11:49:22
Hallöchen,

habe folgendes Problem:
Ich will einen Button von dem einen Tabellenbaltt in ein anderes Tabellenblatt einfügen und das der Button seine Funktion bei behält. (Er ruft eine Funktion auf)
Da das mit dem Kopieren nicht so geklappt hat, wollte den Button auf dem einem Blatt löschen und auf dem anderen neu erstellen.
Den Code dazu hab ich von den Forumbeispielen. Aber leider funktioniert es nicht bei mir.
Es kommt immer die Fehlermeldung "Objekt erforderlich"

Bin für jede Hilfe dankbar!!

Grüße Susi

Code:



Sub Button_Erstellen()
Dim VBA_Button As Button
Dim VBA_Code As String
VBA_Code = "


Sub cmdNew_Click" & vbLf
VBA_Code = VBA_Code & "  Menue_Zeigen " & vbLf
VBA_Code = VBA_Code & "  ActiveSheet.Buttons(Application.Caller).Delete" & _
"(""basMain"").CodeModul" & vbLf
VBA_Code = VBA_Code & " End Sub

"

Set VBA_Button = Buttons.Add(100, 100, 70, 20) <<- Hier erscheint die Meldung
With VBA_Button
.Caption = "Finanzmenü"
.OnAction = "cmdNew_Click"
End With

With ThisWorkbook.VBProject.VBComponents("basMain").CodeModule
.AddFromString VBA_Code
End With

End Sub

Bild

Betrifft: AW: Fehler beim Button erstellen mit VBA
von: xXx
Geschrieben am: 12.12.2003 12:26:10
Hallo,
mit
set vba_button=activesheet.buttons.add
sollte es klappen.

Gruß aus'm Pott
Udo
http://www.excelerator.de

P.S. Das Forum lebt auch von den Rückmeldungen der Frager an die Antworter!
Bild

Betrifft: AW: Fehler beim Button erstellen mit VBA
von: Susanne
Geschrieben am: 12.12.2003 13:01:35
Also wenn ich diesen Befehl einsetze kommt "Argument nicht optional".
Liegt es vielleicht an der Variablendeklaration? Wenn ich nämlich "Dim VBA_Buttom As" eingebe kommen normalerweise immer meine Auswahlmöglichkeiten aber der Typ "Button" ist nicht dabei.

Grüße
Susanne
Bild

Betrifft: AW: Fehler beim Button erstellen mit VBA
von: xXx
Geschrieben am: 12.12.2003 13:04:30
Hallo,
entschuldigung, es muss natürlich noch deine Klammer dahinter (war ich zu faul)

Gruß aus'm Pott
Udo
http://www.excelerator.de

P.S. Das Forum lebt auch von den Rückmeldungen an die Antworter!
Bild

Betrifft: AW: Fehler beim Button erstellen mit VBA
von: Susanne
Geschrieben am: 12.12.2003 13:18:11
Es funktioniert! Danke!!

Aber ich glaub ich hab noch mehr fehler drin.
Bei der Programmzeile "With ThisWorkbook.VBProject.VBComponents("basMain").CodeModule"
kommt jetzt die Fehlermeldung "Der programmatische Zugriff auf das Visual Basic-Projekt ist nicht sicher"
Hilfe!

Grüße
Susanne
Bild
Excel-Beispiele zum Thema " Fehler beim Button erstellen mit VBA"
Fehlermeldung #NV ausblenden Fehlermeldung abfangen
Fehler in Workbook_Open-Prozedur abfangen Fehlermeldung #DIV/0! verhindern
Fehler entfernen Fehlermeldung abfangen und in sequentielle Datei schreiben
Fortlaufende Suche unter Vermeidung eines Laufzeitfehlers VBA-Fehlermeldungen auflisten
Alle Zellen mit der #BEZUG!-Fehlermeldung auswählen Zahlenstring mit Formel auslesen und Fehlermeldung verhindern