Incrementer cellule
CHIKUNGOUGNA
Messages postés
2
Date d'inscription
Statut
Membre
Dernière intervention
-
michel_m Messages postés 16602 Date d'inscription Statut Contributeur Dernière intervention -
michel_m Messages postés 16602 Date d'inscription Statut Contributeur Dernière intervention -
Bonjour
J'utilise la macro suivante pour incrémenter une cellule automatiquement après chaque impression.
Est il possible d'enregistrer automatiquement le document dans un dossier choisi?
Est il possible d'incrémenter simultanément toutes les mêmes cellules (ici I13) de toutes les feuilles du dossier.
Sub IMPRIMER()
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Dim num As Integer
Range("I13").Select
num = Range("I13").Value
num = num + 1
Range("I13").Value = num
End Sub
Merci d'avance pour vos aides
J'utilise la macro suivante pour incrémenter une cellule automatiquement après chaque impression.
Est il possible d'enregistrer automatiquement le document dans un dossier choisi?
Est il possible d'incrémenter simultanément toutes les mêmes cellules (ici I13) de toutes les feuilles du dossier.
Sub IMPRIMER()
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Dim num As Integer
Range("I13").Select
num = Range("I13").Value
num = num + 1
Range("I13").Value = num
End Sub
Merci d'avance pour vos aides
A voir également:
- Incrementer cellule
- Excel cellule couleur si condition texte - Guide
- Proteger cellule excel - Guide
- Aller à la ligne dans une cellule excel - Guide
- Excel cellule choix multiple - Guide
- Excel compter cellule couleur sans vba - Guide
2 réponses
Pour écrire à la fois dans toutes les feuilles:
sélectiionner la feuil2 clic sue l'onglet
appui maintenu sur "maj"
clic sur le dernier onglet
écrire la formule
=feuil1!I13
disocier les feuille (clic droit-dissocier
donc pas besoin de macro ou UTILISER L'ENREGISTREUR
pour enregitreur
ACTIVE L'ENREGISTREUR DE MACRO ET FAIS LES MANIPULATIONS COMME SI TU LE FAISAIS MANUELLEMENT
Enregistrer sous / classeur prenant en charge les macros
choisir le dossier et
"enregister"
ta macro est faite en combinant les 2
sélectiionner la feuil2 clic sue l'onglet
appui maintenu sur "maj"
clic sur le dernier onglet
écrire la formule
=feuil1!I13
disocier les feuille (clic droit-dissocier
donc pas besoin de macro ou UTILISER L'ENREGISTREUR
pour enregitreur
ACTIVE L'ENREGISTREUR DE MACRO ET FAIS LES MANIPULATIONS COMME SI TU LE FAISAIS MANUELLEMENT
Enregistrer sous / classeur prenant en charge les macros
choisir le dossier et
"enregister"
ta macro est faite en combinant les 2
Pour la 2ème questions; il s'agit d'enregistrer la feuille sélectionné pour l'impression dans un dossier.