Liste déroulante et copie de ligne Le sujet est résolu

Y compris Power BI, Power Query et toute autre question en lien avec Excel
Répondre
g
gaets98
Membre habitué
Membre habitué
Messages : 53
Inscrit le : 23 juin 2017
Version d'Excel : 2016

Message par gaets98 » 6 juillet 2017, 09:08

Bonjour à tous,
Je poste encore un nouveau sujet ( j'espere que ce sera le dernier) car j'aimerai qu'a partir d'une liste déroulante en fonction du choix de l'echantillon il me copie la ligne associée ( car j'ai fais une MFC pour comparer les valeurs sortantes). Je vous mets en PJ ce que j'ai pu déjà faire. J'arrive bien a faire ma liste déroulante ("Test macro" mais je n'arrive pas à copier la ligne associée ( qui est dans une autre feuille "feuil1").

Merci beaucoup pour votre aide
Avatar du membre
ThauThème
Passionné d'Excel
Passionné d'Excel
Messages : 4'047
Appréciations reçues : 212
Inscrit le : 19 octobre 2014
Version d'Excel : 2010 FR

Message par ThauThème » 6 juillet 2017, 09:42

Bonjour Gaets, bonjour le forum

Affecte le code ci-dessous à ta liste déroulante (moi je l'aurais faite un peu plus grande peut-être !...) :
Sub Zonecombinée4_QuandChangement()
Dim O As Worksheet 'déclare la variable O (Onglet)
Dim V As Integer 'déclare la variable V (Valeur)

Set O = Worksheets("Test macro") 'définit l'onglet O
V = O.Range("G16").Value 'définit la valeur V
O.Rows(13).ClearContents 'efface d'éventuelle anciennes données en ligne 13
'copie la ligne concerné de l'onglet "Feuil1" dans la cellule E13
Sheets("Feuil1").Cells(V + 2, 5).Resize(1, 41).Copy O.Range("E13")
End Sub
À plus,

ThauTheme


Je suis Charlie
VBA m'éclate, les formules m'ennuient ! Je n'y peux rien c'est comme ça...
g
gaets98
Membre habitué
Membre habitué
Messages : 53
Inscrit le : 23 juin 2017
Version d'Excel : 2016

Message par gaets98 » 6 juillet 2017, 17:03

Merci beaucoup et merci pour les détails qui m'aide à mieux comprendre :D :D
Cela fonctionne parfaitement !
Répondre
  • Sujets similaires
    Réponses
    Vues
    Dernier message