fermeture du document initial, après ouverture du document secondaire.
2 réponses
marchepied
Bonjour,
J'ai un document excel appelé "Juin 2004" qui contient une macro qui
crée un nouveau document appelé "Juillet 2004". A un moment donné, les
2 documents sont ouverts. Je voudrai fermé le document initial (qui
éxécute la macro en cours)"Juin 2004".
Hors, ça plante au niveau de la ligne
Workbooks("Fichier_a_fermer").Close
car apparemment, la variable "Fichier_a_fermer" n'est plus renseignée.
voir ci-dessous, un extrait de la macro:
Merci pour votre aide,
Marchepied,
Sub changement_de_mois()
Fichier_a_fermer = ActiveWorkbook.Name
' ligne ....
' ligne ....
' création du document "Juillet 2004"
With ThisWorkbook
chemin = .Path & "\"
nom$ = mois & annee & ".XLS"
.SaveCopyAs chemin & nom
End With
' ouverture du document precedemment sauvegardé
Workbooks.Open chemin & nom
' fermeture du document initial
Workbooks("Fichier_a_fermer").Close
End Sub
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
isabelle
bonjour,
With ThisWorkbook fait appel au workbook contenant la macro, c'est donc lui que tu sauve en copy sous un autre nom. si tu veux renommer le workbook que tu vient de créer utilise plutot : With ActiveWorkbook
isabelle
Bonjour, J'ai un document excel appelé "Juin 2004" qui contient une macro qui crée un nouveau document appelé "Juillet 2004". A un moment donné, les 2 documents sont ouverts. Je voudrai fermé le document initial (qui éxécute la macro en cours)"Juin 2004". Hors, ça plante au niveau de la ligne Workbooks("Fichier_a_fermer").Close car apparemment, la variable "Fichier_a_fermer" n'est plus renseignée. voir ci-dessous, un extrait de la macro: Merci pour votre aide, Marchepied,
Sub changement_de_mois() Fichier_a_fermer = ActiveWorkbook.Name ' ligne .... ' ligne .... ' création du document "Juillet 2004" With ThisWorkbook chemin = .Path & "" nom$ = mois & annee & ".XLS" .SaveCopyAs chemin & nom End With ' ouverture du document precedemment sauvegardé Workbooks.Open chemin & nom ' fermeture du document initial Workbooks("Fichier_a_fermer").Close End Sub
bonjour,
With ThisWorkbook
fait appel au workbook contenant la macro, c'est donc lui que tu sauve
en copy sous un autre nom.
si tu veux renommer le workbook que tu vient de créer utilise plutot :
With ActiveWorkbook
isabelle
Bonjour,
J'ai un document excel appelé "Juin 2004" qui contient une macro qui
crée un nouveau document appelé "Juillet 2004". A un moment donné, les
2 documents sont ouverts. Je voudrai fermé le document initial (qui
éxécute la macro en cours)"Juin 2004".
Hors, ça plante au niveau de la ligne
Workbooks("Fichier_a_fermer").Close
car apparemment, la variable "Fichier_a_fermer" n'est plus renseignée.
voir ci-dessous, un extrait de la macro:
Merci pour votre aide,
Marchepied,
Sub changement_de_mois()
Fichier_a_fermer = ActiveWorkbook.Name
' ligne ....
' ligne ....
' création du document "Juillet 2004"
With ThisWorkbook
chemin = .Path & ""
nom$ = mois & annee & ".XLS"
.SaveCopyAs chemin & nom
End With
' ouverture du document precedemment sauvegardé
Workbooks.Open chemin & nom
' fermeture du document initial
Workbooks("Fichier_a_fermer").Close
End Sub
With ThisWorkbook fait appel au workbook contenant la macro, c'est donc lui que tu sauve en copy sous un autre nom. si tu veux renommer le workbook que tu vient de créer utilise plutot : With ActiveWorkbook
isabelle
Bonjour, J'ai un document excel appelé "Juin 2004" qui contient une macro qui crée un nouveau document appelé "Juillet 2004". A un moment donné, les 2 documents sont ouverts. Je voudrai fermé le document initial (qui éxécute la macro en cours)"Juin 2004". Hors, ça plante au niveau de la ligne Workbooks("Fichier_a_fermer").Close car apparemment, la variable "Fichier_a_fermer" n'est plus renseignée. voir ci-dessous, un extrait de la macro: Merci pour votre aide, Marchepied,
Sub changement_de_mois() Fichier_a_fermer = ActiveWorkbook.Name ' ligne .... ' ligne .... ' création du document "Juillet 2004" With ThisWorkbook chemin = .Path & "" nom$ = mois & annee & ".XLS" .SaveCopyAs chemin & nom End With ' ouverture du document precedemment sauvegardé Workbooks.Open chemin & nom ' fermeture du document initial Workbooks("Fichier_a_fermer").Close End Sub
Pascal Engelmajer
Salut,
Workbooks("Fichier_a_fermer").Close
avec les guillemets ? -- Amicalement. Pascal "il n'y a pas de vent favorable pour celui qui ne sait pas ou il va." Sénèque. http://www.ilyapa.net/excel http://www.ilyapa.net/baseExcel "marchepied" a écrit dans le message de news:
Bonjour, J'ai un document excel appelé "Juin 2004" qui contient une macro qui crée un nouveau document appelé "Juillet 2004". A un moment donné, les 2 documents sont ouverts. Je voudrai fermé le document initial (qui éxécute la macro en cours)"Juin 2004". Hors, ça plante au niveau de la ligne Workbooks("Fichier_a_fermer").Close car apparemment, la variable "Fichier_a_fermer" n'est plus renseignée. voir ci-dessous, un extrait de la macro: Merci pour votre aide, Marchepied,
Sub changement_de_mois() Fichier_a_fermer = ActiveWorkbook.Name ' ligne .... ' ligne .... ' création du document "Juillet 2004" With ThisWorkbook chemin = .Path & "" nom$ = mois & annee & ".XLS" .SaveCopyAs chemin & nom End With ' ouverture du document precedemment sauvegardé Workbooks.Open chemin & nom ' fermeture du document initial Workbooks("Fichier_a_fermer").Close End Sub
Salut,
Workbooks("Fichier_a_fermer").Close
avec les guillemets ?
--
Amicalement.
Pascal
"il n'y a pas de vent favorable pour celui qui ne sait pas ou il va."
Sénèque.
http://www.ilyapa.net/excel
http://www.ilyapa.net/baseExcel
"marchepied" <marchepied@hotmail.com> a écrit dans le message de news:
c01ffab1.0406220400.2e70e6ca@posting.google.com...
Bonjour,
J'ai un document excel appelé "Juin 2004" qui contient une macro qui
crée un nouveau document appelé "Juillet 2004". A un moment donné, les
2 documents sont ouverts. Je voudrai fermé le document initial (qui
éxécute la macro en cours)"Juin 2004".
Hors, ça plante au niveau de la ligne
Workbooks("Fichier_a_fermer").Close
car apparemment, la variable "Fichier_a_fermer" n'est plus renseignée.
voir ci-dessous, un extrait de la macro:
Merci pour votre aide,
Marchepied,
Sub changement_de_mois()
Fichier_a_fermer = ActiveWorkbook.Name
' ligne ....
' ligne ....
' création du document "Juillet 2004"
With ThisWorkbook
chemin = .Path & ""
nom$ = mois & annee & ".XLS"
.SaveCopyAs chemin & nom
End With
' ouverture du document precedemment sauvegardé
Workbooks.Open chemin & nom
' fermeture du document initial
Workbooks("Fichier_a_fermer").Close
End Sub
avec les guillemets ? -- Amicalement. Pascal "il n'y a pas de vent favorable pour celui qui ne sait pas ou il va." Sénèque. http://www.ilyapa.net/excel http://www.ilyapa.net/baseExcel "marchepied" a écrit dans le message de news:
Bonjour, J'ai un document excel appelé "Juin 2004" qui contient une macro qui crée un nouveau document appelé "Juillet 2004". A un moment donné, les 2 documents sont ouverts. Je voudrai fermé le document initial (qui éxécute la macro en cours)"Juin 2004". Hors, ça plante au niveau de la ligne Workbooks("Fichier_a_fermer").Close car apparemment, la variable "Fichier_a_fermer" n'est plus renseignée. voir ci-dessous, un extrait de la macro: Merci pour votre aide, Marchepied,
Sub changement_de_mois() Fichier_a_fermer = ActiveWorkbook.Name ' ligne .... ' ligne .... ' création du document "Juillet 2004" With ThisWorkbook chemin = .Path & "" nom$ = mois & annee & ".XLS" .SaveCopyAs chemin & nom End With ' ouverture du document precedemment sauvegardé Workbooks.Open chemin & nom ' fermeture du document initial Workbooks("Fichier_a_fermer").Close End Sub
