Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

Comment changer de feuille et écrire dans la nouvelle feuille en V

4 réponses
Avatar
Alain
J'ai un clesseur avec 2 feuilles ("Menu" et "Données").
Dans la feuille "Menu", j'ai un bouton.
Je souhaite, après un click sur mon bouton, me déplacer dans la feuille
"Données" et écrire la date du jour dans la cellule A1.
J'ai écrit le code suivant, attaché au click du bouton:

Worksheets("Données").Activate
Cells(1,1).Value = Date

Excel se déplace bien dans la feuille "Données" mais il écrit la date dans
la feuille "Menu"!
Avez-vous une solution ?
Merci d'avance.

Alain.

4 réponses

Avatar
Jacky
Bonjour Alain

Worksheets("Données").[a1] = Date

Salutations
JJ

"Alain" a écrit dans le message de
news:
J'ai un clesseur avec 2 feuilles ("Menu" et "Données").
Dans la feuille "Menu", j'ai un bouton.
Je souhaite, après un click sur mon bouton, me déplacer dans la feuille
"Données" et écrire la date du jour dans la cellule A1.
J'ai écrit le code suivant, attaché au click du bouton:

Worksheets("Données").Activate
Cells(1,1).Value = Date

Excel se déplace bien dans la feuille "Données" mais il écrit la date dans
la feuille "Menu"!
Avez-vous une solution ?
Merci d'avance.

Alain.



Avatar
Jacky
Re...
A priori ton code devrait faire la même chose et même rester sur la feuille
en question..
Y a t'il du code dans le module de la feuille ??
JJ

"Jacky" a écrit dans le message de
news:
Bonjour Alain

Worksheets("Données").[a1] = Date

Salutations
JJ

"Alain" a écrit dans le message de
news:
J'ai un clesseur avec 2 feuilles ("Menu" et "Données").
Dans la feuille "Menu", j'ai un bouton.
Je souhaite, après un click sur mon bouton, me déplacer dans la feuille
"Données" et écrire la date du jour dans la cellule A1.
J'ai écrit le code suivant, attaché au click du bouton:

Worksheets("Données").Activate
Cells(1,1).Value = Date

Excel se déplace bien dans la feuille "Données" mais il écrit la date
dans


la feuille "Menu"!
Avez-vous une solution ?
Merci d'avance.

Alain.







Avatar
papou
Bonjour
Soit modifier comme ceci :

With Worksheets("Feuil2")
.Activate
.Cells(1, 1).Value = Date
End With

ou comme ça :

Feuil2.Cells(1, 1) = Date

NB : dans le 2ème cas, c'est le codename de la feuille qui est utilisé (et
non pas le nom de l'onglet), donc il faut adapter

Cordialement
Pascal

"Alain" a écrit dans le message de news:

J'ai un clesseur avec 2 feuilles ("Menu" et "Données").
Dans la feuille "Menu", j'ai un bouton.
Je souhaite, après un click sur mon bouton, me déplacer dans la feuille
"Données" et écrire la date du jour dans la cellule A1.
J'ai écrit le code suivant, attaché au click du bouton:

Worksheets("Données").Activate
Cells(1,1).Value = Date

Excel se déplace bien dans la feuille "Données" mais il écrit la date dans
la feuille "Menu"!
Avez-vous une solution ?
Merci d'avance.

Alain.



Avatar
papou
Re
Et donc comme nous venons de l'évoquer avec Jacky dans le fil "format csv"
initié par fm :
Tu peux aussi tenter avec un bouton de commande issu de la boîte à outils
Formulaires.

Cordialement
Pascal

"papou" <cestpasbon@çanonplus44.fr> a écrit dans le message de news:

Bonjour
Soit modifier comme ceci :

With Worksheets("Feuil2")
.Activate
.Cells(1, 1).Value = Date
End With

ou comme ça :

Feuil2.Cells(1, 1) = Date

NB : dans le 2ème cas, c'est le codename de la feuille qui est utilisé (et
non pas le nom de l'onglet), donc il faut adapter

Cordialement
Pascal

"Alain" a écrit dans le message de news:

J'ai un clesseur avec 2 feuilles ("Menu" et "Données").
Dans la feuille "Menu", j'ai un bouton.
Je souhaite, après un click sur mon bouton, me déplacer dans la feuille
"Données" et écrire la date du jour dans la cellule A1.
J'ai écrit le code suivant, attaché au click du bouton:

Worksheets("Données").Activate
Cells(1,1).Value = Date

Excel se déplace bien dans la feuille "Données" mais il écrit la date
dans
la feuille "Menu"!
Avez-vous une solution ?
Merci d'avance.

Alain.