Bonjour à tous
J'ai créé une macro il y a quelque temps, avec un USF contenant une combobox.
Cette combobox est remplie de semaines (S1......S52) de l'année, et ma macro se caractérise ainsi
On vient saisir la semaine que l'on souhaite mettre à jour dans la combobox, on valide l'USF et les données qui étaient présentes dans la colonne 1 se retrouvent copiées dans la colonne de la semaine renseignée dans la combobox.
Le code se présente ainsi:
Mon problème est le suivant:
Je souhaiterais, une fois la combobox renseignée mais AVANT la validation de l'USF commandant la copie, connaître une méthode pour aller récupérer des données dans une autre feuille, disposant également d'une tableau avec une semaine par colonne, et les implanter dans ma page de données.
Sauriez-vous me renseigner?
Merci de votre soutient et bonne journée à tous.
J'ai créé une macro il y a quelque temps, avec un USF contenant une combobox.
Cette combobox est remplie de semaines (S1......S52) de l'année, et ma macro se caractérise ainsi
On vient saisir la semaine que l'on souhaite mettre à jour dans la combobox, on valide l'USF et les données qui étaient présentes dans la colonne 1 se retrouvent copiées dans la colonne de la semaine renseignée dans la combobox.
Le code se présente ainsi:
Code:
'Chargement de la liste de la combobox d'après range
ComboBox1.Column = Sheets("Données").Range("C1:AD1").Value
'Copie la colonne semaine en cours vers semaine destination sur !volumes, précision de la destination de la commande par "With Sheets("Volumes")"
With Sheets("Données")
.Range(.Cells(2, ComboBox1.ListIndex + 3), .Cells(13, ComboBox1.ListIndex + 3)).Value = .Range("C2:C13").Value
End With
Mon problème est le suivant:
Je souhaiterais, une fois la combobox renseignée mais AVANT la validation de l'USF commandant la copie, connaître une méthode pour aller récupérer des données dans une autre feuille, disposant également d'une tableau avec une semaine par colonne, et les implanter dans ma page de données.
Sauriez-vous me renseigner?
Merci de votre soutient et bonne journée à tous.