Bonjour
je me permet de vous sollicite je pense que cela n'ai pas grand chose
j'ai crée un formulaire pour facilité la saisie au assistante pour remplir une trame de facturation
1 er problème
je ne vois pas apparaitre dans mon ComboBox2 ma liste pourtant dans le code ci dessous je vais bien la cherche
Private Sub UserForm_Initialize()
With Sheets("liste")
Me.ComboBox1.List = .Range("b16:p57").Value
ComboBox1.Text = "choisir le sites"
Me.ComboBox2.List = Application.Transpose(Range("B15:L15"))
ComboBox2.Text = "choisir les items "
End With
End Sub
ensuite j'ai utiliser vlookup pour rechercher dans ma colonne "adresse site" et quelle s 'affiche dans textbox 2 voir code ci dessous
cela ne s'affiche pas
Private Sub ComboBox1_Change()
Dim f As Worksheet
Set f = Worksheets("LISTE")
On Error Resume Next
TextBox2.Text = Application.WorksheetFunction.VLookup(ComboBox1.Text, f.Range("A13:P57"), 14, False)
Call Saisies
End Sub
et ensuite actuellement l'image du site s'affiche sur la trame en utilisant le gestionnaire de noms et un contrôle formulaire sur la trame avec la formule ci dessous
=DECALER(LISTE!$B$15;EQUIV('Dossier Travaux-GER'!$AG$2;LISTE!$B$15:$B$57;0)-1;14;;)
mais je voudrais le réalisé en vba
merci de votre aide au moins pour les deux premier sujet
encore merci