OVH Cloud OVH Cloud

VBA Excel - select de cellule

6 réponses
Avatar
eric lecocq
Salut,

mon problème est le suivant:

j'écris "range("A1").select" pour pouvoir recaler ma fenêtre au début. cela
ne marche pas.
je précise qu'il y a un split, que "record new macro" me donne le même
code...

des idées ?

merci d'avance,

Ele.

6 réponses

Avatar
tictok
Bonjour Eric
Et un Range("A1").Activate ?

"eric lecocq" escreveu na mensagem
news:
Salut,

mon problème est le suivant:

j'écris "range("A1").select" pour pouvoir recaler ma fenêtre au début.
cela

ne marche pas.
je précise qu'il y a un split, que "record new macro" me donne le même
code...

des idées ?

merci d'avance,

Ele.




Avatar
michdenis
Bonjour Éric,

En supposant que ta feuille est totalement coupée en deux (fractionner) et que la feuille est active ....


Ce code va faire "remonter" l'ascenseur de la section de la fenêtre du bas et sélectionner la cellule A1
ActiveWindow.Panes(2).Activate
Range("A1").Select

Pour sélectionner la cellule A1 de la section du haut de la fenêtre :

ActiveWindow.Panes(1).Activate
Range("A1").Select



Salutations!



"eric lecocq" a écrit dans le message de news:
Salut,

mon problème est le suivant:

j'écris "range("A1").select" pour pouvoir recaler ma fenêtre au début. cela
ne marche pas.
je précise qu'il y a un split, que "record new macro" me donne le même
code...

des idées ?

merci d'avance,

Ele.
Avatar
eric lecocq
marche pas !
A1 est bien sélectionnée mais reste en dehors de mon écran

que faire ?

:o(((

"michdenis" wrote in message
news:
Bonjour Éric,

En supposant que ta feuille est totalement coupée en deux (fractionner) et
que la feuille est active ....



Ce code va faire "remonter" l'ascenseur de la section de la fenêtre du bas
et sélectionner la cellule A1

ActiveWindow.Panes(2).Activate
Range("A1").Select

Pour sélectionner la cellule A1 de la section du haut de la fenêtre :

ActiveWindow.Panes(1).Activate
Range("A1").Select



Salutations!



"eric lecocq" a écrit dans le message de
news:

Salut,

mon problème est le suivant:

j'écris "range("A1").select" pour pouvoir recaler ma fenêtre au début.
cela

ne marche pas.
je précise qu'il y a un split, que "record new macro" me donne le même
code...

des idées ?

merci d'avance,

Ele.





Avatar
michdenis
Bonjour Éric,

Je te fais remarquer que le code de mon dernier message fonctionne dans une fenêtre "FRACTIONNER"


Si tu as une fenêtre où les volets de ta fenêtre sont figés, c'est une autre histoire.


Essaie cela : Fenêtre (feuille) fractionner en 2 et dont les volets sont figés

ActiveWindow.ScrollColumn = ActiveWindow.SplitColumn + 1
ActiveWindow.ScrollRow = ActiveWindow.SplitRow


J'en profite pour souligner que lorsque tu figes les volets, c'est la cellule qui est sélectionnée qui sert de "pivot"
aux fenêtres.

'Retourne le nombre de "Quadran" de la feuille
a = ActiveWindow.Panes.Count

A = Numéro de ligne de la cellule servant de pivot
A = ActiveWindow.SplitRow
B= Numéro de Colonne de la celllule servant de pivot
C = ActiveWindow.SplitColumn

En addtionnant +1 ou non comme dans mes 2 lignes de code, tu arrives à déterminer quelle position occupe la cellule que
tu désires sélectionnée.... il ne te reste plus qu'à l'attribuer à la propriété ScrollColumn ou ScrollRow.



Salutations!




"eric lecocq" a écrit dans le message de news:
marche pas !
A1 est bien sélectionnée mais reste en dehors de mon écran

que faire ?

:o(((

"michdenis" wrote in message
news:
Bonjour Éric,

En supposant que ta feuille est totalement coupée en deux (fractionner) et
que la feuille est active ....



Ce code va faire "remonter" l'ascenseur de la section de la fenêtre du bas
et sélectionner la cellule A1

ActiveWindow.Panes(2).Activate
Range("A1").Select

Pour sélectionner la cellule A1 de la section du haut de la fenêtre :

ActiveWindow.Panes(1).Activate
Range("A1").Select



Salutations!



"eric lecocq" a écrit dans le message de
news:

Salut,

mon problème est le suivant:

j'écris "range("A1").select" pour pouvoir recaler ma fenêtre au début.
cela

ne marche pas.
je précise qu'il y a un split, que "record new macro" me donne le même
code...

des idées ?

merci d'avance,

Ele.





Avatar
Frédéric Sigonneau
Bonsoir,

Essaye plutôt

Application.Goto Range("A1"),True

FS
---
Frédéric Sigonneau [MVP Excel - né un sans-culottide]
Gestions de temps, VBA pour Excel :
http://perso.wanadoo.fr/frederic.sigonneau
Si votre question sur Excel est urgente, évitez ma bal !


Salut,

mon problème est le suivant:

j'écris "range("A1").select" pour pouvoir recaler ma fenêtre au début. cela
ne marche pas.
je précise qu'il y a un split, que "record new macro" me donne le même
code...

des idées ?

merci d'avance,

Ele.




Avatar
eric lecocq
merci beaucoup !
ceci a parfaitement fonctionné !

Ele.

"michdenis" wrote in message
news:
Bonjour Éric,

Je te fais remarquer que le code de mon dernier message fonctionne dans
une fenêtre "FRACTIONNER"



Si tu as une fenêtre où les volets de ta fenêtre sont figés, c'est une
autre histoire.



Essaie cela : Fenêtre (feuille) fractionner en 2 et dont les volets sont
figés


ActiveWindow.ScrollColumn = ActiveWindow.SplitColumn + 1
ActiveWindow.ScrollRow = ActiveWindow.SplitRow


J'en profite pour souligner que lorsque tu figes les volets, c'est la
cellule qui est sélectionnée qui sert de "pivot"

aux fenêtres.

'Retourne le nombre de "Quadran" de la feuille
a = ActiveWindow.Panes.Count

A = Numéro de ligne de la cellule servant de pivot
A = ActiveWindow.SplitRow
B= Numéro de Colonne de la celllule servant de pivot
C = ActiveWindow.SplitColumn

En addtionnant +1 ou non comme dans mes 2 lignes de code, tu arrives à
déterminer quelle position occupe la cellule que

tu désires sélectionnée.... il ne te reste plus qu'à l'attribuer à la
propriété ScrollColumn ou ScrollRow.




Salutations!




"eric lecocq" a écrit dans le message de
news:

marche pas !
A1 est bien sélectionnée mais reste en dehors de mon écran

que faire ?

:o(((

"michdenis" wrote in message
news:
Bonjour Éric,

En supposant que ta feuille est totalement coupée en deux (fractionner)
et


que la feuille est active ....


Ce code va faire "remonter" l'ascenseur de la section de la fenêtre du
bas


et sélectionner la cellule A1
ActiveWindow.Panes(2).Activate
Range("A1").Select

Pour sélectionner la cellule A1 de la section du haut de la fenêtre :

ActiveWindow.Panes(1).Activate
Range("A1").Select



Salutations!



"eric lecocq" a écrit dans le message de
news:

Salut,

mon problème est le suivant:

j'écris "range("A1").select" pour pouvoir recaler ma fenêtre au début.
cela

ne marche pas.
je précise qu'il y a un split, que "record new macro" me donne le même
code...

des idées ?

merci d'avance,

Ele.