Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

Suppression de macro automatique (pour mac) ?

1 réponse
Avatar
Pierre
Bjr,

Existe-t-il des logiciel gratuits (sur Mac) capables de supprimer toutes
les macros situées (invisibles ou pas) dans une feuille de calcul ?

Merci

1 réponse

Avatar
michdenis
Bonsoir Pierre,

ceci efface tout le code, module et formulaire du classeur actif.


'-----------------------
Sub SupprimeToutCodeEtFormulaire()

Dim VBComp As Object
Dim VBComps As Object

Set VBComps = ActiveWorkbook.VBProject.VBComponents

For Each VBComp In VBComps
Select Case VBComp.Type
Case 100
With VBComp.CodeModule
.DeleteLines 1, .CountOfLines
End With
Case Else
VBComps.Remove VBComp
End Select
Next VBComp

End Sub
'-----------------------


Salutations!




"Pierre" a écrit dans le message de news:
Bjr,

Existe-t-il des logiciel gratuits (sur Mac) capables de supprimer toutes
les macros situées (invisibles ou pas) dans une feuille de calcul ?

Merci