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

Comment enregistrer sous en macro un fichier et supprimer les macros du nouveau fichier

2 réponses
Avatar
jexalo
Bonjour,
Voil=E0 la macro que j'utilise :
Private Sub Workbook_BeforeClose(Cancel As Boolean)
'
' save_bdc Macro
'
ActiveWorkbook.SaveAs Filename:=3D"\\CHEMIN" & "BC" & Range("G1") &
Range("K3") & ".xls"
End Sub

Que dois-je lui rajouter pour que le fichier enregistr=E9 =E0
l'emplacement pr=E9cis=E9 ne contienne pas ces macros (car cela me pose
probl=E8me lorsque je les ouvre) ?

Merci d'avance pour vos r=E9ponses.

J=E9r=F4me

2 réponses

Avatar
Philippe.R
Bonsoir Jérôme,
Regarde du côté de chez Frédéric :
http://frederic.sigonneau.free.fr/VBE.htm
et plus précisément
http://frederic.sigonneau.free.fr/code/VBE/SupprModulesCode.txt
il y a là largement de quoi résoudre ton problème
--
Avec plaisir
http://dj.joss.free.fr/trombine.htm
http://jacxl.free.fr/mpfe/trombino.html
Philippe.R
Pour se connecter au forum :
http://www.excelabo.net/mpfe/connexion.php
News://news.microsoft.com/microsoft.public.fr.excel
"jexalo" a écrit dans le message de
news:
Bonjour,
Voilà la macro que j'utilise :
Private Sub Workbook_BeforeClose(Cancel As Boolean)
'
' save_bdc Macro
'
ActiveWorkbook.SaveAs Filename:="CHEMIN" & "BC" & Range("G1") &
Range("K3") & ".xls"
End Sub

Que dois-je lui rajouter pour que le fichier enregistré à
l'emplacement précisé ne contienne pas ces macros (car cela me pose
problème lorsque je les ouvre) ?

Merci d'avance pour vos réponses.

Jérôme
Avatar
jexalo
Merci pour votre aide.
J'utilise la macro suivante :
Dim Chemin As String
Chemin = "c:" & "BC" & "_" & Range("G1") & "_" & Range("K3") &
".xls"
ThisWorkbook.Sheets.Copy
ActiveWorkbook.SaveAs Chemin
Cordialement.
Jérôme

Bonsoir J�r�me,
Regarde du c�t� de chez Fr�d�ric :
http://frederic.sigonneau.free.fr/VBE.htm
et plus pr�cis�ment
http://frederic.sigonneau.free.fr/code/VBE/SupprModulesCode.txt
il y a l� largement de quoi r�soudre ton probl�me
--
Avec plaisir
http://dj.joss.free.fr/trombine.htm
http://jacxl.free.fr/mpfe/trombino.html
Philippe.R
Pour se connecter au forum :
http://www.excelabo.net/mpfe/connexion.php
News://news.microsoft.com/microsoft.public.fr.excel
"jexalo" a �crit dans le message de
news:
Bonjour,
Voil� la macro que j'utilise :
Private Sub Workbook_BeforeClose(Cancel As Boolean)
'
' save_bdc Macro
'
ActiveWorkbook.SaveAs Filename:="CHEMIN" & "BC" & Range("G1") &
Range("K3") & ".xls"
End Sub

Que dois-je lui rajouter pour que le fichier enregistr� �
l'emplacement pr�cis� ne contienne pas ces macros (car cel a me pose
probl�me lorsque je les ouvre) ?

Merci d'avance pour vos r�ponses.

J�r�me