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
sabatier
redondant?, redondant? l'a pas une g..... de redondant le philippe...
mais tiens, tant qu'on y est, michel, pourquoi ne mets-tu pas simplement
le nom de ta macro (écrite par ailleurs Sub tartanpion()...comme tu sais
faire) sur une seule ligne sous ton Private Sub cmdSommaire_Click() ???
tu n'y es pas obligé, bien sûr, mais c'est pratique si tu dois te
resservir (non pas de la saucisse trop cuite mais) de la macro par
ailleurs, à condition que tu aies installé celle-ci dans un module du
perso.xls par exemple...
de toutes façons, laurent D va sûrement me dire que je te dis des c......ies
jps

Péhemme a écrit:
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
ben, je ne sais plus moi, je voulais dire "pouvez" et toi, philippe, tu
veux dire "savez" non?
jps

Philippe.R a écrit:
Bonjour Jean Paul,
Maman Sabatier n' aurait pas plutôt soufflé "Sie rauchen können" ?


Avatar
Filair
Il est souvent mieux de le dire de plusieurs manières ; la mienne aurait pu paraître un peu absconse.
Pour le pseudo, ça porte à réfléchir.... ;o))
--
Amicales Salutations

"sabatier" a écrit dans le message de
news:
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
Péhemme
Philippe,
Je t'ai vu !
Michel
Avatar
sabatier
issu du tourisme, je dois admettre que je ne connaissais pas cette
compagnie aérienne mais bon, avec toutes ces restructurations...
jps

Filair a écrit:
Il est souvent mieux de le dire de plusieurs manières ; la mienne aurait pu paraître un peu absconse.
Pour le pseudo, ça porte à réfléchir.... ;o))


Avatar
Philippe.R
Je ne sais plus Jean Paul, t'as p'tet' bien raison
Tu sais, avec l'âge.................
v
v
v
v
v
v
v
v
v
v
v
v
v
v
v
v
v
v
v
v
...............................les bases apprises s'éloignent
--
Amicales Salutations

"sabatier" a écrit dans le message de
news:
ben, je ne sais plus moi, je voulais dire "pouvez" et toi, philippe, tu
veux dire "savez" non?
jps

Philippe.R a écrit:
Bonjour Jean Paul,
Maman Sabatier n' aurait pas plutôt soufflé "Sie rauchen können" ?





Avatar
Sitting Hoax \(BM\)
Salut Michel,
effectivement, je n'épluche pas les adresses IP des contributeurs, et ne
t'avais pas reconnu.
Pehemme comme PM (Pistolet Mitrailleur )?
Péroche Michel, ou Philippe Merci
Toujours ok pour juillet, j'amènerai mes saucisses à tout hasard ;-))

La proc, placée dans un module ordinaire et non de feuille semble marcher
(comme le suggère Phillippe que je remercie au passage;-)))
donc, dans un module ordinaire:

Sub Aller_à_sommaire()
Worksheets("SOMMAIRE").Select
Range("a1").Select
End Sub

et dans la macro (dans le module de feuille)

Private Sub cmdSommaire_Click()
Aller_à_sommaire
End Sub

Amicalement
Sitting Hoax

"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
FxM
Je peux ... -> Ich ... kann. Il me semble que la question serait surtout
de savoir *ce qui est* rauchen :o)

FxM






Je ne sais plus Jean Paul, t'as p'tet' bien raison
Tu sais, avec l'âge.................
v
v
v
v
v
v
v
v
v
v
v
v
v
v
v
v
v
v
v
v
................................les bases apprises s'éloignent


Avatar
sabatier
rauchen = fumer, FxM
la question serait plutôt de savoir si aussi dans la Wehrmacht, les
gradés mettaient la troupe au repos en leur disant "pouvez fumer, bande
de bleusailles"
jps

FxM a écrit:
Je peux ... -> Ich ... kann. Il me semble que la question serait surtout
de savoir *ce qui est* rauchen :o)

FxM






Je ne sais plus Jean Paul, t'as p'tet' bien raison
Tu sais, avec l'âge.................
v
v
v
v
v
v
v
v
v
v
v
v
v
v
v
v
v
v
v
v
................................les bases apprises s'éloignent





Avatar
FxM

Merci Jean-Paul, j'ai bien eu ton message. Ne t'affole pas, je vais
passer au boulot cette ApM.

rauchen = fumer, FxM
quelques vagues souvenirs d'allemand même si c'est vieux de presque de

20 ans [hein, déjà ? Oh, le vieux :o) ]
Je ne perds pas vraiement avec le nééerlandais au boulot ..

la question serait plutôt de savoir si aussi dans la Wehrmacht, les
gradés mettaient la troupe au repos en leur disant "pouvez fumer, bande
de bleusailles"
A part la fin qui me semble devoir être "bande de vert de grisaille", je

ne vois nul inconvénient majeur à ce que ...

Et pis d'abord stop : Rauchen Verboten, c'est un groupe non fumeur !

@+
FxM

1 2