Enregistrement d'un fichier modifié
pev64
-
pev64 -
pev64 -
Bonjour,
Dans mon classeur j'ai deux pages: une nommé page de garde et une autre nommé matèriel, cette dernière contient un tableau qui gere un evenement. Je voudrai que a chaque fois que j'apporte une modif dans mon evenement je puisse l'enregistrer sous le nom de l'evenement en question sachant qu'il y aura plusieur evenement de noms differents.
Pour résumer je veux faire un systeme de fiches par evenement et si possible retrouver l'historique de chaque evenement. J'ai deja fais une macro qui enregistre remet a zero et renvoi en page de garde.
Comment faire pour enregistrer sous des noms différents avec une macro tout en gardant mon tableau.
Merci pour votre aide
<config>Windows XP EXCEL 2007
Dans mon classeur j'ai deux pages: une nommé page de garde et une autre nommé matèriel, cette dernière contient un tableau qui gere un evenement. Je voudrai que a chaque fois que j'apporte une modif dans mon evenement je puisse l'enregistrer sous le nom de l'evenement en question sachant qu'il y aura plusieur evenement de noms differents.
Pour résumer je veux faire un systeme de fiches par evenement et si possible retrouver l'historique de chaque evenement. J'ai deja fais une macro qui enregistre remet a zero et renvoi en page de garde.
Comment faire pour enregistrer sous des noms différents avec une macro tout en gardant mon tableau.
Merci pour votre aide
<config>Windows XP EXCEL 2007
A voir également:
- Enregistrement d'un fichier modifié
- Fichier bin - Guide
- Comment ouvrir un fichier epub ? - Guide
- Comment réduire la taille d'un fichier - Guide
- Fichier rar - Guide
- Fichier .dat - Guide
1 réponse
Bonjour
Voici un bout de macro qui pourrait vous servir
' chemin à modifier pour
ChDrive ("D:\")
ChDir "D:\dossier\sous_dossier\sous_sous_dossier\"
disque = "D:\" 'nom du disque
rep = "dossier\sous_dossier\sous_sous_dossier\" 'nom des répertoires (chemin)
nom = Sheets("feuil1").[A1] & ".xls" 'nom feuille
sav = disque & rep & nom 'disque chemin nom fichier sauvegarde
Le nom est composé par formule en A1 et la macro prend ce nom pour sauvegarder
J'espère que cela vous aidra
Voici un bout de macro qui pourrait vous servir
' chemin à modifier pour
ChDrive ("D:\")
ChDir "D:\dossier\sous_dossier\sous_sous_dossier\"
disque = "D:\" 'nom du disque
rep = "dossier\sous_dossier\sous_sous_dossier\" 'nom des répertoires (chemin)
nom = Sheets("feuil1").[A1] & ".xls" 'nom feuille
sav = disque & rep & nom 'disque chemin nom fichier sauvegarde
Le nom est composé par formule en A1 et la macro prend ce nom pour sauvegarder
J'espère que cela vous aidra
OK je pousuit et j'essairai votre code
grand merci pour votre aide
a bientôt