Re: Choisir la destination Dble click |
Titre du sujet : Re: Choisir la destination Dble click par tactic6 le 07/01/2023 10:09:37 Bonjour J'essaie de remplacer la MsgBox par un Userform mais j'obtiens une erreur 1004 et ne comprend vraiment pas pourquoi Voici les codes si quelqu'un a le temps d'y jeter un oeil merci Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) 'recherche de la cellule dans la colonne A If Target.Column = 1 Then UserForm1.Show Dim cellule As String cellule = Target.Address End If End Sub 'boutons Userform Private Sub CommandButton1_Click() Sheets("SAISIE").Range("C12").Value = Sheets("Client").Range(cellule).Value Unload Me End Sub Private Sub CommandButton2_Click() Sheets("PAGE2").Range("C12").Value = Sheets("Client").Range(cellule).Value Unload Me End Sub
|
Forums