Lancer une macro par double clic sur une cellule Excel 2003
Fermé
St Justois
Messages postés
8
Date d'inscription
jeudi 14 novembre 2013
Statut
Membre
Dernière intervention
22 octobre 2019
-
11 juin 2014 à 15:39
Mike-31 Messages postés 18313 Date d'inscription dimanche 17 février 2008 Statut Contributeur Dernière intervention 21 avril 2024 - 11 juin 2014 à 16:03
Mike-31 Messages postés 18313 Date d'inscription dimanche 17 février 2008 Statut Contributeur Dernière intervention 21 avril 2024 - 11 juin 2014 à 16:03
A voir également:
- Vba double clic cellule
- Double ecran - Guide
- Whatsapp double sim - Guide
- Excel compter cellule couleur sans vba - Guide
- Aller à la ligne dans une cellule excel - Guide
- Verrouiller cellule excel - Guide
2 réponses
Mike-31
Messages postés
18313
Date d'inscription
dimanche 17 février 2008
Statut
Contributeur
Dernière intervention
21 avril 2024
5 073
11 juin 2014 à 16:03
11 juin 2014 à 16:03
Bonjour,
depuis ta feuille référentiel, clic sur les touches Alt et F11 ou clic droit sur l'onglet/Visualiser le code
coller ce code
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
On Error Resume Next
If Not Intersect(Target, Range("D4:D300")) Is Nothing Then
Sheets("fiche risque").Range("B5") = Target
End If
End Sub
refaire Alt et F11 pour revenir à Excel
depuis ta feuille référentiel, clic sur les touches Alt et F11 ou clic droit sur l'onglet/Visualiser le code
coller ce code
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
On Error Resume Next
If Not Intersect(Target, Range("D4:D300")) Is Nothing Then
Sheets("fiche risque").Range("B5") = Target
End If
End Sub
refaire Alt et F11 pour revenir à Excel
St Justois
Messages postés
8
Date d'inscription
jeudi 14 novembre 2013
Statut
Membre
Dernière intervention
22 octobre 2019
11 juin 2014 à 15:55
11 juin 2014 à 15:55
Petite précision, le cellule de destination est C7 sur la feuille "fiche risque".