Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
isabelle
bonjour stef,
il faut une variable public et 3 macro
_________________________________________________
cette partie est à copier sur un module,
Public LaValeur
Sub MaMacro() MsgBox "la valeur de la cellule A1 a changée" ' à adapter par ton instruction End Sub _________________________________________________
'cette partie est à copier sur la page code de la feuille
Private Sub Worksheet_Calculate() If Sheets("Feuil1").Range("A1") <> LaValeur Then Call MaMacro LaValeur = Sheets("Feuil1").Range("A1") End If End Sub _________________________________________________
'cette partie est à copier sur la page code de ThisWorkbook
Private Sub Workbook_Open() LaValeur = Sheets("Feuil1").Range("A1") End Sub _________________________________________________
http://cjoint.com/?0khbZEfh6FW
isabelle
Le 2010-10-06 12:54, a écrit :
Bonjour,
Je suis sous excel 2003 et j'ai une instruction en vba que j'aimerais qu'elle soit exécutée lors du changement de la valeur d'une cellule
Le problème est que cette cellule possède une formule
Merci
bonjour stef,
il faut une variable public et 3 macro
_________________________________________________
cette partie est à copier sur un module,
Public LaValeur
Sub MaMacro()
MsgBox "la valeur de la cellule A1 a changée" ' à adapter par ton instruction
End Sub
_________________________________________________
'cette partie est à copier sur la page code de la feuille
Private Sub Worksheet_Calculate()
If Sheets("Feuil1").Range("A1") <> LaValeur Then
Call MaMacro
LaValeur = Sheets("Feuil1").Range("A1")
End If
End Sub
_________________________________________________
'cette partie est à copier sur la page code de ThisWorkbook
Private Sub Workbook_Open()
LaValeur = Sheets("Feuil1").Range("A1")
End Sub
_________________________________________________
http://cjoint.com/?0khbZEfh6FW
isabelle
Le 2010-10-06 12:54, stef@nospam a écrit :
Bonjour,
Je suis sous excel 2003 et j'ai une instruction en vba que j'aimerais
qu'elle soit exécutée lors du changement de la valeur d'une cellule
Le problème est que cette cellule possède une formule
Sub MaMacro() MsgBox "la valeur de la cellule A1 a changée" ' à adapter par ton instruction End Sub _________________________________________________
'cette partie est à copier sur la page code de la feuille
Private Sub Worksheet_Calculate() If Sheets("Feuil1").Range("A1") <> LaValeur Then Call MaMacro LaValeur = Sheets("Feuil1").Range("A1") End If End Sub _________________________________________________
'cette partie est à copier sur la page code de ThisWorkbook
Private Sub Workbook_Open() LaValeur = Sheets("Feuil1").Range("A1") End Sub _________________________________________________
http://cjoint.com/?0khbZEfh6FW
isabelle
Le 2010-10-06 12:54, a écrit :
Bonjour,
Je suis sous excel 2003 et j'ai une instruction en vba que j'aimerais qu'elle soit exécutée lors du changement de la valeur d'une cellule
Le problème est que cette cellule possède une formule
Merci
isabelle
bonjour stef,
il faut une variable public et 3 macro
cette partie est à copier sur un module,
Public LaValeur
Sub MaMacro() MsgBox "la valeur de la cellule A1 a changée" ' à adapter par ton instruction End Sub
'cette partie est à copier sur la page code de la feuille
Private Sub Worksheet_Calculate() If Sheets("Feuil1").Range("A1") <> LaValeur Then Call MaMacro LaValeur = Sheets("Feuil1").Range("A1") End If End Sub
'cette partie est à copier sur la page code de ThisWorkbook
Private Sub Workbook_Open() LaValeur = Sheets("Feuil1").Range("A1") End Sub
http://cjoint.com/?0khbZEfh6FW
isabelle
Le 2010-10-06 12:54, a écrit :
Bonjour,
Je suis sous excel 2003 et j'ai une instruction en vba que j'aimerais qu'elle soit exécutée lors du changement de la valeur d'une cellule
Le problème est que cette cellule possède une formule
Merci
bonjour stef,
il faut une variable public et 3 macro
cette partie est à copier sur un module,
Public LaValeur
Sub MaMacro()
MsgBox "la valeur de la cellule A1 a changée" ' à adapter par ton instruction
End Sub
'cette partie est à copier sur la page code de la feuille
Private Sub Worksheet_Calculate()
If Sheets("Feuil1").Range("A1") <> LaValeur Then
Call MaMacro
LaValeur = Sheets("Feuil1").Range("A1")
End If
End Sub
'cette partie est à copier sur la page code de ThisWorkbook
Private Sub Workbook_Open()
LaValeur = Sheets("Feuil1").Range("A1")
End Sub
http://cjoint.com/?0khbZEfh6FW
isabelle
Le 2010-10-06 12:54, stef@nospam a écrit :
Bonjour,
Je suis sous excel 2003 et j'ai une instruction en vba que j'aimerais
qu'elle soit exécutée lors du changement de la valeur d'une cellule
Le problème est que cette cellule possède une formule