Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel Une simple sélection

Une simple sélection

20 réponses
Avatar
Péhemme
Bonjour à tous,

Je deviens fou...

Sous Windows xp - Excel xp.
Dans l'évènement click d'un bouton issu de la "Boîte à outil Contrôles" le
range sélectionné (quel qu'il soit) bogue.
???
Mon code :
Private Sub cmdSommaire_Click()
Worksheets("SOMMAIRE").Select
Range("a1").Select
End Sub

Si j'écris :
Worksheets("SOMMAIRE").Range("a1").Select
==> La ligne entière bloque.

J'essaie :
avec Sheets au lieu de Worksheets,
avec Activate au lieu de Select,
==> même problème au niveau du "Range".
J'ai même essayer : [a1].select : pas plus de chance...

Quelle pilule dois-je prendre ?
;-)))

Merci d'avance

Michel
Signaler un problème avec ce contenu

10 réponses

Supprimer
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
1 2
Avatar
Sitting Hoax \(BM\)
Bonjour,
Excel recherche Range("A1") de la feuille d'origine,
Il vaut mieux compléter en nommant la feuille de destination avant le Range.
Private Sub cmdSommaire_Click()
Worksheets("SOMMAIRE").Select
Worksheets("SOMMAIRE").Range("a1").Select
End Sub

Amicalement
Sitting Hoax
"Péhemme" a écrit dans le message de
news:cblpp2$i97$
Bonjour à tous,

Je deviens fou...

Sous Windows xp - Excel xp.
Dans l'évènement click d'un bouton issu de la "Boîte à outil Contrôles" le
range sélectionné (quel qu'il soit) bogue.
???
Mon code :
Private Sub cmdSommaire_Click()
Worksheets("SOMMAIRE").Select
Range("a1").Select
End Sub

Si j'écris :
Worksheets("SOMMAIRE").Range("a1").Select
==> La ligne entière bloque.

J'essaie :
avec Sheets au lieu de Worksheets,
avec Activate au lieu de Select,
==> même problème au niveau du "Range".
J'ai même essayer : [a1].select : pas plus de chance...

Quelle pilule dois-je prendre ?
;-)))

Merci d'avance

Michel




Avatar
Péhemme
Bonjour Laurent,

Je vois que tu es réveillé et déjà sur le forum.
;-)))
Pour information : je serai au Beausset du 7 au 18/07/04... il y aura
toujours une vieille saucisse trop cuite à partager et un bon coup de
Bandol...

En revanche, pourquoi TA solution fonctionne tandis que :

Private Sub cmdSommaire_Click()
Worksheets("SOMMAIRE").Select
Range("a1").Select
End Sub

bloque sur le "Range" alors que la page est sélectionnée par la première
ligne de code ?

Bien amicalement

Michel


"Sitting Hoax (BM)" a écrit dans le
message de news:
Bonjour,
Excel recherche Range("A1") de la feuille d'origine,
Il vaut mieux compléter en nommant la feuille de destination avant le
Range.

Private Sub cmdSommaire_Click()
Worksheets("SOMMAIRE").Select
Worksheets("SOMMAIRE").Range("a1").Select
End Sub

Amicalement
Sitting Hoax
"Péhemme" a écrit dans le message de
news:cblpp2$i97$
Bonjour à tous,

Je deviens fou...

Sous Windows xp - Excel xp.
Dans l'évènement click d'un bouton issu de la "Boîte à outil Contrôles"
le


range sélectionné (quel qu'il soit) bogue.
???
Mon code :
Private Sub cmdSommaire_Click()
Worksheets("SOMMAIRE").Select
Range("a1").Select
End Sub

Si j'écris :
Worksheets("SOMMAIRE").Range("a1").Select
==> La ligne entière bloque.

J'essaie :
avec Sheets au lieu de Worksheets,
avec Activate au lieu de Select,
==> même problème au niveau du "Range".
J'ai même essayer : [a1].select : pas plus de chance...

Quelle pilule dois-je prendre ?
;-)))

Merci d'avance

Michel








Avatar
sabatier
ou remplacer le premier Select par Activate, michel...
tu t'accroches toujours à ce que je vois mais méfie-toi de laurent D :
il va te mettre dans ses procs le .mid de la marseillaise que tu seras
obligé de rester au garde-à-vous pendant l'exécution de tes macros...tu
me diras, si c'est le 14 juillet, ça va encore...
jps

Sitting Hoax (BM) a écrit:
Bonjour,
Excel recherche Range("A1") de la feuille d'origine,
Il vaut mieux compléter en nommant la feuille de destination avant le Range.
Private Sub cmdSommaire_Click()
Worksheets("SOMMAIRE").Select
Worksheets("SOMMAIRE").Range("a1").Select
End Sub

Amicalement
Sitting Hoax
"Péhemme" a écrit dans le message de
news:cblpp2$i97$

Bonjour à tous,

Je deviens fou...

Sous Windows xp - Excel xp.
Dans l'évènement click d'un bouton issu de la "Boîte à outil Contrôles" le
range sélectionné (quel qu'il soit) bogue.
???
Mon code :
Private Sub cmdSommaire_Click()
Worksheets("SOMMAIRE").Select
Range("a1").Select
End Sub

Si j'écris :
Worksheets("SOMMAIRE").Range("a1").Select
==> La ligne entière bloque.

J'essaie :
avec Sheets au lieu de Worksheets,
avec Activate au lieu de Select,
==> même problème au niveau du "Range".
J'ai même essayer : [a1].select : pas plus de chance...

Quelle pilule dois-je prendre ?
;-)))

Merci d'avance

Michel









Avatar
sabatier
ach! michel, ne lui demande pas EN PLUS des esseuplications...pour la
saucisse, par contre, il te répondra...
jps

Péhemme a écrit:
Bonjour Laurent,

Je vois que tu es réveillé et déjà sur le forum.
;-)))
Pour information : je serai au Beausset du 7 au 18/07/04... il y aura
toujours une vieille saucisse trop cuite à partager et un bon coup de
Bandol...

En revanche, pourquoi TA solution fonctionne tandis que :

Private Sub cmdSommaire_Click()
Worksheets("SOMMAIRE").Select
Range("a1").Select
End Sub

bloque sur le "Range" alors que la page est sélectionnée par la première
ligne de code ?

Bien amicalement

Michel


"Sitting Hoax (BM)" a écrit dans le
message de news:

Bonjour,
Excel recherche Range("A1") de la feuille d'origine,
Il vaut mieux compléter en nommant la feuille de destination avant le


Range.

Private Sub cmdSommaire_Click()
Worksheets("SOMMAIRE").Select
Worksheets("SOMMAIRE").Range("a1").Select
End Sub

Amicalement
Sitting Hoax
"Péhemme" a écrit dans le message de
news:cblpp2$i97$

Bonjour à tous,

Je deviens fou...

Sous Windows xp - Excel xp.
Dans l'évènement click d'un bouton issu de la "Boîte à outil Contrôles"


le


range sélectionné (quel qu'il soit) bogue.
???
Mon code :
Private Sub cmdSommaire_Click()
Worksheets("SOMMAIRE").Select
Range("a1").Select
End Sub

Si j'écris :
Worksheets("SOMMAIRE").Range("a1").Select
==> La ligne entière bloque.

J'essaie :
avec Sheets au lieu de Worksheets,
avec Activate au lieu de Select,
==> même problème au niveau du "Range".
J'ai même essayer : [a1].select : pas plus de chance...

Quelle pilule dois-je prendre ?
;-)))

Merci d'avance

Michel












Avatar
Péhemme
Bonjour Jean-Paul,
Dans ma formulation, que ce soit Select ou Activate au niveau de la page,
cela bloque au niveau du Range.
Dans la formulation de Laurent (mention de 2 fois la page appelée) la
sélection du Range fonctionne.
Après les modifications suggérées par Laurent, je n'ai pas entendu Excel
chanter... C'est bon signe...
Peut-être n'avait-il pas reconnu mon nouveau pseudo ?...
;-)))

Bien amicalement
Michel



"sabatier" a écrit dans le
message de news:
ou remplacer le premier Select par Activate, michel...
tu t'accroches toujours à ce que je vois mais méfie-toi de laurent D :
il va te mettre dans ses procs le .mid de la marseillaise que tu seras
obligé de rester au garde-à-vous pendant l'exécution de tes macros...tu
me diras, si c'est le 14 juillet, ça va encore...
jps

Sitting Hoax (BM) a écrit:
Bonjour,
Excel recherche Range("A1") de la feuille d'origine,
Il vaut mieux compléter en nommant la feuille de destination avant le
Range.


Private Sub cmdSommaire_Click()
Worksheets("SOMMAIRE").Select
Worksheets("SOMMAIRE").Range("a1").Select
End Sub

Amicalement
Sitting Hoax
"Péhemme" a écrit dans le message de
news:cblpp2$i97$

Bonjour à tous,

Je deviens fou...

Sous Windows xp - Excel xp.
Dans l'évènement click d'un bouton issu de la "Boîte à outil Contrôles"
le



range sélectionné (quel qu'il soit) bogue.
???
Mon code :
Private Sub cmdSommaire_Click()
Worksheets("SOMMAIRE").Select
Range("a1").Select
End Sub

Si j'écris :
Worksheets("SOMMAIRE").Range("a1").Select
==> La ligne entière bloque.

J'essaie :
avec Sheets au lieu de Worksheets,
avec Activate au lieu de Select,
==> même problème au niveau du "Range".
J'ai même essayer : [a1].select : pas plus de chance...

Quelle pilule dois-je prendre ?
;-)))

Merci d'avance

Michel












Avatar
Philippe.R
Bonjour Michel,
Sans certitude, il me semble que la double mention est rendue nécessaire du fait de la présence du code
dans un module de feuille.
--
Amicales Salutations
Retirer A_S_ pour répondre.
XL 97 / 2000 / 2002

"Péhemme" a écrit dans le message de news:cblsq2$5tc$
Bonjour Laurent,

Je vois que tu es réveillé et déjà sur le forum.
;-)))
Pour information : je serai au Beausset du 7 au 18/07/04... il y aura
toujours une vieille saucisse trop cuite à partager et un bon coup de
Bandol...

En revanche, pourquoi TA solution fonctionne tandis que :

Private Sub cmdSommaire_Click()
Worksheets("SOMMAIRE").Select
Range("a1").Select
End Sub

bloque sur le "Range" alors que la page est sélectionnée par la première
ligne de code ?

Bien amicalement

Michel


"Sitting Hoax (BM)" a écrit dans le
message de news:
Bonjour,
Excel recherche Range("A1") de la feuille d'origine,
Il vaut mieux compléter en nommant la feuille de destination avant le
Range.

Private Sub cmdSommaire_Click()
Worksheets("SOMMAIRE").Select
Worksheets("SOMMAIRE").Range("a1").Select
End Sub

Amicalement
Sitting Hoax
"Péhemme" a écrit dans le message de
news:cblpp2$i97$
Bonjour à tous,

Je deviens fou...

Sous Windows xp - Excel xp.
Dans l'évènement click d'un bouton issu de la "Boîte à outil Contrôles"
le


range sélectionné (quel qu'il soit) bogue.
???
Mon code :
Private Sub cmdSommaire_Click()
Worksheets("SOMMAIRE").Select
Range("a1").Select
End Sub

Si j'écris :
Worksheets("SOMMAIRE").Range("a1").Select
==> La ligne entière bloque.

J'essaie :
avec Sheets au lieu de Worksheets,
avec Activate au lieu de Select,
==> même problème au niveau du "Range".
J'ai même essayer : [a1].select : pas plus de chance...

Quelle pilule dois-je prendre ?
;-)))

Merci d'avance

Michel












Avatar
Péhemme
Bonjour Philippe,
Voilà une réponse technique !
Même si cela me semble redondant, je m'y ferais...
;-)))
Merci de ton aide.
Bien amicalement
Michel


"Philippe.R" a écrit dans le message de
news:
Bonjour Michel,
Sans certitude, il me semble que la double mention est rendue nécessaire
du fait de la présence du code

dans un module de feuille.
--
Amicales Salutations
Retirer A_S_ pour répondre.
XL 97 / 2000 / 2002

"Péhemme" a écrit dans le message de
news:cblsq2$5tc$

Bonjour Laurent,

Je vois que tu es réveillé et déjà sur le forum.
;-)))
Pour information : je serai au Beausset du 7 au 18/07/04... il y aura
toujours une vieille saucisse trop cuite à partager et un bon coup de
Bandol...

En revanche, pourquoi TA solution fonctionne tandis que :

Private Sub cmdSommaire_Click()
Worksheets("SOMMAIRE").Select
Range("a1").Select
End Sub

bloque sur le "Range" alors que la page est sélectionnée par la première
ligne de code ?

Bien amicalement

Michel


"Sitting Hoax (BM)" a écrit dans le
message de news:
Bonjour,
Excel recherche Range("A1") de la feuille d'origine,
Il vaut mieux compléter en nommant la feuille de destination avant le
Range.

Private Sub cmdSommaire_Click()
Worksheets("SOMMAIRE").Select
Worksheets("SOMMAIRE").Range("a1").Select
End Sub

Amicalement
Sitting Hoax
"Péhemme" a écrit dans le message de
news:cblpp2$i97$
Bonjour à tous,

Je deviens fou...

Sous Windows xp - Excel xp.
Dans l'évènement click d'un bouton issu de la "Boîte à outil
Contrôles"




le
range sélectionné (quel qu'il soit) bogue.
???
Mon code :
Private Sub cmdSommaire_Click()
Worksheets("SOMMAIRE").Select
Range("a1").Select
End Sub

Si j'écris :
Worksheets("SOMMAIRE").Range("a1").Select
==> La ligne entière bloque.

J'essaie :
avec Sheets au lieu de Worksheets,
avec Activate au lieu de Select,
==> même problème au niveau du "Range".
J'ai même essayer : [a1].select : pas plus de chance...

Quelle pilule dois-je prendre ?
;-)))

Merci d'avance

Michel








Avatar
sabatier
oui, oui, ok michel mais note une chose que mes maîtres m'ont apprise
(mais il y a si longtemps que je l'ai (presque) oubliée et vais avoir
quelque mal à te bien l'expliquer comme on dit en franche-comté) : VBA a
horreur qu'on mette une macro dans un classeur ou dans une feuille et
qu'on aille travailler dans un(e) autre ; il se fait allègrement des
noeuds car il ne sait plus très bien où il se situe et c'est pour cela
qu'il faut lui redonner le nom (un simple ActiveSheet suffit aussi à le
remettre black et d'équerre) de la feuille ou du classeur d'où tu es
parti...
verstanden, mein Obersturmführer??? ja? sie rauchen kannen....
jps

Péhemme a écrit:
Bonjour Jean-Paul,
Dans ma formulation, que ce soit Select ou Activate au niveau de la page,
cela bloque au niveau du Range.
Dans la formulation de Laurent (mention de 2 fois la page appelée) la
sélection du Range fonctionne.
Après les modifications suggérées par Laurent, je n'ai pas entendu Excel
chanter... C'est bon signe...
Peut-être n'avait-il pas reconnu mon nouveau pseudo ?...
;-)))

Bien amicalement
Michel



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

ou remplacer le premier Select par Activate, michel...
tu t'accroches toujours à ce que je vois mais méfie-toi de laurent D :
il va te mettre dans ses procs le .mid de la marseillaise que tu seras
obligé de rester au garde-à-vous pendant l'exécution de tes macros...tu
me diras, si c'est le 14 juillet, ça va encore...
jps

Sitting Hoax (BM) a écrit:

Bonjour,
Excel recherche Range("A1") de la feuille d'origine,
Il vaut mieux compléter en nommant la feuille de destination avant le


Range.


Private Sub cmdSommaire_Click()
Worksheets("SOMMAIRE").Select
Worksheets("SOMMAIRE").Range("a1").Select
End Sub

Amicalement
Sitting Hoax
"Péhemme" a écrit dans le message de
news:cblpp2$i97$


Bonjour à tous,

Je deviens fou...

Sous Windows xp - Excel xp.
Dans l'évènement click d'un bouton issu de la "Boîte à outil Contrôles"


le



range sélectionné (quel qu'il soit) bogue.
???
Mon code :
Private Sub cmdSommaire_Click()
Worksheets("SOMMAIRE").Select
Range("a1").Select
End Sub

Si j'écris :
Worksheets("SOMMAIRE").Range("a1").Select
==> La ligne entière bloque.

J'essaie :
avec Sheets au lieu de Worksheets,
avec Activate au lieu de Select,
==> même problème au niveau du "Range".
J'ai même essayer : [a1].select : pas plus de chance...

Quelle pilule dois-je prendre ?
;-)))

Merci d'avance

Michel















Avatar
sabatier
j'ai failli le dire, philippe R mais toi le blanc, tu expliques
tellement mieux...
quant au nouveau pseudo de michel, après GeeDee, Herdet, je sens que je
vais me faire un p'tit coup de jipéhesse, moi
jps

Philippe.R a écrit:
Bonjour Michel,
Sans certitude, il me semble que la double mention est rendue nécessaire du fait de la présence du code
dans un module de feuille.


Avatar
Philippe.R
Bonjour Jean Paul,
Maman Sabatier n' aurait pas plutôt soufflé "Sie rauchen können" ?
--
Amicales Salutations

"sabatier" a écrit dans le message de
news:
oui, oui, ok michel mais note une chose que mes maîtres m'ont apprise
(mais il y a si longtemps que je l'ai (presque) oubliée et vais avoir
quelque mal à te bien l'expliquer comme on dit en franche-comté) : VBA a
horreur qu'on mette une macro dans un classeur ou dans une feuille et
qu'on aille travailler dans un(e) autre ; il se fait allègrement des
noeuds car il ne sait plus très bien où il se situe et c'est pour cela
qu'il faut lui redonner le nom (un simple ActiveSheet suffit aussi à le
remettre black et d'équerre) de la feuille ou du classeur d'où tu es
parti...
verstanden, mein Obersturmführer??? ja? sie rauchen kannen....
jps

Péhemme a écrit:
Bonjour Jean-Paul,
Dans ma formulation, que ce soit Select ou Activate au niveau de la page,
cela bloque au niveau du Range.
Dans la formulation de Laurent (mention de 2 fois la page appelée) la
sélection du Range fonctionne.
Après les modifications suggérées par Laurent, je n'ai pas entendu Excel
chanter... C'est bon signe...
Peut-être n'avait-il pas reconnu mon nouveau pseudo ?...
;-)))

Bien amicalement
Michel



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

ou remplacer le premier Select par Activate, michel...
tu t'accroches toujours à ce que je vois mais méfie-toi de laurent D :
il va te mettre dans ses procs le .mid de la marseillaise que tu seras
obligé de rester au garde-à-vous pendant l'exécution de tes macros...tu
me diras, si c'est le 14 juillet, ça va encore...
jps

Sitting Hoax (BM) a écrit:

Bonjour,
Excel recherche Range("A1") de la feuille d'origine,
Il vaut mieux compléter en nommant la feuille de destination avant le


Range.


Private Sub cmdSommaire_Click()
Worksheets("SOMMAIRE").Select
Worksheets("SOMMAIRE").Range("a1").Select
End Sub

Amicalement
Sitting Hoax
"Péhemme" a écrit dans le message de
news:cblpp2$i97$


Bonjour à tous,

Je deviens fou...

Sous Windows xp - Excel xp.
Dans l'évènement click d'un bouton issu de la "Boîte à outil Contrôles"


le



range sélectionné (quel qu'il soit) bogue.
???
Mon code :
Private Sub cmdSommaire_Click()
Worksheets("SOMMAIRE").Select
Range("a1").Select
End Sub

Si j'écris :
Worksheets("SOMMAIRE").Range("a1").Select
==> La ligne entière bloque.

J'essaie :
avec Sheets au lieu de Worksheets,
avec Activate au lieu de Select,
==> même problème au niveau du "Range".
J'ai même essayer : [a1].select : pas plus de chance...

Quelle pilule dois-je prendre ?
;-)))

Merci d'avance

Michel


















1 2