D
dj.run
Guest
Bonjour à toutes et à tous
ça fait longtemps que je suis pas venu vous voir ! les vacances obligent !!
Je recherche la possibilité grace à un code de pouvoir effacer le contenu de ThisWorkbook : Private Sub Workbook_Open()
j'avais pour effacer le contenu d'un module mais je n'arrive pas à le modifier pour ThisWorkbook :
With ActiveWorkbook.VBProject.VBComponents("sauvegarde").CodeModule
.DeleteLines 1, .CountOfLines
.CodePane.Window.Close
End With
merci à tous pour votre aide
dj.run
ça fait longtemps que je suis pas venu vous voir ! les vacances obligent !!
Je recherche la possibilité grace à un code de pouvoir effacer le contenu de ThisWorkbook : Private Sub Workbook_Open()
j'avais pour effacer le contenu d'un module mais je n'arrive pas à le modifier pour ThisWorkbook :
With ActiveWorkbook.VBProject.VBComponents("sauvegarde").CodeModule
.DeleteLines 1, .CountOfLines
.CodePane.Window.Close
End With
merci à tous pour votre aide
dj.run