title image


Smiley Re: tabellenblatt mit vba-code per vba erstellen
Hallo,

das geht so:



Sub NeuesBlattMitCode()

Dim strTxt As String, wksNeu As Worksheet

strTxt = "Private Sub Worksheet_SelectionChange(ByVal Target As Range)" & vbLf

strTxt = strTxt & "Msgbox ""Hallo""" & vbLf

strTxt = strTxt & "End Sub"

Set wksNeu = Sheets.Add

With ThisWorkbook.VBProject.VBComponents(wksNeu.CodeName).CodeModule

.AddFromString strTxt

End With

End Sub


Gruß aus'm Pott
Udo

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: