-----Message d'origine-----
Salut Philippe,
Un exemple :
Sur une feuille nommée «UN», tu as
la formule ±+C1 en A1.
Tu voudrais obtenir la valeur (pas la formule) de
cette somme dans la cellule A1 de la feuille «résumé»
à chaque fois que tu ajoutes une feuille.
Alors tu pourrais utiliser les deux macros suivantes :
1.
Sub Mettre_A1_Dans_Résumé()
Sheets("Résumé").[a1] = Sheets("UN").[a1]
End Sub
2.
Sub Nouvelle_Feuille()
ActiveWorkbook.Sheets.Add
Call Mettre_A1_Dans_Résumé
End Sub
Tu associes alors un raccourci clavier à
la macro «Nouvell_Feuille», par exemple
Ctrl+Maj+A.
Et quand tu veux insérer une nouvelle
feuille, fais-le avec la touche de raccourci.
Ça devrait aller. Qu'en penses-tu ?
Serge
.
-----Message d'origine-----
Salut Philippe,
Un exemple :
Sur une feuille nommée «UN», tu as
la formule =B1+C1 en A1.
Tu voudrais obtenir la valeur (pas la formule) de
cette somme dans la cellule A1 de la feuille «résumé»
à chaque fois que tu ajoutes une feuille.
Alors tu pourrais utiliser les deux macros suivantes :
1.
Sub Mettre_A1_Dans_Résumé()
Sheets("Résumé").[a1] = Sheets("UN").[a1]
End Sub
2.
Sub Nouvelle_Feuille()
ActiveWorkbook.Sheets.Add
Call Mettre_A1_Dans_Résumé
End Sub
Tu associes alors un raccourci clavier à
la macro «Nouvell_Feuille», par exemple
Ctrl+Maj+A.
Et quand tu veux insérer une nouvelle
feuille, fais-le avec la touche de raccourci.
Ça devrait aller. Qu'en penses-tu ?
Serge
.
-----Message d'origine-----
Salut Philippe,
Un exemple :
Sur une feuille nommée «UN», tu as
la formule ±+C1 en A1.
Tu voudrais obtenir la valeur (pas la formule) de
cette somme dans la cellule A1 de la feuille «résumé»
à chaque fois que tu ajoutes une feuille.
Alors tu pourrais utiliser les deux macros suivantes :
1.
Sub Mettre_A1_Dans_Résumé()
Sheets("Résumé").[a1] = Sheets("UN").[a1]
End Sub
2.
Sub Nouvelle_Feuille()
ActiveWorkbook.Sheets.Add
Call Mettre_A1_Dans_Résumé
End Sub
Tu associes alors un raccourci clavier à
la macro «Nouvell_Feuille», par exemple
Ctrl+Maj+A.
Et quand tu veux insérer une nouvelle
feuille, fais-le avec la touche de raccourci.
Ça devrait aller. Qu'en penses-tu ?
Serge
.
-----Message d'origine-----
Salut Philippe,
Un exemple :
Sur une feuille nommée «UN», tu as
la formule ±+C1 en A1.
Tu voudrais obtenir la valeur (pas la formule) de
cette somme dans la cellule A1 de la feuille «résumé»
à chaque fois que tu ajoutes une feuille.
Alors tu pourrais utiliser les deux macros suivantes :
1.
Sub Mettre_A1_Dans_Résumé()
Sheets("Résumé").[a1] = Sheets("UN").[a1]
End Sub
2.
Sub Nouvelle_Feuille()
ActiveWorkbook.Sheets.Add
Call Mettre_A1_Dans_Résumé
End Sub
Tu associes alors un raccourci clavier à
la macro «Nouvell_Feuille», par exemple
Ctrl+Maj+A.
Et quand tu veux insérer une nouvelle
feuille, fais-le avec la touche de raccourci.
Ça devrait aller. Qu'en penses-tu ?
Serge
.
-----Message d'origine-----
Salut Philippe,
Un exemple :
Sur une feuille nommée «UN», tu as
la formule ±+C1 en A1.
Tu voudrais obtenir la valeur (pas la formule) de
cette somme dans la cellule A1 de la feuille «résumé»
à chaque fois que tu ajoutes une feuille.
Alors tu pourrais utiliser les deux macros suivantes :
1.
Sub Mettre_A1_Dans_Résumé()
Sheets("Résumé").[a1] = Sheets("UN").[a1]
End Sub
2.
Sub Nouvelle_Feuille()
ActiveWorkbook.Sheets.Add
Call Mettre_A1_Dans_Résumé
End Sub
Tu associes alors un raccourci clavier à
la macro «Nouvell_Feuille», par exemple
Ctrl+Maj+A.
Et quand tu veux insérer une nouvelle
feuille, fais-le avec la touche de raccourci.
Ça devrait aller. Qu'en penses-tu ?
Serge
.
-----Message d'origine-----
Salut Philippe,
Un exemple :
Sur une feuille nommée «UN», tu as
la formule ±+C1 en A1.
Tu voudrais obtenir la valeur (pas la formule) de
cette somme dans la cellule A1 de la feuille «résumé»
à chaque fois que tu ajoutes une feuille.
Alors tu pourrais utiliser les deux macros suivantes :
1.
Sub Mettre_A1_Dans_Résumé()
Sheets("Résumé").[a1] = Sheets("UN").[a1]
End Sub
2.
Sub Nouvelle_Feuille()
ActiveWorkbook.Sheets.Add
Call Mettre_A1_Dans_Résumé
End Sub
Tu associes alors un raccourci clavier à
la macro «Nouvell_Feuille», par exemple
Ctrl+Maj+A.
Et quand tu veux insérer une nouvelle
feuille, fais-le avec la touche de raccourci.
Ça devrait aller. Qu'en penses-tu ?
Serge
.
-----Message d'origine-----
Salut Philippe,
En espérant que tout soit clair :
1. Copie cette zone :
Sub Mettre_A1_Dans_Résumé()
Sheets("Résumé").[a1] = Sheets("UN").[a1]
End Sub
Sub Nouvelle_Feuille()
ActiveWorkbook.Sheets.Add
Call Mettre_A1_Dans_Résumé
End Sub
2. Combinaison de touches Alt+F11
Tu devrais alors te retrouver sur une feuille
vierge d'un module standard.
3. Colle
4. Reviens sur ta feuille et Alt+F8
Tu devrais voir le nom des deux macros.
5. Sélectionne «Nouvelle_Feuille», clique
sur «Options» et entre la touche de raccourci
de ton choix. De préférence une lettre majuscule
pour éviter de tomber sur un raccourci d'Excel.
6. Tu peux maintenant appeler la macro par
Ctrl+Maj+(la lettre choisi)
Et alors, ça va ?
Serge
"Philippe" a écrit
dans le message de
news: 1490701c3f952$6d0451e0$
Merci, mais ou coller ce code, dans la cellule, dans la
feuille ? je ne connais pas bien VBA.
Merci d'avance
Philippe-----Message d'origine-----
Salut Philippe,
Un exemple :
Sur une feuille nommée «UN», tu as
la formule ±+C1 en A1.
Tu voudrais obtenir la valeur (pas la formule) de
cette somme dans la cellule A1 de la feuille «résumé»
à chaque fois que tu ajoutes une feuille.
Alors tu pourrais utiliser les deux macros suivantes :
1.
Sub Mettre_A1_Dans_Résumé()
Sheets("Résumé").[a1] = Sheets("UN").[a1]
End Sub
2.
Sub Nouvelle_Feuille()
ActiveWorkbook.Sheets.Add
Call Mettre_A1_Dans_Résumé
End Sub
Tu associes alors un raccourci clavier à
la macro «Nouvell_Feuille», par exemple
Ctrl+Maj+A.
Et quand tu veux insérer une nouvelle
feuille, fais-le avec la touche de raccourci.
Ça devrait aller. Qu'en penses-tu ?
Serge
.
.
-----Message d'origine-----
Salut Philippe,
En espérant que tout soit clair :
1. Copie cette zone :
Sub Mettre_A1_Dans_Résumé()
Sheets("Résumé").[a1] = Sheets("UN").[a1]
End Sub
Sub Nouvelle_Feuille()
ActiveWorkbook.Sheets.Add
Call Mettre_A1_Dans_Résumé
End Sub
2. Combinaison de touches Alt+F11
Tu devrais alors te retrouver sur une feuille
vierge d'un module standard.
3. Colle
4. Reviens sur ta feuille et Alt+F8
Tu devrais voir le nom des deux macros.
5. Sélectionne «Nouvelle_Feuille», clique
sur «Options» et entre la touche de raccourci
de ton choix. De préférence une lettre majuscule
pour éviter de tomber sur un raccourci d'Excel.
6. Tu peux maintenant appeler la macro par
Ctrl+Maj+(la lettre choisi)
Et alors, ça va ?
Serge
"Philippe" <anonymous@discussions.microsoft.com> a écrit
dans le message de
news: 1490701c3f952$6d0451e0$a401280a@phx.gbl...
Merci, mais ou coller ce code, dans la cellule, dans la
feuille ? je ne connais pas bien VBA.
Merci d'avance
Philippe
-----Message d'origine-----
Salut Philippe,
Un exemple :
Sur une feuille nommée «UN», tu as
la formule =B1+C1 en A1.
Tu voudrais obtenir la valeur (pas la formule) de
cette somme dans la cellule A1 de la feuille «résumé»
à chaque fois que tu ajoutes une feuille.
Alors tu pourrais utiliser les deux macros suivantes :
1.
Sub Mettre_A1_Dans_Résumé()
Sheets("Résumé").[a1] = Sheets("UN").[a1]
End Sub
2.
Sub Nouvelle_Feuille()
ActiveWorkbook.Sheets.Add
Call Mettre_A1_Dans_Résumé
End Sub
Tu associes alors un raccourci clavier à
la macro «Nouvell_Feuille», par exemple
Ctrl+Maj+A.
Et quand tu veux insérer une nouvelle
feuille, fais-le avec la touche de raccourci.
Ça devrait aller. Qu'en penses-tu ?
Serge
.
.
-----Message d'origine-----
Salut Philippe,
En espérant que tout soit clair :
1. Copie cette zone :
Sub Mettre_A1_Dans_Résumé()
Sheets("Résumé").[a1] = Sheets("UN").[a1]
End Sub
Sub Nouvelle_Feuille()
ActiveWorkbook.Sheets.Add
Call Mettre_A1_Dans_Résumé
End Sub
2. Combinaison de touches Alt+F11
Tu devrais alors te retrouver sur une feuille
vierge d'un module standard.
3. Colle
4. Reviens sur ta feuille et Alt+F8
Tu devrais voir le nom des deux macros.
5. Sélectionne «Nouvelle_Feuille», clique
sur «Options» et entre la touche de raccourci
de ton choix. De préférence une lettre majuscule
pour éviter de tomber sur un raccourci d'Excel.
6. Tu peux maintenant appeler la macro par
Ctrl+Maj+(la lettre choisi)
Et alors, ça va ?
Serge
"Philippe" a écrit
dans le message de
news: 1490701c3f952$6d0451e0$
Merci, mais ou coller ce code, dans la cellule, dans la
feuille ? je ne connais pas bien VBA.
Merci d'avance
Philippe-----Message d'origine-----
Salut Philippe,
Un exemple :
Sur une feuille nommée «UN», tu as
la formule ±+C1 en A1.
Tu voudrais obtenir la valeur (pas la formule) de
cette somme dans la cellule A1 de la feuille «résumé»
à chaque fois que tu ajoutes une feuille.
Alors tu pourrais utiliser les deux macros suivantes :
1.
Sub Mettre_A1_Dans_Résumé()
Sheets("Résumé").[a1] = Sheets("UN").[a1]
End Sub
2.
Sub Nouvelle_Feuille()
ActiveWorkbook.Sheets.Add
Call Mettre_A1_Dans_Résumé
End Sub
Tu associes alors un raccourci clavier à
la macro «Nouvell_Feuille», par exemple
Ctrl+Maj+A.
Et quand tu veux insérer une nouvelle
feuille, fais-le avec la touche de raccourci.
Ça devrait aller. Qu'en penses-tu ?
Serge
.
.
-----Message d'origine-----
Salut Philippe,
En espérant que tout soit clair :
1. Copie cette zone :
Sub Mettre_A1_Dans_Résumé()
Sheets("Résumé").[a1] = Sheets("UN").[a1]
End Sub
Sub Nouvelle_Feuille()
ActiveWorkbook.Sheets.Add
Call Mettre_A1_Dans_Résumé
End Sub
2. Combinaison de touches Alt+F11
Tu devrais alors te retrouver sur une feuille
vierge d'un module standard.
3. Colle
4. Reviens sur ta feuille et Alt+F8
Tu devrais voir le nom des deux macros.
5. Sélectionne «Nouvelle_Feuille», clique
sur «Options» et entre la touche de raccourci
de ton choix. De préférence une lettre majuscule
pour éviter de tomber sur un raccourci d'Excel.
6. Tu peux maintenant appeler la macro par
Ctrl+Maj+(la lettre choisi)
Et alors, ça va ?
Serge
"Philippe" a écrit
dans le message de
news: 1490701c3f952$6d0451e0$
Merci, mais ou coller ce code, dans la cellule, dans la
feuille ? je ne connais pas bien VBA.
Merci d'avance
Philippe-----Message d'origine-----
Salut Philippe,
Un exemple :
Sur une feuille nommée «UN», tu as
la formule ±+C1 en A1.
Tu voudrais obtenir la valeur (pas la formule) de
cette somme dans la cellule A1 de la feuille «résumé»
à chaque fois que tu ajoutes une feuille.
Alors tu pourrais utiliser les deux macros suivantes :
1.
Sub Mettre_A1_Dans_Résumé()
Sheets("Résumé").[a1] = Sheets("UN").[a1]
End Sub
2.
Sub Nouvelle_Feuille()
ActiveWorkbook.Sheets.Add
Call Mettre_A1_Dans_Résumé
End Sub
Tu associes alors un raccourci clavier à
la macro «Nouvell_Feuille», par exemple
Ctrl+Maj+A.
Et quand tu veux insérer une nouvelle
feuille, fais-le avec la touche de raccourci.
Ça devrait aller. Qu'en penses-tu ?
Serge
.
.
-----Message d'origine-----
Salut Philippe,
En espérant que tout soit clair :
1. Copie cette zone :
Sub Mettre_A1_Dans_Résumé()
Sheets("Résumé").[a1] = Sheets("UN").[a1]
End Sub
Sub Nouvelle_Feuille()
ActiveWorkbook.Sheets.Add
Call Mettre_A1_Dans_Résumé
End Sub
2. Combinaison de touches Alt+F11
Tu devrais alors te retrouver sur une feuille
vierge d'un module standard.
3. Colle
4. Reviens sur ta feuille et Alt+F8
Tu devrais voir le nom des deux macros.
5. Sélectionne «Nouvelle_Feuille», clique
sur «Options» et entre la touche de raccourci
de ton choix. De préférence une lettre majuscule
pour éviter de tomber sur un raccourci d'Excel.
6. Tu peux maintenant appeler la macro par
Ctrl+Maj+(la lettre choisi)
Et alors, ça va ?
Serge
"Philippe" <anonymous@discussions.microsoft.com> a écrit
dans le message de
news: 1490701c3f952$6d0451e0$a401280a@phx.gbl...
Merci, mais ou coller ce code, dans la cellule, dans la
feuille ? je ne connais pas bien VBA.
Merci d'avance
Philippe
-----Message d'origine-----
Salut Philippe,
Un exemple :
Sur une feuille nommée «UN», tu as
la formule =B1+C1 en A1.
Tu voudrais obtenir la valeur (pas la formule) de
cette somme dans la cellule A1 de la feuille «résumé»
à chaque fois que tu ajoutes une feuille.
Alors tu pourrais utiliser les deux macros suivantes :
1.
Sub Mettre_A1_Dans_Résumé()
Sheets("Résumé").[a1] = Sheets("UN").[a1]
End Sub
2.
Sub Nouvelle_Feuille()
ActiveWorkbook.Sheets.Add
Call Mettre_A1_Dans_Résumé
End Sub
Tu associes alors un raccourci clavier à
la macro «Nouvell_Feuille», par exemple
Ctrl+Maj+A.
Et quand tu veux insérer une nouvelle
feuille, fais-le avec la touche de raccourci.
Ça devrait aller. Qu'en penses-tu ?
Serge
.
.
-----Message d'origine-----
Salut Philippe,
En espérant que tout soit clair :
1. Copie cette zone :
Sub Mettre_A1_Dans_Résumé()
Sheets("Résumé").[a1] = Sheets("UN").[a1]
End Sub
Sub Nouvelle_Feuille()
ActiveWorkbook.Sheets.Add
Call Mettre_A1_Dans_Résumé
End Sub
2. Combinaison de touches Alt+F11
Tu devrais alors te retrouver sur une feuille
vierge d'un module standard.
3. Colle
4. Reviens sur ta feuille et Alt+F8
Tu devrais voir le nom des deux macros.
5. Sélectionne «Nouvelle_Feuille», clique
sur «Options» et entre la touche de raccourci
de ton choix. De préférence une lettre majuscule
pour éviter de tomber sur un raccourci d'Excel.
6. Tu peux maintenant appeler la macro par
Ctrl+Maj+(la lettre choisi)
Et alors, ça va ?
Serge
"Philippe" a écrit
dans le message de
news: 1490701c3f952$6d0451e0$
Merci, mais ou coller ce code, dans la cellule, dans la
feuille ? je ne connais pas bien VBA.
Merci d'avance
Philippe-----Message d'origine-----
Salut Philippe,
Un exemple :
Sur une feuille nommée «UN», tu as
la formule ±+C1 en A1.
Tu voudrais obtenir la valeur (pas la formule) de
cette somme dans la cellule A1 de la feuille «résumé»
à chaque fois que tu ajoutes une feuille.
Alors tu pourrais utiliser les deux macros suivantes :
1.
Sub Mettre_A1_Dans_Résumé()
Sheets("Résumé").[a1] = Sheets("UN").[a1]
End Sub
2.
Sub Nouvelle_Feuille()
ActiveWorkbook.Sheets.Add
Call Mettre_A1_Dans_Résumé
End Sub
Tu associes alors un raccourci clavier à
la macro «Nouvell_Feuille», par exemple
Ctrl+Maj+A.
Et quand tu veux insérer une nouvelle
feuille, fais-le avec la touche de raccourci.
Ça devrait aller. Qu'en penses-tu ?
Serge
.
.
-----Message d'origine-----
Salut Philippe,
En espérant que tout soit clair :
1. Copie cette zone :
Sub Mettre_A1_Dans_Résumé()
Sheets("Résumé").[a1] = Sheets("UN").[a1]
End Sub
Sub Nouvelle_Feuille()
ActiveWorkbook.Sheets.Add
Call Mettre_A1_Dans_Résumé
End Sub
2. Combinaison de touches Alt+F11
Tu devrais alors te retrouver sur une feuille
vierge d'un module standard.
3. Colle
4. Reviens sur ta feuille et Alt+F8
Tu devrais voir le nom des deux macros.
5. Sélectionne «Nouvelle_Feuille», clique
sur «Options» et entre la touche de raccourci
de ton choix. De préférence une lettre majuscule
pour éviter de tomber sur un raccourci d'Excel.
6. Tu peux maintenant appeler la macro par
Ctrl+Maj+(la lettre choisi)
Et alors, ça va ?
Serge
"Philippe" a écrit
dans le message de
news: 1490701c3f952$6d0451e0$
Merci, mais ou coller ce code, dans la cellule, dans la
feuille ? je ne connais pas bien VBA.
Merci d'avance
Philippe-----Message d'origine-----
Salut Philippe,
Un exemple :
Sur une feuille nommée «UN», tu as
la formule ±+C1 en A1.
Tu voudrais obtenir la valeur (pas la formule) de
cette somme dans la cellule A1 de la feuille «résumé»
à chaque fois que tu ajoutes une feuille.
Alors tu pourrais utiliser les deux macros suivantes :
1.
Sub Mettre_A1_Dans_Résumé()
Sheets("Résumé").[a1] = Sheets("UN").[a1]
End Sub
2.
Sub Nouvelle_Feuille()
ActiveWorkbook.Sheets.Add
Call Mettre_A1_Dans_Résumé
End Sub
Tu associes alors un raccourci clavier à
la macro «Nouvell_Feuille», par exemple
Ctrl+Maj+A.
Et quand tu veux insérer une nouvelle
feuille, fais-le avec la touche de raccourci.
Ça devrait aller. Qu'en penses-tu ?
Serge
.
.
-----Message d'origine-----
Salut Philippe,
En espérant que tout soit clair :
1. Copie cette zone :
Sub Mettre_A1_Dans_Résumé()
Sheets("Résumé").[a1] = Sheets("UN").[a1]
End Sub
Sub Nouvelle_Feuille()
ActiveWorkbook.Sheets.Add
Call Mettre_A1_Dans_Résumé
End Sub
2. Combinaison de touches Alt+F11
Tu devrais alors te retrouver sur une feuille
vierge d'un module standard.
3. Colle
4. Reviens sur ta feuille et Alt+F8
Tu devrais voir le nom des deux macros.
5. Sélectionne «Nouvelle_Feuille», clique
sur «Options» et entre la touche de raccourci
de ton choix. De préférence une lettre majuscule
pour éviter de tomber sur un raccourci d'Excel.
6. Tu peux maintenant appeler la macro par
Ctrl+Maj+(la lettre choisi)
Et alors, ça va ?
Serge
"Philippe" <anonymous@discussions.microsoft.com> a écrit
dans le message de
news: 1490701c3f952$6d0451e0$a401280a@phx.gbl...
Merci, mais ou coller ce code, dans la cellule, dans la
feuille ? je ne connais pas bien VBA.
Merci d'avance
Philippe
-----Message d'origine-----
Salut Philippe,
Un exemple :
Sur une feuille nommée «UN», tu as
la formule ±+C1 en A1.
Tu voudrais obtenir la valeur (pas la formule) de
cette somme dans la cellule A1 de la feuille «résumé»
à chaque fois que tu ajoutes une feuille.
Alors tu pourrais utiliser les deux macros suivantes :
1.
Sub Mettre_A1_Dans_Résumé()
Sheets("Résumé").[a1] = Sheets("UN").[a1]
End Sub
2.
Sub Nouvelle_Feuille()
ActiveWorkbook.Sheets.Add
Call Mettre_A1_Dans_Résumé
End Sub
Tu associes alors un raccourci clavier à
la macro «Nouvell_Feuille», par exemple
Ctrl+Maj+A.
Et quand tu veux insérer une nouvelle
feuille, fais-le avec la touche de raccourci.
Ça devrait aller. Qu'en penses-tu ?
Serge
.
.
-----Message d'origine-----
Salut Philippe,
En espérant que tout soit clair :
1. Copie cette zone :
Sub Mettre_A1_Dans_Résumé()
Sheets("Résumé").[a1] = Sheets("UN").[a1]
End Sub
Sub Nouvelle_Feuille()
ActiveWorkbook.Sheets.Add
Call Mettre_A1_Dans_Résumé
End Sub
2. Combinaison de touches Alt+F11
Tu devrais alors te retrouver sur une feuille
vierge d'un module standard.
3. Colle
4. Reviens sur ta feuille et Alt+F8
Tu devrais voir le nom des deux macros.
5. Sélectionne «Nouvelle_Feuille», clique
sur «Options» et entre la touche de raccourci
de ton choix. De préférence une lettre majuscule
pour éviter de tomber sur un raccourci d'Excel.
6. Tu peux maintenant appeler la macro par
Ctrl+Maj+(la lettre choisi)
Et alors, ça va ?
Serge
"Philippe" a écrit
dans le message de
news: 1490701c3f952$6d0451e0$
Merci, mais ou coller ce code, dans la cellule, dans la
feuille ? je ne connais pas bien VBA.
Merci d'avance
Philippe-----Message d'origine-----
Salut Philippe,
Un exemple :
Sur une feuille nommée «UN», tu as
la formule ±+C1 en A1.
Tu voudrais obtenir la valeur (pas la formule) de
cette somme dans la cellule A1 de la feuille «résumé»
à chaque fois que tu ajoutes une feuille.
Alors tu pourrais utiliser les deux macros suivantes :
1.
Sub Mettre_A1_Dans_Résumé()
Sheets("Résumé").[a1] = Sheets("UN").[a1]
End Sub
2.
Sub Nouvelle_Feuille()
ActiveWorkbook.Sheets.Add
Call Mettre_A1_Dans_Résumé
End Sub
Tu associes alors un raccourci clavier à
la macro «Nouvell_Feuille», par exemple
Ctrl+Maj+A.
Et quand tu veux insérer une nouvelle
feuille, fais-le avec la touche de raccourci.
Ça devrait aller. Qu'en penses-tu ?
Serge
.
.
-----Message d'origine-----
La bonne idée, c'est que je te fasse parvenir mon
classeur- exemple. Le veux-tu ?
Serge
"Philippe" a écrit
dans le message de
news: 1495501c3f959$b609d890$
Il y a du mieux, j'ai nommée ma feui1 "UN" mais dans le
résumé je n'ai toujours pas la somme des feuilles qui se
multiplies.
Philippe-----Message d'origine-----
Salut Philippe,
En espérant que tout soit clair :
1. Copie cette zone :
Sub Mettre_A1_Dans_Résumé()
Sheets("Résumé").[a1] = Sheets("UN").[a1]
End Sub
Sub Nouvelle_Feuille()
ActiveWorkbook.Sheets.Add
Call Mettre_A1_Dans_Résumé
End Sub
2. Combinaison de touches Alt+F11
Tu devrais alors te retrouver sur une feuille
vierge d'un module standard.
3. Colle
4. Reviens sur ta feuille et Alt+F8
Tu devrais voir le nom des deux macros.
5. Sélectionne «Nouvelle_Feuille», clique
sur «Options» et entre la touche de raccourci
de ton choix. De préférence une lettre majuscule
pour éviter de tomber sur un raccourci d'Excel.
6. Tu peux maintenant appeler la macro par
Ctrl+Maj+(la lettre choisi)
Et alors, ça va ?
Serge
"Philippe" a écrit
dans le message denews: 1490701c3f952$6d0451e0$
Merci, mais ou coller ce code, dans la cellule, dans la
feuille ? je ne connais pas bien VBA.
Merci d'avance
Philippe-----Message d'origine-----
Salut Philippe,
Un exemple :
Sur une feuille nommée «UN», tu as
la formule ±+C1 en A1.
Tu voudrais obtenir la valeur (pas la formule) de
cette somme dans la cellule A1 de la feuille «résumé»
à chaque fois que tu ajoutes une feuille.
Alors tu pourrais utiliser les deux macros suivantes :
1.
Sub Mettre_A1_Dans_Résumé()
Sheets("Résumé").[a1] = Sheets("UN").[a1]
End Sub
2.
Sub Nouvelle_Feuille()
ActiveWorkbook.Sheets.Add
Call Mettre_A1_Dans_Résumé
End Sub
Tu associes alors un raccourci clavier à
la macro «Nouvell_Feuille», par exemple
Ctrl+Maj+A.
Et quand tu veux insérer une nouvelle
feuille, fais-le avec la touche de raccourci.
Ça devrait aller. Qu'en penses-tu ?
Serge
.
.
.
-----Message d'origine-----
La bonne idée, c'est que je te fasse parvenir mon
classeur- exemple. Le veux-tu ?
Serge
"Philippe" <anonymous@discussions.microsoft.com> a écrit
dans le message de
news: 1495501c3f959$b609d890$a401280a@phx.gbl...
Il y a du mieux, j'ai nommée ma feui1 "UN" mais dans le
résumé je n'ai toujours pas la somme des feuilles qui se
multiplies.
Philippe
-----Message d'origine-----
Salut Philippe,
En espérant que tout soit clair :
1. Copie cette zone :
Sub Mettre_A1_Dans_Résumé()
Sheets("Résumé").[a1] = Sheets("UN").[a1]
End Sub
Sub Nouvelle_Feuille()
ActiveWorkbook.Sheets.Add
Call Mettre_A1_Dans_Résumé
End Sub
2. Combinaison de touches Alt+F11
Tu devrais alors te retrouver sur une feuille
vierge d'un module standard.
3. Colle
4. Reviens sur ta feuille et Alt+F8
Tu devrais voir le nom des deux macros.
5. Sélectionne «Nouvelle_Feuille», clique
sur «Options» et entre la touche de raccourci
de ton choix. De préférence une lettre majuscule
pour éviter de tomber sur un raccourci d'Excel.
6. Tu peux maintenant appeler la macro par
Ctrl+Maj+(la lettre choisi)
Et alors, ça va ?
Serge
"Philippe" <anonymous@discussions.microsoft.com> a écrit
dans le message de
news: 1490701c3f952$6d0451e0$a401280a@phx.gbl...
Merci, mais ou coller ce code, dans la cellule, dans la
feuille ? je ne connais pas bien VBA.
Merci d'avance
Philippe
-----Message d'origine-----
Salut Philippe,
Un exemple :
Sur une feuille nommée «UN», tu as
la formule =B1+C1 en A1.
Tu voudrais obtenir la valeur (pas la formule) de
cette somme dans la cellule A1 de la feuille «résumé»
à chaque fois que tu ajoutes une feuille.
Alors tu pourrais utiliser les deux macros suivantes :
1.
Sub Mettre_A1_Dans_Résumé()
Sheets("Résumé").[a1] = Sheets("UN").[a1]
End Sub
2.
Sub Nouvelle_Feuille()
ActiveWorkbook.Sheets.Add
Call Mettre_A1_Dans_Résumé
End Sub
Tu associes alors un raccourci clavier à
la macro «Nouvell_Feuille», par exemple
Ctrl+Maj+A.
Et quand tu veux insérer une nouvelle
feuille, fais-le avec la touche de raccourci.
Ça devrait aller. Qu'en penses-tu ?
Serge
.
.
.
-----Message d'origine-----
La bonne idée, c'est que je te fasse parvenir mon
classeur- exemple. Le veux-tu ?
Serge
"Philippe" a écrit
dans le message de
news: 1495501c3f959$b609d890$
Il y a du mieux, j'ai nommée ma feui1 "UN" mais dans le
résumé je n'ai toujours pas la somme des feuilles qui se
multiplies.
Philippe-----Message d'origine-----
Salut Philippe,
En espérant que tout soit clair :
1. Copie cette zone :
Sub Mettre_A1_Dans_Résumé()
Sheets("Résumé").[a1] = Sheets("UN").[a1]
End Sub
Sub Nouvelle_Feuille()
ActiveWorkbook.Sheets.Add
Call Mettre_A1_Dans_Résumé
End Sub
2. Combinaison de touches Alt+F11
Tu devrais alors te retrouver sur une feuille
vierge d'un module standard.
3. Colle
4. Reviens sur ta feuille et Alt+F8
Tu devrais voir le nom des deux macros.
5. Sélectionne «Nouvelle_Feuille», clique
sur «Options» et entre la touche de raccourci
de ton choix. De préférence une lettre majuscule
pour éviter de tomber sur un raccourci d'Excel.
6. Tu peux maintenant appeler la macro par
Ctrl+Maj+(la lettre choisi)
Et alors, ça va ?
Serge
"Philippe" a écrit
dans le message denews: 1490701c3f952$6d0451e0$
Merci, mais ou coller ce code, dans la cellule, dans la
feuille ? je ne connais pas bien VBA.
Merci d'avance
Philippe-----Message d'origine-----
Salut Philippe,
Un exemple :
Sur une feuille nommée «UN», tu as
la formule ±+C1 en A1.
Tu voudrais obtenir la valeur (pas la formule) de
cette somme dans la cellule A1 de la feuille «résumé»
à chaque fois que tu ajoutes une feuille.
Alors tu pourrais utiliser les deux macros suivantes :
1.
Sub Mettre_A1_Dans_Résumé()
Sheets("Résumé").[a1] = Sheets("UN").[a1]
End Sub
2.
Sub Nouvelle_Feuille()
ActiveWorkbook.Sheets.Add
Call Mettre_A1_Dans_Résumé
End Sub
Tu associes alors un raccourci clavier à
la macro «Nouvell_Feuille», par exemple
Ctrl+Maj+A.
Et quand tu veux insérer une nouvelle
feuille, fais-le avec la touche de raccourci.
Ça devrait aller. Qu'en penses-tu ?
Serge
.
.
.
-----Message d'origine-----
Salut Philippe,
En espérant que tout soit clair :
1. Copie cette zone :
Sub Mettre_A1_Dans_Résumé()
Sheets("Résumé").[a1] = Sheets("UN").[a1]
End Sub
Sub Nouvelle_Feuille()
ActiveWorkbook.Sheets.Add
Call Mettre_A1_Dans_Résumé
End Sub
2. Combinaison de touches Alt+F11
Tu devrais alors te retrouver sur une feuille
vierge d'un module standard.
3. Colle
4. Reviens sur ta feuille et Alt+F8
Tu devrais voir le nom des deux macros.
5. Sélectionne «Nouvelle_Feuille», clique
sur «Options» et entre la touche de raccourci
de ton choix. De préférence une lettre majuscule
pour éviter de tomber sur un raccourci d'Excel.
6. Tu peux maintenant appeler la macro par
Ctrl+Maj+(la lettre choisi)
Et alors, ça va ?
Serge
"Philippe" a écrit
dans le message de
news: 1490701c3f952$6d0451e0$
Merci, mais ou coller ce code, dans la cellule, dans la
feuille ? je ne connais pas bien VBA.
Merci d'avance
Philippe-----Message d'origine-----
Salut Philippe,
Un exemple :
Sur une feuille nommée «UN», tu as
la formule ±+C1 en A1.
Tu voudrais obtenir la valeur (pas la formule) de
cette somme dans la cellule A1 de la feuille «résumé»
à chaque fois que tu ajoutes une feuille.
Alors tu pourrais utiliser les deux macros suivantes :
1.
Sub Mettre_A1_Dans_Résumé()
Sheets("Résumé").[a1] = Sheets("UN").[a1]
End Sub
2.
Sub Nouvelle_Feuille()
ActiveWorkbook.Sheets.Add
Call Mettre_A1_Dans_Résumé
End Sub
Tu associes alors un raccourci clavier à
la macro «Nouvell_Feuille», par exemple
Ctrl+Maj+A.
Et quand tu veux insérer une nouvelle
feuille, fais-le avec la touche de raccourci.
Ça devrait aller. Qu'en penses-tu ?
Serge
.
.
-----Message d'origine-----
Salut Philippe,
En espérant que tout soit clair :
1. Copie cette zone :
Sub Mettre_A1_Dans_Résumé()
Sheets("Résumé").[a1] = Sheets("UN").[a1]
End Sub
Sub Nouvelle_Feuille()
ActiveWorkbook.Sheets.Add
Call Mettre_A1_Dans_Résumé
End Sub
2. Combinaison de touches Alt+F11
Tu devrais alors te retrouver sur une feuille
vierge d'un module standard.
3. Colle
4. Reviens sur ta feuille et Alt+F8
Tu devrais voir le nom des deux macros.
5. Sélectionne «Nouvelle_Feuille», clique
sur «Options» et entre la touche de raccourci
de ton choix. De préférence une lettre majuscule
pour éviter de tomber sur un raccourci d'Excel.
6. Tu peux maintenant appeler la macro par
Ctrl+Maj+(la lettre choisi)
Et alors, ça va ?
Serge
"Philippe" <anonymous@discussions.microsoft.com> a écrit
dans le message de
news: 1490701c3f952$6d0451e0$a401280a@phx.gbl...
Merci, mais ou coller ce code, dans la cellule, dans la
feuille ? je ne connais pas bien VBA.
Merci d'avance
Philippe
-----Message d'origine-----
Salut Philippe,
Un exemple :
Sur une feuille nommée «UN», tu as
la formule ±+C1 en A1.
Tu voudrais obtenir la valeur (pas la formule) de
cette somme dans la cellule A1 de la feuille «résumé»
à chaque fois que tu ajoutes une feuille.
Alors tu pourrais utiliser les deux macros suivantes :
1.
Sub Mettre_A1_Dans_Résumé()
Sheets("Résumé").[a1] = Sheets("UN").[a1]
End Sub
2.
Sub Nouvelle_Feuille()
ActiveWorkbook.Sheets.Add
Call Mettre_A1_Dans_Résumé
End Sub
Tu associes alors un raccourci clavier à
la macro «Nouvell_Feuille», par exemple
Ctrl+Maj+A.
Et quand tu veux insérer une nouvelle
feuille, fais-le avec la touche de raccourci.
Ça devrait aller. Qu'en penses-tu ?
Serge
.
.
-----Message d'origine-----
Salut Philippe,
En espérant que tout soit clair :
1. Copie cette zone :
Sub Mettre_A1_Dans_Résumé()
Sheets("Résumé").[a1] = Sheets("UN").[a1]
End Sub
Sub Nouvelle_Feuille()
ActiveWorkbook.Sheets.Add
Call Mettre_A1_Dans_Résumé
End Sub
2. Combinaison de touches Alt+F11
Tu devrais alors te retrouver sur une feuille
vierge d'un module standard.
3. Colle
4. Reviens sur ta feuille et Alt+F8
Tu devrais voir le nom des deux macros.
5. Sélectionne «Nouvelle_Feuille», clique
sur «Options» et entre la touche de raccourci
de ton choix. De préférence une lettre majuscule
pour éviter de tomber sur un raccourci d'Excel.
6. Tu peux maintenant appeler la macro par
Ctrl+Maj+(la lettre choisi)
Et alors, ça va ?
Serge
"Philippe" a écrit
dans le message de
news: 1490701c3f952$6d0451e0$
Merci, mais ou coller ce code, dans la cellule, dans la
feuille ? je ne connais pas bien VBA.
Merci d'avance
Philippe-----Message d'origine-----
Salut Philippe,
Un exemple :
Sur une feuille nommée «UN», tu as
la formule ±+C1 en A1.
Tu voudrais obtenir la valeur (pas la formule) de
cette somme dans la cellule A1 de la feuille «résumé»
à chaque fois que tu ajoutes une feuille.
Alors tu pourrais utiliser les deux macros suivantes :
1.
Sub Mettre_A1_Dans_Résumé()
Sheets("Résumé").[a1] = Sheets("UN").[a1]
End Sub
2.
Sub Nouvelle_Feuille()
ActiveWorkbook.Sheets.Add
Call Mettre_A1_Dans_Résumé
End Sub
Tu associes alors un raccourci clavier à
la macro «Nouvell_Feuille», par exemple
Ctrl+Maj+A.
Et quand tu veux insérer une nouvelle
feuille, fais-le avec la touche de raccourci.
Ça devrait aller. Qu'en penses-tu ?
Serge
.
.
Bonjour Garnote,
Dans le ThisWorkbook d'un classeur, je viens(!) de découvrir un nouvel
événement à l'ajout d'une nouvelle feuille,
penses-tu que cela pourrait t'aider ?
'---------------------
Private Sub Workbook_NewSheet(ByVal Sh As Object)
End Sub
'---------------------
Salutations!
"garnote" a écrit dans le message de
news:Ua4_b.69780$
La bonne idée, c'est que je te fasse parvenir mon
classeur- exemple. Le veux-tu ?
Serge
"Philippe" a écrit dans le message
de
news: 1495501c3f959$b609d890$
Il y a du mieux, j'ai nommée ma feui1 "UN" mais dans le
résumé je n'ai toujours pas la somme des feuilles qui se
multiplies.
Philippe-----Message d'origine-----
Salut Philippe,
En espérant que tout soit clair :
1. Copie cette zone :
Sub Mettre_A1_Dans_Résumé()
Sheets("Résumé").[a1] = Sheets("UN").[a1]
End Sub
Sub Nouvelle_Feuille()
ActiveWorkbook.Sheets.Add
Call Mettre_A1_Dans_Résumé
End Sub
2. Combinaison de touches Alt+F11
Tu devrais alors te retrouver sur une feuille
vierge d'un module standard.
3. Colle
4. Reviens sur ta feuille et Alt+F8
Tu devrais voir le nom des deux macros.
5. Sélectionne «Nouvelle_Feuille», clique
sur «Options» et entre la touche de raccourci
de ton choix. De préférence une lettre majuscule
pour éviter de tomber sur un raccourci d'Excel.
6. Tu peux maintenant appeler la macro par
Ctrl+Maj+(la lettre choisi)
Et alors, ça va ?
Serge
"Philippe" a écrit
dans le message denews: 1490701c3f952$6d0451e0$
Merci, mais ou coller ce code, dans la cellule, dans la
feuille ? je ne connais pas bien VBA.
Merci d'avance
Philippe-----Message d'origine-----
Salut Philippe,
Un exemple :
Sur une feuille nommée «UN», tu as
la formule ±+C1 en A1.
Tu voudrais obtenir la valeur (pas la formule) de
cette somme dans la cellule A1 de la feuille «résumé»
à chaque fois que tu ajoutes une feuille.
Alors tu pourrais utiliser les deux macros suivantes :
1.
Sub Mettre_A1_Dans_Résumé()
Sheets("Résumé").[a1] = Sheets("UN").[a1]
End Sub
2.
Sub Nouvelle_Feuille()
ActiveWorkbook.Sheets.Add
Call Mettre_A1_Dans_Résumé
End Sub
Tu associes alors un raccourci clavier à
la macro «Nouvell_Feuille», par exemple
Ctrl+Maj+A.
Et quand tu veux insérer une nouvelle
feuille, fais-le avec la touche de raccourci.
Ça devrait aller. Qu'en penses-tu ?
Serge
.
.
Bonjour Garnote,
Dans le ThisWorkbook d'un classeur, je viens(!) de découvrir un nouvel
événement à l'ajout d'une nouvelle feuille,
penses-tu que cela pourrait t'aider ?
'---------------------
Private Sub Workbook_NewSheet(ByVal Sh As Object)
End Sub
'---------------------
Salutations!
"garnote" <rien@absent.net> a écrit dans le message de
news:Ua4_b.69780$2g.64115@charlie.risq.qc.ca...
La bonne idée, c'est que je te fasse parvenir mon
classeur- exemple. Le veux-tu ?
Serge
"Philippe" <anonymous@discussions.microsoft.com> a écrit dans le message
de
news: 1495501c3f959$b609d890$a401280a@phx.gbl...
Il y a du mieux, j'ai nommée ma feui1 "UN" mais dans le
résumé je n'ai toujours pas la somme des feuilles qui se
multiplies.
Philippe
-----Message d'origine-----
Salut Philippe,
En espérant que tout soit clair :
1. Copie cette zone :
Sub Mettre_A1_Dans_Résumé()
Sheets("Résumé").[a1] = Sheets("UN").[a1]
End Sub
Sub Nouvelle_Feuille()
ActiveWorkbook.Sheets.Add
Call Mettre_A1_Dans_Résumé
End Sub
2. Combinaison de touches Alt+F11
Tu devrais alors te retrouver sur une feuille
vierge d'un module standard.
3. Colle
4. Reviens sur ta feuille et Alt+F8
Tu devrais voir le nom des deux macros.
5. Sélectionne «Nouvelle_Feuille», clique
sur «Options» et entre la touche de raccourci
de ton choix. De préférence une lettre majuscule
pour éviter de tomber sur un raccourci d'Excel.
6. Tu peux maintenant appeler la macro par
Ctrl+Maj+(la lettre choisi)
Et alors, ça va ?
Serge
"Philippe" <anonymous@discussions.microsoft.com> a écrit
dans le message de
news: 1490701c3f952$6d0451e0$a401280a@phx.gbl...
Merci, mais ou coller ce code, dans la cellule, dans la
feuille ? je ne connais pas bien VBA.
Merci d'avance
Philippe
-----Message d'origine-----
Salut Philippe,
Un exemple :
Sur une feuille nommée «UN», tu as
la formule ±+C1 en A1.
Tu voudrais obtenir la valeur (pas la formule) de
cette somme dans la cellule A1 de la feuille «résumé»
à chaque fois que tu ajoutes une feuille.
Alors tu pourrais utiliser les deux macros suivantes :
1.
Sub Mettre_A1_Dans_Résumé()
Sheets("Résumé").[a1] = Sheets("UN").[a1]
End Sub
2.
Sub Nouvelle_Feuille()
ActiveWorkbook.Sheets.Add
Call Mettre_A1_Dans_Résumé
End Sub
Tu associes alors un raccourci clavier à
la macro «Nouvell_Feuille», par exemple
Ctrl+Maj+A.
Et quand tu veux insérer une nouvelle
feuille, fais-le avec la touche de raccourci.
Ça devrait aller. Qu'en penses-tu ?
Serge
.
.
Bonjour Garnote,
Dans le ThisWorkbook d'un classeur, je viens(!) de découvrir un nouvel
événement à l'ajout d'une nouvelle feuille,
penses-tu que cela pourrait t'aider ?
'---------------------
Private Sub Workbook_NewSheet(ByVal Sh As Object)
End Sub
'---------------------
Salutations!
"garnote" a écrit dans le message de
news:Ua4_b.69780$
La bonne idée, c'est que je te fasse parvenir mon
classeur- exemple. Le veux-tu ?
Serge
"Philippe" a écrit dans le message
de
news: 1495501c3f959$b609d890$
Il y a du mieux, j'ai nommée ma feui1 "UN" mais dans le
résumé je n'ai toujours pas la somme des feuilles qui se
multiplies.
Philippe-----Message d'origine-----
Salut Philippe,
En espérant que tout soit clair :
1. Copie cette zone :
Sub Mettre_A1_Dans_Résumé()
Sheets("Résumé").[a1] = Sheets("UN").[a1]
End Sub
Sub Nouvelle_Feuille()
ActiveWorkbook.Sheets.Add
Call Mettre_A1_Dans_Résumé
End Sub
2. Combinaison de touches Alt+F11
Tu devrais alors te retrouver sur une feuille
vierge d'un module standard.
3. Colle
4. Reviens sur ta feuille et Alt+F8
Tu devrais voir le nom des deux macros.
5. Sélectionne «Nouvelle_Feuille», clique
sur «Options» et entre la touche de raccourci
de ton choix. De préférence une lettre majuscule
pour éviter de tomber sur un raccourci d'Excel.
6. Tu peux maintenant appeler la macro par
Ctrl+Maj+(la lettre choisi)
Et alors, ça va ?
Serge
"Philippe" a écrit
dans le message denews: 1490701c3f952$6d0451e0$
Merci, mais ou coller ce code, dans la cellule, dans la
feuille ? je ne connais pas bien VBA.
Merci d'avance
Philippe-----Message d'origine-----
Salut Philippe,
Un exemple :
Sur une feuille nommée «UN», tu as
la formule ±+C1 en A1.
Tu voudrais obtenir la valeur (pas la formule) de
cette somme dans la cellule A1 de la feuille «résumé»
à chaque fois que tu ajoutes une feuille.
Alors tu pourrais utiliser les deux macros suivantes :
1.
Sub Mettre_A1_Dans_Résumé()
Sheets("Résumé").[a1] = Sheets("UN").[a1]
End Sub
2.
Sub Nouvelle_Feuille()
ActiveWorkbook.Sheets.Add
Call Mettre_A1_Dans_Résumé
End Sub
Tu associes alors un raccourci clavier à
la macro «Nouvell_Feuille», par exemple
Ctrl+Maj+A.
Et quand tu veux insérer une nouvelle
feuille, fais-le avec la touche de raccourci.
Ça devrait aller. Qu'en penses-tu ?
Serge
.
.
-----Message d'origine-----
La bonne idée, c'est que je te fasse parvenir mon
classeur- exemple. Le veux-tu ?
Serge
"Philippe" a écrit
dans le message de
news: 1495501c3f959$b609d890$
Il y a du mieux, j'ai nommée ma feui1 "UN" mais dans le
résumé je n'ai toujours pas la somme des feuilles qui se
multiplies.
Philippe-----Message d'origine-----
Salut Philippe,
En espérant que tout soit clair :
1. Copie cette zone :
Sub Mettre_A1_Dans_Résumé()
Sheets("Résumé").[a1] = Sheets("UN").[a1]
End Sub
Sub Nouvelle_Feuille()
ActiveWorkbook.Sheets.Add
Call Mettre_A1_Dans_Résumé
End Sub
2. Combinaison de touches Alt+F11
Tu devrais alors te retrouver sur une feuille
vierge d'un module standard.
3. Colle
4. Reviens sur ta feuille et Alt+F8
Tu devrais voir le nom des deux macros.
5. Sélectionne «Nouvelle_Feuille», clique
sur «Options» et entre la touche de raccourci
de ton choix. De préférence une lettre majuscule
pour éviter de tomber sur un raccourci d'Excel.
6. Tu peux maintenant appeler la macro par
Ctrl+Maj+(la lettre choisi)
Et alors, ça va ?
Serge
"Philippe" a écrit
dans le message denews: 1490701c3f952$6d0451e0$
Merci, mais ou coller ce code, dans la cellule, dans la
feuille ? je ne connais pas bien VBA.
Merci d'avance
Philippe-----Message d'origine-----
Salut Philippe,
Un exemple :
Sur une feuille nommée «UN», tu as
la formule ±+C1 en A1.
Tu voudrais obtenir la valeur (pas la formule) de
cette somme dans la cellule A1 de la feuille «résumé»
à chaque fois que tu ajoutes une feuille.
Alors tu pourrais utiliser les deux macros suivantes :
1.
Sub Mettre_A1_Dans_Résumé()
Sheets("Résumé").[a1] = Sheets("UN").[a1]
End Sub
2.
Sub Nouvelle_Feuille()
ActiveWorkbook.Sheets.Add
Call Mettre_A1_Dans_Résumé
End Sub
Tu associes alors un raccourci clavier à
la macro «Nouvell_Feuille», par exemple
Ctrl+Maj+A.
Et quand tu veux insérer une nouvelle
feuille, fais-le avec la touche de raccourci.
Ça devrait aller. Qu'en penses-tu ?
Serge
.
.
.
-----Message d'origine-----
La bonne idée, c'est que je te fasse parvenir mon
classeur- exemple. Le veux-tu ?
Serge
"Philippe" <anonymous@discussions.microsoft.com> a écrit
dans le message de
news: 1495501c3f959$b609d890$a401280a@phx.gbl...
Il y a du mieux, j'ai nommée ma feui1 "UN" mais dans le
résumé je n'ai toujours pas la somme des feuilles qui se
multiplies.
Philippe
-----Message d'origine-----
Salut Philippe,
En espérant que tout soit clair :
1. Copie cette zone :
Sub Mettre_A1_Dans_Résumé()
Sheets("Résumé").[a1] = Sheets("UN").[a1]
End Sub
Sub Nouvelle_Feuille()
ActiveWorkbook.Sheets.Add
Call Mettre_A1_Dans_Résumé
End Sub
2. Combinaison de touches Alt+F11
Tu devrais alors te retrouver sur une feuille
vierge d'un module standard.
3. Colle
4. Reviens sur ta feuille et Alt+F8
Tu devrais voir le nom des deux macros.
5. Sélectionne «Nouvelle_Feuille», clique
sur «Options» et entre la touche de raccourci
de ton choix. De préférence une lettre majuscule
pour éviter de tomber sur un raccourci d'Excel.
6. Tu peux maintenant appeler la macro par
Ctrl+Maj+(la lettre choisi)
Et alors, ça va ?
Serge
"Philippe" <anonymous@discussions.microsoft.com> a écrit
dans le message de
news: 1490701c3f952$6d0451e0$a401280a@phx.gbl...
Merci, mais ou coller ce code, dans la cellule, dans la
feuille ? je ne connais pas bien VBA.
Merci d'avance
Philippe
-----Message d'origine-----
Salut Philippe,
Un exemple :
Sur une feuille nommée «UN», tu as
la formule ±+C1 en A1.
Tu voudrais obtenir la valeur (pas la formule) de
cette somme dans la cellule A1 de la feuille «résumé»
à chaque fois que tu ajoutes une feuille.
Alors tu pourrais utiliser les deux macros suivantes :
1.
Sub Mettre_A1_Dans_Résumé()
Sheets("Résumé").[a1] = Sheets("UN").[a1]
End Sub
2.
Sub Nouvelle_Feuille()
ActiveWorkbook.Sheets.Add
Call Mettre_A1_Dans_Résumé
End Sub
Tu associes alors un raccourci clavier à
la macro «Nouvell_Feuille», par exemple
Ctrl+Maj+A.
Et quand tu veux insérer une nouvelle
feuille, fais-le avec la touche de raccourci.
Ça devrait aller. Qu'en penses-tu ?
Serge
.
.
.
-----Message d'origine-----
La bonne idée, c'est que je te fasse parvenir mon
classeur- exemple. Le veux-tu ?
Serge
"Philippe" a écrit
dans le message de
news: 1495501c3f959$b609d890$
Il y a du mieux, j'ai nommée ma feui1 "UN" mais dans le
résumé je n'ai toujours pas la somme des feuilles qui se
multiplies.
Philippe-----Message d'origine-----
Salut Philippe,
En espérant que tout soit clair :
1. Copie cette zone :
Sub Mettre_A1_Dans_Résumé()
Sheets("Résumé").[a1] = Sheets("UN").[a1]
End Sub
Sub Nouvelle_Feuille()
ActiveWorkbook.Sheets.Add
Call Mettre_A1_Dans_Résumé
End Sub
2. Combinaison de touches Alt+F11
Tu devrais alors te retrouver sur une feuille
vierge d'un module standard.
3. Colle
4. Reviens sur ta feuille et Alt+F8
Tu devrais voir le nom des deux macros.
5. Sélectionne «Nouvelle_Feuille», clique
sur «Options» et entre la touche de raccourci
de ton choix. De préférence une lettre majuscule
pour éviter de tomber sur un raccourci d'Excel.
6. Tu peux maintenant appeler la macro par
Ctrl+Maj+(la lettre choisi)
Et alors, ça va ?
Serge
"Philippe" a écrit
dans le message denews: 1490701c3f952$6d0451e0$
Merci, mais ou coller ce code, dans la cellule, dans la
feuille ? je ne connais pas bien VBA.
Merci d'avance
Philippe-----Message d'origine-----
Salut Philippe,
Un exemple :
Sur une feuille nommée «UN», tu as
la formule ±+C1 en A1.
Tu voudrais obtenir la valeur (pas la formule) de
cette somme dans la cellule A1 de la feuille «résumé»
à chaque fois que tu ajoutes une feuille.
Alors tu pourrais utiliser les deux macros suivantes :
1.
Sub Mettre_A1_Dans_Résumé()
Sheets("Résumé").[a1] = Sheets("UN").[a1]
End Sub
2.
Sub Nouvelle_Feuille()
ActiveWorkbook.Sheets.Add
Call Mettre_A1_Dans_Résumé
End Sub
Tu associes alors un raccourci clavier à
la macro «Nouvell_Feuille», par exemple
Ctrl+Maj+A.
Et quand tu veux insérer une nouvelle
feuille, fais-le avec la touche de raccourci.
Ça devrait aller. Qu'en penses-tu ?
Serge
.
.
.
