Nouveau venu

Inscrit le :07/04/2019
Dernière activité :28/04/2019 à 12:56
Version d'Excel :2013
Messages
4
Votes
0
Fichiers
0
Téléchargements
0
SujetsMessagesStatistiquesVotes reçus

Sujets créés par SAJIDA OLFA

DateForumSujetExtrait du message
07/04/2019 à 14:30Excel - VBAListe deroulanteDim a() Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Not Intersect([D2:D500], Target) Is Nothing And Target.Count = 1 Then a = Application.Transpose(Sheets("feuil2").Range("liste").Value) Me.ComboBox1.List = a Me.ComboBox1.Height = Target.Height + 3 Me.ComboBox1.Width = Ta...