code vba pour remonter en haut d'une page

[teamtat]

Bonjour, je voudrais savoir si cete possible de créer un bouton qui permettrai de remonter tout en haut de ma page ??

 

[Minick]

Re : code vba pour remonter en haut d'une page

Re,

Par exemple:

Application.Goto Range("A1"), True

 

[teamtat]

Re : code vba pour remonter en haut d'une page

Encore merci sa marche impécable ;-)

 

[Nicocolalas]

Re : code vba pour remonter en haut d'une page

Utilisé ce jour : Merciiiiiii !

 

[Phoenix956]

Bonjour, super fonctionne très bien, merci!

 

[soan]

Bonjour,

Le code VBA proposé est très correct ; rien à dire de c'côté-là ; seulement voilà, il y a
un hic de taille !

teamtat a écrit : « je voudrais savoir si c'est possible de créer un bouton qui permettrait
de remonter tout en haut de ma page ?? »

un bouton ? euh... et ce bouton, il est placé où ? sur la feuille ? et en haut de page ?
ah bon ! donc si je comprends bien, il faut remonter tout en haut de la page
pour pouvoir cliquer sur le bouton qui me permettra d'aller en haut de page !
(remarquez, c'est d'une logique imparable, à toute épreuve ! d'ailleurs, on monte
souvent au dernier étage d'un immeuble pour prendre l'ascenseur qui monte au
dernier étage...)

bon, admettons que le bouton ne soit pas tout en haut de page, mais au milieu vertical
de la feuille, ou en fin de page ? si le bouton n'est pas visible sur la partie de la feuille
qui est à l'écran, donc hors de portée d'un clic de souris, que se passe-t-il ? eh oui,
on est bien obligé de scroller pour pouvoir voir le bouton afin de cliquer dessus ! c'est
pas forcément commode, hein ? aussi, je propose de lancer la macro par un raccourci
clavier, par exemple Ctrl g ; et cette fois, on peut faire ce raccourci depuis n'importe quel
endroit de la feuille, sans avoir besoin de faire défiler l'écran vers le haut ou le bas !

Sub GoTop()
  Application.Goto [A1], True
End Sub

bien sûr, on peut choisir une autre lettre pour le raccourci clavier ; sur la feuille,
faire Alt F8 ➯ fenêtre Macro ; si la macro GoTop est la seule, alors elle est déjà
sélectionnée ; sinon, cliquer dessus pour la sélectionner ; à droite, cliquer sur le
bouton « Options... » ; c'est là, dans la petite case ; mettez la lettre que vous
préférez pour votre raccourci clavier ; cliquer sur le bouton OK.

soan

 

[chris]

Bonjour

Le bouton existe déjà c'est CTRL Home... Pourquoi réinventer...

 

[soan]

Bonjour @chris,

Tu as écrit : « Le bouton existe déjà c'est CTRL Home... »

Oui, bien sûr, tu as raison ; mais le titre du sujet est :

« code vba pour remonter en haut d'une page »

(éventuellement, utilise SendKey)

soan

 

[chris]

RE

Tu as écrit : « Le bouton existe déjà c'est CTRL Home... »

Oui, bien sûr, tu as raison ; mais le titre du sujet est :

« code vba pour remonter en haut d'une page »

(éventuellement, utilise SendKey)

Effectivement, mais j'ai vu tellement de lignes inutiles de VBA dues à la méconnaissance d'Excel que je n'encourage pas à réinventer l'eau tiède.
Le fonctionnement natif sera toujours plus rapide que du VBA

Quand à utiliser Sendkey à l'intérieur d'Excel c'est un non sens qui en plus désactive le pavé numérique

 

[job75]

Bonsoir le fil, chris

Chez moi pas de touche <Home> mais Maj+F11 fait l'affaire.

A+

 

[chris]

RE

Chez moi pas de touche <Home> mais Maj+F11 fait l'affaire.

Ha les portables ! Pas une ptite flèche oblique planquée ?
Pas mieux sur mon clavier volant k400 plus

 

[soan]

@chris

Oui, je connaissais déjà le défaut du SendKey qui désactive le pavé numérique ;
j'avais déjà lu quelque chose à ce sujet, ainsi que sur une façon d'y remédier,
mais j'me rappelle plus comment, ni l'article en question ; sinon, j'aurais mis
un lien dessus.

soan

 

[soan]

@job75

J'ai essayé Shift F11 ; sur mon Excel 2007, au lieu d'aller en haut de page,
ça ajoute au classeur en cours une nouvelle feuille. (j'ai un PC de bureau,
pas un PC portable)

Donc c'est probablement car tu utilises un PC portable : ton Shift F11 va
en haut de page, mais à condition d'appuyer aussi sur la touche Fn :

Shift Fn F11

Sinon, Shift F11 doit être la fonction 1ère de ton PC portable (et c'est pas
quelque chose de standard et normalisé : ça varie d'un PC portable à un
autre ; et parfois même pour les portables d'une même marque !) ; aussi,
la fonction 1ère (spéciale) de ton PC portable est peut-être pour baisser
la luminosité de l'écran. (la lecture de la doc du PC doit indiquer les
fonctions de ces touches spéciales)

soan

 

[job75]

Ha les portables ! Pas une ptite flèche oblique planquée ?

Sur mon ASUS la touche F11 porte une flèche barrée dirigée vers le haut.

Avec Maj+F11 je n'ai pas besoin d'appuyer sur la touche Fn.

Effectivement la touche F9 porte une flèche oblique, Maj+F9 fait la même chose.

 

[soan]

Bonjour job75,

Une touche avec un symbole de flèche oblique (du sud-est au nord-ouest), c'est la touche
Home (en anglais) ou Début (en français) ; donc Ctrl cette touche = Ctrl Début = aller en
haut d'une feuille de calcul Excel, ou aller en haut d'une page Word (par exemple).

Une touche avec une flèche vers le haut et plusieurs traits, c'est « Page précédente » ;
une touche avec une flèche vers le bas et plusieurs traits, c'est « Page suivante » ;
en anglais : « PageUp » et « PageDown ».

soan