title image


Smiley Re: VB: Makro soll sich selbst nach Ausführung löschen
vorausgesetzt, das Makro beginnt in der ersten Zeile:



Public Sub Makro_loeschen()

MsgBox "Hier stehen Deine Makrobefehle"

'Beginn der Zeilenlöschung

With Application.VBE.ActiveVBProject.VBComponents("modul1").CodeModule

.DeleteLines 1, 7 'Zeilenlöschung (ab Zeile1, Anzahl der Zeilen)

End With

End Sub

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: