Ben Chez moi, j'ai bien la date sur feuil2 et comme Parent.Name 'feuil2' avec un appel par bouton sur la feuil1 (xl97)
Sub jj() Worksheets("feuil2").Activate Cells(1, 1).Value = Date
MsgBox Cells(1, 1).Parent.Name
End Sub
JJ
"papou" <cestpasbon@çanonplus44.fr> a écrit dans le message de news:
Bonjour Jacky Non, ça ne marche pas. Pour t'en persuader ajoute ceci dans le code d'Alain MsgBox Cells(1, 1).Parent.Name Cordialement Pascal
"Jacky" a écrit dans le message de news:
Wouai, c'est bien vrai...
Dit-moi Pascal, le code d'Alain plus haut:
Worksheets("Données").Activate Cells(1,1).Value = Date Ca fait pas chez toi ??
JJ
"papou" <cestpasbon@çanonplus44.fr> a écrit dans le message de news:
Bonjour Bon cette fois c'est trop, donc par ici : http://www.technicland.com/malpolitus.swf
Cordialement Pascal
papou
Re Oui, tu as raison ça fonctionne mais avec un bouton de commande issu de la BO Formulaires, mais pas avec un bouton issu de la BO Contrôles. En tout cas sur ma version 2003. Cordialement Pascal
"Jacky" a écrit dans le message de news: eDOV2$
Ben Chez moi, j'ai bien la date sur feuil2 et comme Parent.Name 'feuil2' avec un appel par bouton sur la feuil1 (xl97)
Sub jj() Worksheets("feuil2").Activate Cells(1, 1).Value = Date
MsgBox Cells(1, 1).Parent.Name
End Sub
JJ
"papou" <cestpasbon@çanonplus44.fr> a écrit dans le message de news:
Bonjour Jacky Non, ça ne marche pas. Pour t'en persuader ajoute ceci dans le code d'Alain MsgBox Cells(1, 1).Parent.Name Cordialement Pascal
"Jacky" a écrit dans le message de news:
Wouai, c'est bien vrai...
Dit-moi Pascal, le code d'Alain plus haut:
Worksheets("Données").Activate Cells(1,1).Value = Date Ca fait pas chez toi ??
JJ
"papou" <cestpasbon@çanonplus44.fr> a écrit dans le message de news:
Bonjour Bon cette fois c'est trop, donc par ici : http://www.technicland.com/malpolitus.swf
Cordialement Pascal
Re
Oui, tu as raison ça fonctionne mais avec un bouton de commande issu de la
BO Formulaires, mais pas avec un bouton issu de la BO Contrôles.
En tout cas sur ma version 2003.
Cordialement
Pascal
"Jacky" <ezeazee.Jaeg@Wbidon.fr> a écrit dans le message de news:
eDOV2$sYFHA.3864@TK2MSFTNGP10.phx.gbl...
Ben Chez moi, j'ai bien la date sur feuil2 et comme Parent.Name 'feuil2'
avec un appel par bouton sur la feuil1 (xl97)
Sub jj()
Worksheets("feuil2").Activate
Cells(1, 1).Value = Date
MsgBox Cells(1, 1).Parent.Name
End Sub
JJ
"papou" <cestpasbon@çanonplus44.fr> a écrit dans le message de
news:OqX6u5sYFHA.252@TK2MSFTNGP12.phx.gbl...
Bonjour Jacky
Non, ça ne marche pas.
Pour t'en persuader ajoute ceci dans le code d'Alain
MsgBox Cells(1, 1).Parent.Name
Cordialement
Pascal
"Jacky" <ezeazee.Jaeg@Wbidon.fr> a écrit dans le message de news:
OjUAR3sYFHA.3864@TK2MSFTNGP10.phx.gbl...
Wouai, c'est bien vrai...
Dit-moi Pascal, le code d'Alain plus haut:
Worksheets("Données").Activate
Cells(1,1).Value = Date
Ca fait pas chez toi ??
JJ
"papou" <cestpasbon@çanonplus44.fr> a écrit dans le message de
news:uPJzWysYFHA.3220@TK2MSFTNGP14.phx.gbl...
Bonjour
Bon cette fois c'est trop, donc par ici :
http://www.technicland.com/malpolitus.swf
Re Oui, tu as raison ça fonctionne mais avec un bouton de commande issu de la BO Formulaires, mais pas avec un bouton issu de la BO Contrôles. En tout cas sur ma version 2003. Cordialement Pascal
"Jacky" a écrit dans le message de news: eDOV2$
Ben Chez moi, j'ai bien la date sur feuil2 et comme Parent.Name 'feuil2' avec un appel par bouton sur la feuil1 (xl97)
Sub jj() Worksheets("feuil2").Activate Cells(1, 1).Value = Date
MsgBox Cells(1, 1).Parent.Name
End Sub
JJ
"papou" <cestpasbon@çanonplus44.fr> a écrit dans le message de news:
Bonjour Jacky Non, ça ne marche pas. Pour t'en persuader ajoute ceci dans le code d'Alain MsgBox Cells(1, 1).Parent.Name Cordialement Pascal
"Jacky" a écrit dans le message de news:
Wouai, c'est bien vrai...
Dit-moi Pascal, le code d'Alain plus haut:
Worksheets("Données").Activate Cells(1,1).Value = Date Ca fait pas chez toi ??
JJ
"papou" <cestpasbon@çanonplus44.fr> a écrit dans le message de news:
Bonjour Bon cette fois c'est trop, donc par ici : http://www.technicland.com/malpolitus.swf
Cordialement Pascal
Jacky
Je n'ai pas de Bo Contrôles sur xl97, mais avec la Bo Commandes, cela fonctionne aussi.
JJ
"papou" <cestpasbon@çanonplus44.fr> a écrit dans le message de news:
Re Oui, tu as raison ça fonctionne mais avec un bouton de commande issu de la BO Formulaires, mais pas avec un bouton issu de la BO Contrôles. En tout cas sur ma version 2003. Cordialement Pascal
"Jacky" a écrit dans le message de news: eDOV2$
Ben Chez moi, j'ai bien la date sur feuil2 et comme Parent.Name 'feuil2' avec un appel par bouton sur la feuil1 (xl97)
Sub jj() Worksheets("feuil2").Activate Cells(1, 1).Value = Date
MsgBox Cells(1, 1).Parent.Name
End Sub
JJ
"papou" <cestpasbon@çanonplus44.fr> a écrit dans le message de news:
Bonjour Jacky Non, ça ne marche pas. Pour t'en persuader ajoute ceci dans le code d'Alain MsgBox Cells(1, 1).Parent.Name Cordialement Pascal
"Jacky" a écrit dans le message de news:
Wouai, c'est bien vrai...
Dit-moi Pascal, le code d'Alain plus haut:
Worksheets("Données").Activate Cells(1,1).Value = Date Ca fait pas chez toi ??
JJ
"papou" <cestpasbon@çanonplus44.fr> a écrit dans le message de news:
Bonjour Bon cette fois c'est trop, donc par ici : http://www.technicland.com/malpolitus.swf
Cordialement Pascal
Je n'ai pas de Bo Contrôles sur xl97, mais avec la Bo Commandes, cela
fonctionne aussi.
JJ
"papou" <cestpasbon@çanonplus44.fr> a écrit dans le message de
news:eK0jCEtYFHA.3096@TK2MSFTNGP15.phx.gbl...
Re
Oui, tu as raison ça fonctionne mais avec un bouton de commande issu de la
BO Formulaires, mais pas avec un bouton issu de la BO Contrôles.
En tout cas sur ma version 2003.
Cordialement
Pascal
"Jacky" <ezeazee.Jaeg@Wbidon.fr> a écrit dans le message de news:
eDOV2$sYFHA.3864@TK2MSFTNGP10.phx.gbl...
Ben Chez moi, j'ai bien la date sur feuil2 et comme Parent.Name 'feuil2'
avec un appel par bouton sur la feuil1 (xl97)
Sub jj()
Worksheets("feuil2").Activate
Cells(1, 1).Value = Date
MsgBox Cells(1, 1).Parent.Name
End Sub
JJ
"papou" <cestpasbon@çanonplus44.fr> a écrit dans le message de
news:OqX6u5sYFHA.252@TK2MSFTNGP12.phx.gbl...
Bonjour Jacky
Non, ça ne marche pas.
Pour t'en persuader ajoute ceci dans le code d'Alain
MsgBox Cells(1, 1).Parent.Name
Cordialement
Pascal
"Jacky" <ezeazee.Jaeg@Wbidon.fr> a écrit dans le message de news:
OjUAR3sYFHA.3864@TK2MSFTNGP10.phx.gbl...
Wouai, c'est bien vrai...
Dit-moi Pascal, le code d'Alain plus haut:
Worksheets("Données").Activate
Cells(1,1).Value = Date
Ca fait pas chez toi ??
JJ
"papou" <cestpasbon@çanonplus44.fr> a écrit dans le message de
news:uPJzWysYFHA.3220@TK2MSFTNGP14.phx.gbl...
Bonjour
Bon cette fois c'est trop, donc par ici :
http://www.technicland.com/malpolitus.swf
Je n'ai pas de Bo Contrôles sur xl97, mais avec la Bo Commandes, cela fonctionne aussi.
JJ
"papou" <cestpasbon@çanonplus44.fr> a écrit dans le message de news:
Re Oui, tu as raison ça fonctionne mais avec un bouton de commande issu de la BO Formulaires, mais pas avec un bouton issu de la BO Contrôles. En tout cas sur ma version 2003. Cordialement Pascal
"Jacky" a écrit dans le message de news: eDOV2$
Ben Chez moi, j'ai bien la date sur feuil2 et comme Parent.Name 'feuil2' avec un appel par bouton sur la feuil1 (xl97)
Sub jj() Worksheets("feuil2").Activate Cells(1, 1).Value = Date
MsgBox Cells(1, 1).Parent.Name
End Sub
JJ
"papou" <cestpasbon@çanonplus44.fr> a écrit dans le message de news:
Bonjour Jacky Non, ça ne marche pas. Pour t'en persuader ajoute ceci dans le code d'Alain MsgBox Cells(1, 1).Parent.Name Cordialement Pascal
"Jacky" a écrit dans le message de news:
Wouai, c'est bien vrai...
Dit-moi Pascal, le code d'Alain plus haut:
Worksheets("Données").Activate Cells(1,1).Value = Date Ca fait pas chez toi ??
JJ
"papou" <cestpasbon@çanonplus44.fr> a écrit dans le message de news:
Bonjour Bon cette fois c'est trop, donc par ici : http://www.technicland.com/malpolitus.swf
