encor une fois macro

[docmo]

bonjour:

le problem des formules c bon j'ai trouver la solution
mais pour les macro toujour pas
le problem est que : pour qui je fait le classeur me demande de cree un bouton pour envoyer le classeur par mail (methode senmail) ça pas de problem mais celui ki le reçoi ne veut pas recevoir de macro ; alors ma question est comment faire pour envoyer le classeur mais sans les boutons (sans les macro) .
merci d'avance pour vos reponces.
docmo.

 

[@Christophe@]

Bonjour Docmo

Ben très simple, moi je bosse comme cela

1. je Sauve mon fichier mes ne le ferme pas
2. je supprime les macro du fichier
3. je l'envoi par mail
4. je ferme sans sauvergardé

Voici une macro qui tu supprimera tous les macro de ton fichier:

Sub EffaceMacro ()
Dim VBC As Object

With ActiveWorkbook.VBProject
For Each VBC In .VBComponents
If VBC.Type = 100 Then
With VBC.CodeModule
.DeleteLines 1, .CountOfLines
.CodePane.Window.Close
End With
Else: .VBComponents.Remove VBC
End If
Next VBC
End With
End Sub

Bonne journée

@Christophe@

 

[docmo]

merci Christophe

 

[docmo]

excuse moi christophe mais ça ne marche pas

 

[@Christophe@]

Re

Sous qu'elle excel es tu, parce que chez moi cela fonctionne sans problème

@Christophe@