Clever-Excel-Forum

Normale Version: VBA code für neues Blatt erstellen
Du siehst gerade eine vereinfachte Darstellung unserer Inhalte. Normale Ansicht mit richtiger Formatierung.
Hallo Clever Excel Forum, 

Ich versuche im Moment per Knopfdruck eine Vorlage zu erstellen, was soweit auch gut klappt. Jetzt muss diese Vorlage aber einen Code besitzen, das versuche Ich mittels der .AddFromString Methode, allerdings ist mein Syntax anscheinend falsch.

So stelle ich mir das ganze vor:
Code:
Public sub NewCode() 
Dim sCode as String 
sCode = "'Code der eingefügt werden soll"

Activeworkbook.VBProject.VbComponents.Item("Blatt-Codename").CodeModule.AddFromString (sCode) 
End sub 
Kann mir jemand weiterhelfen?

Fehler gefunden:
Makrosicherheit -> Zugriff auf das VBA-Projektobjektmodell
Aktiv setzen, Code hat gestimmt