Code vba dans Excel
Résolu
Fernand
-
Fernand -
Fernand -
Bonjour,
Bonjour à vous tous,
J'ai fait beaucoup de recherche mais rien de concluent sur une macro que je veux faire.
Je cherche à copier avec savecopyas une nouvelle copie mais en cachant 2 onglet avant de le sauvegarder.
Voici le code, si quelqu'un peux m'aider svp.
Sub Archiver()
Dim chemin As String, nomfichier As String
Application.ScreenUpdating = False
extension = ".xls"
chemin = "H:\Tempo\Horaire de travail\ "
Worksheets(12).Visible = False
Worksheets(13).Visible = False
ActiveWorkbook.SaveCopyAs chemin & Range("C1") & " " & Range("d1") & extension
End Sub
Mais malheureusement ca ne fonctionne pas le fichier s'enregistre correctement mais les 2 onglets reste visible.
Merci pour votre aide ou suggestions
Bonjour à vous tous,
J'ai fait beaucoup de recherche mais rien de concluent sur une macro que je veux faire.
Je cherche à copier avec savecopyas une nouvelle copie mais en cachant 2 onglet avant de le sauvegarder.
Voici le code, si quelqu'un peux m'aider svp.
Sub Archiver()
Dim chemin As String, nomfichier As String
Application.ScreenUpdating = False
extension = ".xls"
chemin = "H:\Tempo\Horaire de travail\ "
Worksheets(12).Visible = False
Worksheets(13).Visible = False
ActiveWorkbook.SaveCopyAs chemin & Range("C1") & " " & Range("d1") & extension
End Sub
Mais malheureusement ca ne fonctionne pas le fichier s'enregistre correctement mais les 2 onglets reste visible.
Merci pour votre aide ou suggestions
A voir également:
- Code vba dans Excel
- Code ascii - Guide
- Liste déroulante excel - Guide
- Word et excel gratuit - Guide
- Code puk bloqué - Guide
- Comment déverrouiller un téléphone quand on a oublié le code - Guide
3 réponses
Bonjour,
Merci pour la réponse oui ca fonctionne si je cache la Worksheets(13) mais ces quand j'essaie de cacher la Worksheets(12) qu'il me cause problème à cause que ces cette feuille qui exécute la macro je crois.
Avez vous une solution, car mon code macro est dans le module2.
merci.
Merci pour la réponse oui ca fonctionne si je cache la Worksheets(13) mais ces quand j'essaie de cacher la Worksheets(12) qu'il me cause problème à cause que ces cette feuille qui exécute la macro je crois.
Avez vous une solution, car mon code macro est dans le module2.
merci.
