A voir également:
- Actioner une procédure VBA
- Vous devez disposer d'une autorisation pour effectuer cette action - Guide
- Excel compter cellule couleur sans vba - Guide
- Vba ouvrir un fichier excel avec chemin ✓ - Forum VB / VBA
- Find vba - Astuces et Solutions
- Le point d'entrée de procédure eventsetinformation est introuvable advapi32.dll - Forum Windows
4 réponses
Bonjour,
Exemple type :
A placer derrière la feuille !
Lupin
Exemple type :
A placer derrière la feuille !
Option Explicit
'
Private Sub Worksheet_Change(ByVal Target As Range)
Dim Plage As Range, Intersection As Range
Set Plage = Range("A1")
Set Intersection = Application.Intersect(Target, Plage)
If Not (Intersection Is Nothing) Then
Call MaMacro
Call MaFonction
End If
End Sub
'
Private Sub MaMacro()
MsgBox "Macro"
End Sub
'
Private Function MaFonction()
MsgBox "Fonction"
End Function
'
Lupin
Coucou
Tu avais presque tout
[code]
Private Sub Worksheet_Change(ByVal Target As Range)
If Target = Cells(1, 1) Then
MsgBox ("valeur A1 modifié")
End If
End Sub
[\code]
Tu n'as plus qu'à remplacer la msgbox par ta macro
A plus
Tu avais presque tout
[code]
Private Sub Worksheet_Change(ByVal Target As Range)
If Target = Cells(1, 1) Then
MsgBox ("valeur A1 modifié")
End If
End Sub
[\code]
Tu n'as plus qu'à remplacer la msgbox par ta macro
A plus