existe-il un moyen de n'enregistrer que les feuilles du=20
classeur sans =E0 chaque fois enregistrer toutes les macros=20
qui sont rattach=E9es au classeur. Une fois cr=E9e, elles ne=20
seront plus modifi=E9es.
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
michdenis
Bonsoir Cad,
Je n'ai pas trop compris le sens de ta question.. mais un classeur ne peut pas s'enregistrer autrement que "globalement" dans tout son intégralité.
Salutations!
"Cad" a écrit dans le message de news:64d201c3e67f$e54d2860$ existe-il un moyen de n'enregistrer que les feuilles du classeur sans à chaque fois enregistrer toutes les macros qui sont rattachées au classeur. Une fois crée, elles ne seront plus modifiées.
merci
Bonsoir Cad,
Je n'ai pas trop compris le sens de ta question.. mais un classeur ne peut pas s'enregistrer autrement que "globalement" dans
tout son intégralité.
Salutations!
"Cad" <anonymous@discussions.microsoft.com> a écrit dans le message de news:64d201c3e67f$e54d2860$a101280a@phx.gbl...
existe-il un moyen de n'enregistrer que les feuilles du
classeur sans à chaque fois enregistrer toutes les macros
qui sont rattachées au classeur. Une fois crée, elles ne
seront plus modifiées.
Je n'ai pas trop compris le sens de ta question.. mais un classeur ne peut pas s'enregistrer autrement que "globalement" dans tout son intégralité.
Salutations!
"Cad" a écrit dans le message de news:64d201c3e67f$e54d2860$ existe-il un moyen de n'enregistrer que les feuilles du classeur sans à chaque fois enregistrer toutes les macros qui sont rattachées au classeur. Une fois crée, elles ne seront plus modifiées.
merci
Frédéric Sigonneau
Bonjour,
Cette macro (à copier, par exemple, dans un module standard de ton perso.xls) devrait te dépanner :
Sub CopieSansMacros() Dim LeClasseur Dim NomEtChemin$, sht As Worksheet
NomEtChemin = Application.GetSaveAsFilename If NomEtChemin = "" Then Exit Sub Set LeClasseur = ActiveWorkbook LeClasseur.Sheets.Copy With ActiveWorkbook .SaveAs NomEtChemin For Each sht In .Worksheets With .VBProject.VBComponents(sht.CodeName).CodeModule .DeleteLines 1, .CountOfLines End With Next .Save End With LeClasseur.Close False
End Sub
FS -- Frédéric Sigonneau [MVP Excel - né un sans-culottide] Gestions de temps, VBA pour Excel : http://perso.wanadoo.fr/frederic.sigonneau Si votre question sur Excel est urgente, évitez ma bal !
existe-il un moyen de n'enregistrer que les feuilles du classeur sans à chaque fois enregistrer toutes les macros qui sont rattachées au classeur. Une fois crée, elles ne seront plus modifiées.
merci
Bonjour,
Cette macro (à copier, par exemple, dans un module standard de ton perso.xls)
devrait te dépanner :
Sub CopieSansMacros()
Dim LeClasseur
Dim NomEtChemin$, sht As Worksheet
NomEtChemin = Application.GetSaveAsFilename
If NomEtChemin = "" Then Exit Sub
Set LeClasseur = ActiveWorkbook
LeClasseur.Sheets.Copy
With ActiveWorkbook
.SaveAs NomEtChemin
For Each sht In .Worksheets
With .VBProject.VBComponents(sht.CodeName).CodeModule
.DeleteLines 1, .CountOfLines
End With
Next
.Save
End With
LeClasseur.Close False
End Sub
FS
--
Frédéric Sigonneau [MVP Excel - né un sans-culottide]
Gestions de temps, VBA pour Excel :
http://perso.wanadoo.fr/frederic.sigonneau
Si votre question sur Excel est urgente, évitez ma bal !
existe-il un moyen de n'enregistrer que les feuilles du
classeur sans à chaque fois enregistrer toutes les macros
qui sont rattachées au classeur. Une fois crée, elles ne
seront plus modifiées.
Cette macro (à copier, par exemple, dans un module standard de ton perso.xls) devrait te dépanner :
Sub CopieSansMacros() Dim LeClasseur Dim NomEtChemin$, sht As Worksheet
NomEtChemin = Application.GetSaveAsFilename If NomEtChemin = "" Then Exit Sub Set LeClasseur = ActiveWorkbook LeClasseur.Sheets.Copy With ActiveWorkbook .SaveAs NomEtChemin For Each sht In .Worksheets With .VBProject.VBComponents(sht.CodeName).CodeModule .DeleteLines 1, .CountOfLines End With Next .Save End With LeClasseur.Close False
End Sub
FS -- Frédéric Sigonneau [MVP Excel - né un sans-culottide] Gestions de temps, VBA pour Excel : http://perso.wanadoo.fr/frederic.sigonneau Si votre question sur Excel est urgente, évitez ma bal !
existe-il un moyen de n'enregistrer que les feuilles du classeur sans à chaque fois enregistrer toutes les macros qui sont rattachées au classeur. Une fois crée, elles ne seront plus modifiées.
