Bonjour,
J'ai ce bout de code qui me permet d'afficher ma boite de dialogue, elle marchait avant que je ferme le PC. Puis ce matin elle ne fonctionne plus . j'ai un code d'erreur "424" qui s'affiche. Est ce que vous avez une idée ?
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Not Intersect(Target, Range("W4:W200")) Is Nothing Then
Cancel = True 'Annule la modif de la cellule
ligne_sel = Target.Offset(0, -17).Value
num_dica = Target.Offset(0, -22).Value
Call InfosComm.afficher(ligne_sel, num_dica, "Dica")
End If
End Sub
Bonne journée à vous