éliminer les macros dans un fichier

[totty]

Bonjour,

J'ai une macro qui permet de faire une copie en lecture seule du classeur actif . Je voudrais que la copie ne prenne en compte que les feuilles du classeur et pas les macros du classeur. Est ce possible avec VBA?

Merci d'avance

 

[@Christophe@]

Bonjour,

Je ne crois pas que ce soit possible:

Deux solutions alternative:

1. copier / coller de la feuille entière dans un nouveau classeur

2. Ajouter un code qui supprime les macros: <http://www.excel-downloads.com/html/French/forum/read.php?f=1&i=17616&t=17440>

Bonne journée

@Christophe@

 

[@+Thierry]

Bonjour Totty

Comment se porte la bourse aujourd'hui ?

Voici un extrait d'un long fil sur ce sujet :

DESTRUCTION (plus aucun module ne pusse après cà !!!!)
Sub EffaceMacro ()
Dim VBC As Object

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

Signé Atila@Christophe@ !!!

Sinon le fil complet où je m'étais efforcé de regrouper toutes sortes de codes pour effacer les codes...

=> Lien supprimé

Bon Aprèm
@+Thierry

 

[@+Thierry]

Ah et bien tiens quand on parle du loup ...

Bien à Toi cher ami et compatriote @Xtof@
@+Thierry

 

[totty]

merci et encore merci, je vais voir ce que ça donne mais a priori ça devrait passer

 

[@Christophe@]

Bonjour mon ami professeur @Thierry

Je vois que tu as trouvé le fil que je cherchais à l'origine! Tu es quand même un as, lol

Pour le reste sur bxl le bourse va bien, par contre le boulot, la c'est le bordel, lol

J'ai vu ta réponse dans l'autre fil sur les menu dans un userform, je m'étais plongé decu. Je savais pas que c'était si difficile de mettre un menu dans un userform en vba.
Dire que en VB c'est si simple.

Voila les nouvelles, content de te croiser sur xls @Thierry. J'ai une petite question sur laquelle tu peux peut être me conseiller, je peux te l'envoyer par mail?

Merci

@Bientot

@Christophe@

 

[@+Thierry]

Re @Xtof@

Pour l'instant, je n'ai pas accès aux mails de LaPoste.net, je te contacterai dans la soirée.

@+Thierry

 

[@Christophe@]

Thierry,

Un grand merci, j'attends de tes nouvelles.

Bonne journée

@Christophe@