Bonjour
en A12, j'ai 1 liste d' articles qui s'ouvre et fonctionne très bien
Maintenant, en B4 , je souhaiterais ajouter une autre liste, celle des fournisseurs mais dans visual basic puis feuille" devis", j'ai la formule
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Not Intersect([A12:A54], Target) Is Nothing And Target.Count = 1 Then
UserForm1.Left = 100 + Target.Left
UserForm1.Top = Target.Top - Cells(ActiveWindow.ScrollRow, 1).Top
UserForm1.Show
Cancel = True
End If
End Sub
il faut sans doute que je la modifie et que je rajoute B12 mais quel serait la formule ??
If Not Intersect([A12:A54] ou B12
Merci
cdlt