Je voudrai par l'action sur un bouton "connecté" à une macro copier une
cellule d'une feuille dans la première cellule vide d'une colonne d'une autre
feuille.
L'objectif est de prendre en fait les 8 dernières valeurs de la colonne en
question pour faire un graphique. Je veux néanmoins conserver l'ensemble des
valeurs dans le tableau.
Pour cette dernière opération si j'ai bien compris il faut utiliser la
commande décaler.
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
Daniel
Bonjour. Le code suivant ne fonctionne que si les deux premières cellules de la colonne cible sont remplies. Sinon ajouter des tests.
Private Sub CommandButton1_Click() Range("A1").Copy Sheets("Feuil2").Range("A" & _ Sheets("Feuil2").Range("A1").End(xlDown).Row + 1) End Sub
Cordialement. Daniel "titus91" a écrit dans le message de news:
Je voudrai par l'action sur un bouton "connecté" à une macro copier une cellule d'une feuille dans la première cellule vide d'une colonne d'une autre feuille. L'objectif est de prendre en fait les 8 dernières valeurs de la colonne en question pour faire un graphique. Je veux néanmoins conserver l'ensemble des valeurs dans le tableau. Pour cette dernière opération si j'ai bien compris il faut utiliser la commande décaler.
Bonjour.
Le code suivant ne fonctionne que si les deux premières cellules de la
colonne cible sont remplies. Sinon ajouter des tests.
Private Sub CommandButton1_Click()
Range("A1").Copy Sheets("Feuil2").Range("A" & _
Sheets("Feuil2").Range("A1").End(xlDown).Row + 1)
End Sub
Cordialement.
Daniel
"titus91" <titus91@discussions.microsoft.com> a écrit dans le message de
news: EC776A70-8BC4-493B-9880-E277ACC42CA8@microsoft.com...
Je voudrai par l'action sur un bouton "connecté" à une macro copier une
cellule d'une feuille dans la première cellule vide d'une colonne d'une
autre
feuille.
L'objectif est de prendre en fait les 8 dernières valeurs de la colonne en
question pour faire un graphique. Je veux néanmoins conserver l'ensemble
des
valeurs dans le tableau.
Pour cette dernière opération si j'ai bien compris il faut utiliser la
commande décaler.
Bonjour. Le code suivant ne fonctionne que si les deux premières cellules de la colonne cible sont remplies. Sinon ajouter des tests.
Private Sub CommandButton1_Click() Range("A1").Copy Sheets("Feuil2").Range("A" & _ Sheets("Feuil2").Range("A1").End(xlDown).Row + 1) End Sub
Cordialement. Daniel "titus91" a écrit dans le message de news:
Je voudrai par l'action sur un bouton "connecté" à une macro copier une cellule d'une feuille dans la première cellule vide d'une colonne d'une autre feuille. L'objectif est de prendre en fait les 8 dernières valeurs de la colonne en question pour faire un graphique. Je veux néanmoins conserver l'ensemble des valeurs dans le tableau. Pour cette dernière opération si j'ai bien compris il faut utiliser la commande décaler.
titus91
D'abord merci pour la réponse mais je ne la comprend pas .... je ne suis absolument pas un expert donc j'explique à nouveau. J'ai une première feuille ou l'on doit rentrer dans différentes cellules des données. SUr cette même feuille j'ai trois graphiques qui doivent reprendre les valeurs rentrées et les 7 dernières rentrées avant. Pour faire ca j'ai mis un bouton avec une macro ....je copie les valeurs de la première feuille dans une seconde feuille dans un tableau. Premier problème comment copier une cellule de la première feuille dans une colonne de la deuixème feuille sur la première ligne vide dela fin de la colonne. Deuxième problème mais je crois svoir comment faire c'est de ne prendre que les 8 dernières valeurs de la colonne pour les faire apparaitre dans le graphique : avec la commande décaler. Merci d'avance
Bonjour. Le code suivant ne fonctionne que si les deux premières cellules de la colonne cible sont remplies. Sinon ajouter des tests.
Private Sub CommandButton1_Click() Range("A1").Copy Sheets("Feuil2").Range("A" & _ Sheets("Feuil2").Range("A1").End(xlDown).Row + 1) End Sub
Cordialement. Daniel "titus91" a écrit dans le message de news:
Je voudrai par l'action sur un bouton "connecté" à une macro copier une cellule d'une feuille dans la première cellule vide d'une colonne d'une autre feuille. L'objectif est de prendre en fait les 8 dernières valeurs de la colonne en question pour faire un graphique. Je veux néanmoins conserver l'ensemble des valeurs dans le tableau. Pour cette dernière opération si j'ai bien compris il faut utiliser la commande décaler.
D'abord merci pour la réponse mais je ne la comprend pas .... je ne suis
absolument pas un expert donc j'explique à nouveau.
J'ai une première feuille ou l'on doit rentrer dans différentes cellules des
données. SUr cette même feuille j'ai trois graphiques qui doivent reprendre
les valeurs rentrées et les 7 dernières rentrées avant.
Pour faire ca j'ai mis un bouton avec une macro ....je copie les valeurs de
la première feuille dans une seconde feuille dans un tableau.
Premier problème comment copier une cellule de la première feuille dans une
colonne de la deuixème feuille sur la première ligne vide dela fin de la
colonne.
Deuxième problème mais je crois svoir comment faire c'est de ne prendre que
les 8 dernières valeurs de la colonne pour les faire apparaitre dans le
graphique : avec la commande décaler.
Merci d'avance
Bonjour.
Le code suivant ne fonctionne que si les deux premières cellules de la
colonne cible sont remplies. Sinon ajouter des tests.
Private Sub CommandButton1_Click()
Range("A1").Copy Sheets("Feuil2").Range("A" & _
Sheets("Feuil2").Range("A1").End(xlDown).Row + 1)
End Sub
Cordialement.
Daniel
"titus91" <titus91@discussions.microsoft.com> a écrit dans le message de
news: EC776A70-8BC4-493B-9880-E277ACC42CA8@microsoft.com...
Je voudrai par l'action sur un bouton "connecté" à une macro copier une
cellule d'une feuille dans la première cellule vide d'une colonne d'une
autre
feuille.
L'objectif est de prendre en fait les 8 dernières valeurs de la colonne en
question pour faire un graphique. Je veux néanmoins conserver l'ensemble
des
valeurs dans le tableau.
Pour cette dernière opération si j'ai bien compris il faut utiliser la
commande décaler.
D'abord merci pour la réponse mais je ne la comprend pas .... je ne suis absolument pas un expert donc j'explique à nouveau. J'ai une première feuille ou l'on doit rentrer dans différentes cellules des données. SUr cette même feuille j'ai trois graphiques qui doivent reprendre les valeurs rentrées et les 7 dernières rentrées avant. Pour faire ca j'ai mis un bouton avec une macro ....je copie les valeurs de la première feuille dans une seconde feuille dans un tableau. Premier problème comment copier une cellule de la première feuille dans une colonne de la deuixème feuille sur la première ligne vide dela fin de la colonne. Deuxième problème mais je crois svoir comment faire c'est de ne prendre que les 8 dernières valeurs de la colonne pour les faire apparaitre dans le graphique : avec la commande décaler. Merci d'avance
Bonjour. Le code suivant ne fonctionne que si les deux premières cellules de la colonne cible sont remplies. Sinon ajouter des tests.
Private Sub CommandButton1_Click() Range("A1").Copy Sheets("Feuil2").Range("A" & _ Sheets("Feuil2").Range("A1").End(xlDown).Row + 1) End Sub
Cordialement. Daniel "titus91" a écrit dans le message de news:
Je voudrai par l'action sur un bouton "connecté" à une macro copier une cellule d'une feuille dans la première cellule vide d'une colonne d'une autre feuille. L'objectif est de prendre en fait les 8 dernières valeurs de la colonne en question pour faire un graphique. Je veux néanmoins conserver l'ensemble des valeurs dans le tableau. Pour cette dernière opération si j'ai bien compris il faut utiliser la commande décaler.
Daniel
La macro attachée au bouton ne copie que la cellule A1 sur la seconde feuille. Si par exemple, tu veux copier les cellules A1:A8, modifie la ligne : Range("A1").Copy Sheets("Feuil2").Range("A" & _ par : Range("A1:A8").Copy Sheets("Feuil2").Range("A" & _ pour utiliser les 8 derniers cellules de ta colonne, nomme une zone par Insertion / Nom / Définir en lui donnant le nom que tu veux et en entrant dans la zone "fait référence à" la formule suivante : ÞCALER(A1;NBVAL(A:A)-8;0;8;1). Dans ton graphique, fais référence au nom que tu as donné à cette zone. Si tu as toujours des problèmes, tu peux mettre ton classeur à disposition sur http://cjoint.com. Daniel "titus91" a écrit dans le message de news:
D'abord merci pour la réponse mais je ne la comprend pas .... je ne suis absolument pas un expert donc j'explique à nouveau. J'ai une première feuille ou l'on doit rentrer dans différentes cellules des données. SUr cette même feuille j'ai trois graphiques qui doivent reprendre les valeurs rentrées et les 7 dernières rentrées avant. Pour faire ca j'ai mis un bouton avec une macro ....je copie les valeurs de la première feuille dans une seconde feuille dans un tableau. Premier problème comment copier une cellule de la première feuille dans une colonne de la deuixème feuille sur la première ligne vide dela fin de la colonne. Deuxième problème mais je crois svoir comment faire c'est de ne prendre que les 8 dernières valeurs de la colonne pour les faire apparaitre dans le graphique : avec la commande décaler. Merci d'avance
Bonjour. Le code suivant ne fonctionne que si les deux premières cellules de la colonne cible sont remplies. Sinon ajouter des tests.
Private Sub CommandButton1_Click() Range("A1").Copy Sheets("Feuil2").Range("A" & _ Sheets("Feuil2").Range("A1").End(xlDown).Row + 1) End Sub
Cordialement. Daniel "titus91" a écrit dans le message de news:
Je voudrai par l'action sur un bouton "connecté" à une macro copier une cellule d'une feuille dans la première cellule vide d'une colonne d'une autre feuille. L'objectif est de prendre en fait les 8 dernières valeurs de la colonne en question pour faire un graphique. Je veux néanmoins conserver l'ensemble des valeurs dans le tableau. Pour cette dernière opération si j'ai bien compris il faut utiliser la commande décaler.
La macro attachée au bouton ne copie que la cellule A1 sur la seconde
feuille. Si par exemple, tu veux copier les cellules A1:A8, modifie la ligne
:
Range("A1").Copy Sheets("Feuil2").Range("A" & _
par :
Range("A1:A8").Copy Sheets("Feuil2").Range("A" & _
pour utiliser les 8 derniers cellules de ta colonne, nomme une zone par
Insertion / Nom / Définir en lui donnant le nom que tu veux et en entrant
dans la zone "fait référence à" la formule suivante :
ÞCALER(A1;NBVAL(A:A)-8;0;8;1).
Dans ton graphique, fais référence au nom que tu as donné à cette zone.
Si tu as toujours des problèmes, tu peux mettre ton classeur à disposition
sur http://cjoint.com.
Daniel
"titus91" <titus91@discussions.microsoft.com> a écrit dans le message de
news: 2C040F6B-BFD0-4969-8E29-E88DE66DDFE7@microsoft.com...
D'abord merci pour la réponse mais je ne la comprend pas .... je ne suis
absolument pas un expert donc j'explique à nouveau.
J'ai une première feuille ou l'on doit rentrer dans différentes cellules
des
données. SUr cette même feuille j'ai trois graphiques qui doivent
reprendre
les valeurs rentrées et les 7 dernières rentrées avant.
Pour faire ca j'ai mis un bouton avec une macro ....je copie les valeurs
de
la première feuille dans une seconde feuille dans un tableau.
Premier problème comment copier une cellule de la première feuille dans
une
colonne de la deuixème feuille sur la première ligne vide dela fin de la
colonne.
Deuxième problème mais je crois svoir comment faire c'est de ne prendre
que
les 8 dernières valeurs de la colonne pour les faire apparaitre dans le
graphique : avec la commande décaler.
Merci d'avance
Bonjour.
Le code suivant ne fonctionne que si les deux premières cellules de la
colonne cible sont remplies. Sinon ajouter des tests.
Private Sub CommandButton1_Click()
Range("A1").Copy Sheets("Feuil2").Range("A" & _
Sheets("Feuil2").Range("A1").End(xlDown).Row + 1)
End Sub
Cordialement.
Daniel
"titus91" <titus91@discussions.microsoft.com> a écrit dans le message de
news: EC776A70-8BC4-493B-9880-E277ACC42CA8@microsoft.com...
Je voudrai par l'action sur un bouton "connecté" à une macro copier une
cellule d'une feuille dans la première cellule vide d'une colonne d'une
autre
feuille.
L'objectif est de prendre en fait les 8 dernières valeurs de la colonne
en
question pour faire un graphique. Je veux néanmoins conserver
l'ensemble
des
valeurs dans le tableau.
Pour cette dernière opération si j'ai bien compris il faut utiliser la
commande décaler.
La macro attachée au bouton ne copie que la cellule A1 sur la seconde feuille. Si par exemple, tu veux copier les cellules A1:A8, modifie la ligne : Range("A1").Copy Sheets("Feuil2").Range("A" & _ par : Range("A1:A8").Copy Sheets("Feuil2").Range("A" & _ pour utiliser les 8 derniers cellules de ta colonne, nomme une zone par Insertion / Nom / Définir en lui donnant le nom que tu veux et en entrant dans la zone "fait référence à" la formule suivante : ÞCALER(A1;NBVAL(A:A)-8;0;8;1). Dans ton graphique, fais référence au nom que tu as donné à cette zone. Si tu as toujours des problèmes, tu peux mettre ton classeur à disposition sur http://cjoint.com. Daniel "titus91" a écrit dans le message de news:
D'abord merci pour la réponse mais je ne la comprend pas .... je ne suis absolument pas un expert donc j'explique à nouveau. J'ai une première feuille ou l'on doit rentrer dans différentes cellules des données. SUr cette même feuille j'ai trois graphiques qui doivent reprendre les valeurs rentrées et les 7 dernières rentrées avant. Pour faire ca j'ai mis un bouton avec une macro ....je copie les valeurs de la première feuille dans une seconde feuille dans un tableau. Premier problème comment copier une cellule de la première feuille dans une colonne de la deuixème feuille sur la première ligne vide dela fin de la colonne. Deuxième problème mais je crois svoir comment faire c'est de ne prendre que les 8 dernières valeurs de la colonne pour les faire apparaitre dans le graphique : avec la commande décaler. Merci d'avance
Bonjour. Le code suivant ne fonctionne que si les deux premières cellules de la colonne cible sont remplies. Sinon ajouter des tests.
Private Sub CommandButton1_Click() Range("A1").Copy Sheets("Feuil2").Range("A" & _ Sheets("Feuil2").Range("A1").End(xlDown).Row + 1) End Sub
Cordialement. Daniel "titus91" a écrit dans le message de news:
Je voudrai par l'action sur un bouton "connecté" à une macro copier une cellule d'une feuille dans la première cellule vide d'une colonne d'une autre feuille. L'objectif est de prendre en fait les 8 dernières valeurs de la colonne en question pour faire un graphique. Je veux néanmoins conserver l'ensemble des valeurs dans le tableau. Pour cette dernière opération si j'ai bien compris il faut utiliser la commande décaler.
titus91
Je craque alors j'ai pris une pose car depuis deux jours je bloque complètement. Je viens de découvrir cette ressource alors j'en profite un peu....merci J'ai coller mon fichier car je n'arrive toujours pas à faire apparaitre les graphes comme je le voudrais. J'ai réussi à copier les valeurs dans la seconde feuille mais maintenant je n'arrive pas à faire apparaitre les graphiques avec les 8 dernières saisies.... Au secours j'ai besoin d'aide Merci d'avance http://cjoint.com/?lmq65XAsgc
Je craque alors j'ai pris une pose car depuis deux jours je bloque
complètement. Je viens de découvrir cette ressource alors j'en profite un
peu....merci
J'ai coller mon fichier car je n'arrive toujours pas à faire apparaitre les
graphes comme je le voudrais.
J'ai réussi à copier les valeurs dans la seconde feuille mais maintenant je
n'arrive pas à faire apparaitre les graphiques avec les 8 dernières
saisies....
Au secours j'ai besoin d'aide
Merci d'avance
http://cjoint.com/?lmq65XAsgc
Je craque alors j'ai pris une pose car depuis deux jours je bloque complètement. Je viens de découvrir cette ressource alors j'en profite un peu....merci J'ai coller mon fichier car je n'arrive toujours pas à faire apparaitre les graphes comme je le voudrais. J'ai réussi à copier les valeurs dans la seconde feuille mais maintenant je n'arrive pas à faire apparaitre les graphiques avec les 8 dernières saisies.... Au secours j'ai besoin d'aide Merci d'avance http://cjoint.com/?lmq65XAsgc
