Discussion :

[robin74]

Bonjour tout le monde,

Je dois mettre à jour un tableau excel en début de mois en important des données depuis un fichier d'internet.
Ce que j'aimerais faire c'est créer une macro qui calcule mes données et qui les affichent par exemple dans la colonne à A1 au premier appui sur le bouton puis dans la colonne B1 au 2 ème appui.
Je ne sais pas comment repeter l'appui sur le bouton
le bouton est un bouton de commande comportant le code de ma macro.
En gros au début du mois d'avril j'appuie sur le bouton les résultats se calculent et s'affichent dans la cellule A1 puis au début du mois de mai j'appuie sur le bouton et les résultats s'affichent dans la cellule B1 ainsi de suite pour les 10 autres mois de l'année. Mon code fonctionne mais que pour la première cellule j'arrive pas pour les autres ...
Merci d'avance.

Mon code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Sub Pourcentage_frappe()
 
'On travaille dans la feuille export_perform_moyens
    Windows("export_perform_moyens.xls").Activate
    Dim Num As Currency
    Num = Range("W15").Value
 
' On travaille désormais dans la feuille plan de progrès
    Windows("Plan de progres FY2015.xls").Activate
 
    Range("G48").Select
    Selection.Value = Num
    Selection.NumberFormat = "General"
 
End Sub

[Invité]

Salut,

Il faut que tu stockes l'état du bouton de commande.
De 1 à 12 par exemple dans un onglet spécifique ou ailleurs pour que la valeur stockée corresponde au numéro de la colonne.

[robin74]

Merci de ta réponse j'ai déjà eu ce conseil or je ne vois absolument pas comment faire ...

[Invité]

Par exemple:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Option Explicit
 
Private Sub cmbMois_Click()
  Worksheets("DONNEES").Cells(1, Worksheets("VALEUR").[A1]) = "AAA"
  Worksheets("VALEUR").[A1] = Worksheets("VALEUR").[A1] + 1
End Sub

Avec en A1 dans l'onglet "VALEUR" la valeur du bouton de commande qui est initialisée à 1 au départ.
Ensuite il suffit d'incrémenter cette valeur qui correspond alors au numéro de colonne.

Les données à afficher sont dans l'onglet "DONNEES" et sur la première ligne dans cet exemple.

[robin74]

Donc si j'ai bien compris avec cet exemple dans l'onglet DONNEES en A1 je dois avoir AAA. Quand je click sur le bouton je dois avoir 1 dans l'onglet VALEUR ?

Je ne comprends pas très bien.
Ce que je veux c'est par exemple :
dans mon classeur j'ai un onglet "resultat" et un onglet "afficher". Dans l'onglet resultat j'ai une multitude de chiffre. j'aimerais par exemple, lorsque j'appuie sur un bouton de commande MAJ, dans l'onglet "valeur", qu'il m'affiche le chiffre inscrit dans la cellule C4 de l'onglet "resultat". Puis le mois suivant la valeur de la colonne C4 va changée et quand j'appuierais de nouveau sur le bouton MAJ il doit m'afficher ce nouveau resultat dans la feuille valeur à coté du précédent résultat.

Je sais pas si je suis compréhensible.
Merci en tout cas pour votre aide.

[Invité]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Option Explicit
 
Private Sub cmbMois_Click()
  Worksheets("AFFICHER").Cells(1, Worksheets("VALEUR").[A1]) = Worksheets("RESULTAT").[C4]
  Worksheets("VALEUR").[A1] = Worksheets("VALEUR").[A1] + 1
End Sub

1) Le bouton de commande est initialisé à 1 dans l'onglet "VALEUR";
2) L'appui sur le bouton de commande copie la valeur de la cellule C4 de l'onglet "RESULTAT" dans l'onglet "AFFICHER" en A1;
3) Le bouton de commande vaut 2 dans l'onglet "VALEUR";
4) L'appui sur le bouton de commande copie la valeur de la cellule C4 de l'onglet "RESULTAT" dans l'onglet "AFFICHER" en B1;
5) Le bouton de commande vaut 3 dans l'onglet "VALEUR";
6) ...