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 Aux derniers des utilisateurs d'excel 2000

Aux derniers des utilisateurs d'excel 2000

14 réponses
Avatar
milloche
Bonjour,
Y aurait-il un moyen dans un fichier ou les titres sont figés, de savoir
quelle est actuellement la ligne située le plus haut, juste sous les
titres.
Je le vois bien de mes yeux, mais j'aimerais qu'excel me mette ça dans une
variable.
Je sèche, MichDenis aussi.
Merci
Signaler un problème avec ce contenu

4 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
milloche
Si tu regardes un peu la macro, j'ai même pensé à effectuer une petite
correction quand excel revient en plein écran.
Ceci parce-que la barre d'outil s'affiche de nouveau.
Et mon pointeur revient toujours (soyons précis) sur le "n" de denis

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

J'ai bien dis que je travaille sous excel 2000.
Tu teste avec un 2007 et ton classeur 2007 ne fonctionne pas chez moi.
L'inverse peut aussi être possible.
<]:o))


"milloche" a écrit dans le message de news:
%23U$
J'en suis au 50eme clic, et je bouge les données de temps en temps avec
ma roulette de souris, mais ma flèche à moi revient toujours pile poil
sur denis.
Nous n'avons sans doute pas la même marque d'ordinateur !

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

Si tu es satisfait, tant mieux !

P.S - J'ai ouvert le fichier, et au 7 ième clic le curseur était en
dehors
de la surface du bouton.





"milloche" a écrit dans le message de
groupe de discussion :
Le fichier modifié.
Je n'ai pas de classeur à te proposer.
Je ne fais pas partie des répondeurs bénévoles, et n'ai pas de
bibliothèque..
Cà fonctionne ou que tu sois dans la visualisation des données.
C'était d'ailleurs le problème. En bougeant les données, le Y était
perdu.
Il n'y a que 2 volets (freezepanes en A3)
Et çà fonctionne avec excel 2000.
http://cjoint.com/?fhfe3JcxQS
Cordialement.

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

Il me semblait que tu voulais automatiser le déplacement du curseur
au centre de la cellule ? Non ?

Cette demande selon moi, est très loin de ta question originale.

Avec les réponses que tu as reçues, ce serait gentil de nous revenir
avec
le code qui te permet de positionner le curseur au milieu d'une
cellule
quelconque (selon le choix de l'usager). Tu as eu un classeur exemple
pour Excel 2007. J'aimerais bien avoir un classeur à cet effet sous
les
versions précédentes.





"milloche" a écrit dans le message de
groupe de discussion : #
Denis
Aurais-je encore dis quelque chose qu'il ne fallait pas ?
Je m'en excuse, mais c'est toi même qui écrivait :

Voilà pourquoi tu n'as pas pu faire fonctionner les exemples de code
soumis.
Il y a peut-être quelqu'un sur ce forum qui peut adapter les
procédures
pour Excel 2003
et versions précédentes.



Et c'est ce que j'ai fait, chercher quelqu'un pour adapter, sur un
nouveau
fil.
Concernant les volets, tu as du voir sur mon ci-joint que mon fichier
n'avait que 2 volets.
Mais on va pas se fâcher. Tu as fait un boulot très important pour
moi.
Cordialement.
JMM

"MichDenis" a écrit dans le message de news:
%
Bonjour Milloche,

| Je sèche, MichDenis aussi

Es-tu certain que ce que tu avances ?

S'il ne manque que ça à ton bonheur...

Quand tu figes les volets, ta feuille est divisée en 4 quadrants

quadrant 1 quadrant 2

quadrant 3 quadrant 4

Pour déterminer l'adresse de la première cellule d'un quadrant :

Le 3 représente le quadrant
Ceci pour l'adresse de la cellule
x = ActiveWindow.Panes(3).VisibleRange.Cells(1, 1).Address

Ceci pour la ligne de la première de la cellule
x = ActiveWindow.Panes(3).VisibleRange.Cells(1, 1).Row






"milloche" a écrit dans le message de
groupe de discussion : #
Bonjour,
Y aurait-il un moyen dans un fichier ou les titres sont figés, de
savoir
quelle est actuellement la ligne située le plus haut, juste sous les
titres.
Je le vois bien de mes yeux, mais j'aimerais qu'excel me mette ça
dans
une
variable.
Je sèche, MichDenis aussi.
Merci














Avatar
milloche
Bonjour Denis
Nous sommes allés très très loin. C'est ma faute dois-je reconnaître.
La solution était sur le pas de la porte.Que pense tu de celle-là.

Private Declare Function SetCursorPos Lib "user32" _
(ByVal X As Long, ByVal Y As Long) As Long
Sub TestXY()
X = 400 : Y = 300 : SetCursorPos X, Y ' au centre de l' écran en 800*600
End Sub
Ligne que je peux ajouter, après réglage X et Y, ou je veux dans une macros
quelconque. C'est du moins ce que montrent mes tests de ce jour.
Cordialement.
JMM


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

Si tu es satisfait, tant mieux !

P.S - J'ai ouvert le fichier, et au 7 ième clic le curseur était en
dehors
de la surface du bouton.





"milloche" a écrit dans le message de
groupe de discussion :
Le fichier modifié.
Je n'ai pas de classeur à te proposer.
Je ne fais pas partie des répondeurs bénévoles, et n'ai pas de
bibliothèque..
Cà fonctionne ou que tu sois dans la visualisation des données.
C'était d'ailleurs le problème. En bougeant les données, le Y était
perdu.
Il n'y a que 2 volets (freezepanes en A3)
Et çà fonctionne avec excel 2000.
http://cjoint.com/?fhfe3JcxQS
Cordialement.

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

Il me semblait que tu voulais automatiser le déplacement du curseur
au centre de la cellule ? Non ?

Cette demande selon moi, est très loin de ta question originale.

Avec les réponses que tu as reçues, ce serait gentil de nous revenir
avec
le code qui te permet de positionner le curseur au milieu d'une cellule
quelconque (selon le choix de l'usager). Tu as eu un classeur exemple
pour Excel 2007. J'aimerais bien avoir un classeur à cet effet sous les
versions précédentes.





"milloche" a écrit dans le message de
groupe de discussion : #
Denis
Aurais-je encore dis quelque chose qu'il ne fallait pas ?
Je m'en excuse, mais c'est toi même qui écrivait :

Voilà pourquoi tu n'as pas pu faire fonctionner les exemples de code
soumis.
Il y a peut-être quelqu'un sur ce forum qui peut adapter les procédures
pour Excel 2003
et versions précédentes.



Et c'est ce que j'ai fait, chercher quelqu'un pour adapter, sur un
nouveau
fil.
Concernant les volets, tu as du voir sur mon ci-joint que mon fichier
n'avait que 2 volets.
Mais on va pas se fâcher. Tu as fait un boulot très important pour moi.
Cordialement.
JMM

"MichDenis" a écrit dans le message de news:
%
Bonjour Milloche,

| Je sèche, MichDenis aussi

Es-tu certain que ce que tu avances ?

S'il ne manque que ça à ton bonheur...

Quand tu figes les volets, ta feuille est divisée en 4 quadrants

quadrant 1 quadrant 2

quadrant 3 quadrant 4

Pour déterminer l'adresse de la première cellule d'un quadrant :

Le 3 représente le quadrant
Ceci pour l'adresse de la cellule
x = ActiveWindow.Panes(3).VisibleRange.Cells(1, 1).Address

Ceci pour la ligne de la première de la cellule
x = ActiveWindow.Panes(3).VisibleRange.Cells(1, 1).Row






"milloche" a écrit dans le message de
groupe de discussion : #
Bonjour,
Y aurait-il un moyen dans un fichier ou les titres sont figés, de
savoir
quelle est actuellement la ligne située le plus haut, juste sous les
titres.
Je le vois bien de mes yeux, mais j'aimerais qu'excel me mette ça dans
une
variable.
Je sèche, MichDenis aussi.
Merci






Avatar
milloche
J'ai au contraire l'impression, d'après mes tests en cours, que cette
minimacro ne tient absolument plus compte de la taille et de la position de
la fenêtre excel, mais de l'écran entier. Si je mets X=0 et Y=0, la souris
se met dans le coin haut gauche de l'écran, avec X€0 et Y= 600, dans le
coin bas droit de l'écran, même si ma fenêtre Excel est dimensionnée juste
dans le quart haut droit. C'est quand j'ai enlevé les barres d'outils ou
les headings que je règle manuellement mais une fois pour toutes le X et le
Y de cette commande.
Bien sur celà ne peut fonctionner qu'avec des écrans de même résolution ou
de préférences avec le même ordinateur. Ce n'est qu'une solution locale,
mais je n'ai pas l'intention de distribuer mon fichier.
Merci de ta réponse. Essaye quand t'auras le temps.
JMM

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

ça va fonctionner pourvu que tu conserves certaines caractéristiques
de ta feuille de calcul comme :

- présence ou absence d'une barre d'outils (ligne occupée par celle-cci)
- présence de la barre de formule ou non
- présence de l'en-tête de ligne ou pas

Que se passe-t-il si un usager décide de places les barres d'outils à
gauche de l'écran ?

Ces modifications de l'interface de la feuille de calcul vont modifier
l'emplacement relatif
du bouton dans la feuille. Comme, tu n'as aucun moyen de modifier la
valeur des
constantes 400 et 300, dans certains cas, il se peut très bien que le
résultat attendu
ne soit pas au rendez-vous.
Si tu contrôles ce qui précède, l'exécution de la même ligne de commande
devrait
donner toujours le même résultat. Pourquoi en serait-il autrement ???

Dans une feuille sans volet figé, on n'a pas à tenir compte de ce qui
précède. J'ai déjà
tout expliqué dans un message précédent sur le sujet.

Avec la version Excel 2007, on a ajouté la propriété :
"PointsToScreenPixelsX" et "PointsToScreenPixelsY"
à l'objet "Pane" qui devient alors très utile. Si tu as la
chance d'ouvrir le fichier publié sous Excel 2007 sur le sujet,
tu vas pouvoir le constater !




"milloche" a écrit dans le message de
groupe de discussion :
Bonjour Denis
Nous sommes allés très très loin. C'est ma faute dois-je reconnaître.
La solution était sur le pas de la porte.Que pense tu de celle-là.

Private Declare Function SetCursorPos Lib "user32" _
(ByVal X As Long, ByVal Y As Long) As Long
Sub TestXY()
X = 400 : Y = 300 : SetCursorPos X, Y ' au centre de l' écran en 800*600
End Sub
Ligne que je peux ajouter, après réglage X et Y, ou je veux dans une
macros
quelconque. C'est du moins ce que montrent mes tests de ce jour.
Cordialement.
JMM


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

Si tu es satisfait, tant mieux !

P.S - J'ai ouvert le fichier, et au 7 ième clic le curseur était en
dehors
de la surface du bouton.





"milloche" a écrit dans le message de
groupe de discussion :
Le fichier modifié.
Je n'ai pas de classeur à te proposer.
Je ne fais pas partie des répondeurs bénévoles, et n'ai pas de
bibliothèque..
Cà fonctionne ou que tu sois dans la visualisation des données.
C'était d'ailleurs le problème. En bougeant les données, le Y était
perdu.
Il n'y a que 2 volets (freezepanes en A3)
Et çà fonctionne avec excel 2000.
http://cjoint.com/?fhfe3JcxQS
Cordialement.

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

Il me semblait que tu voulais automatiser le déplacement du curseur
au centre de la cellule ? Non ?

Cette demande selon moi, est très loin de ta question originale.

Avec les réponses que tu as reçues, ce serait gentil de nous revenir
avec
le code qui te permet de positionner le curseur au milieu d'une cellule
quelconque (selon le choix de l'usager). Tu as eu un classeur exemple
pour Excel 2007. J'aimerais bien avoir un classeur à cet effet sous les
versions précédentes.





"milloche" a écrit dans le message de
groupe de discussion : #
Denis
Aurais-je encore dis quelque chose qu'il ne fallait pas ?
Je m'en excuse, mais c'est toi même qui écrivait :

Voilà pourquoi tu n'as pas pu faire fonctionner les exemples de code
soumis.
Il y a peut-être quelqu'un sur ce forum qui peut adapter les
procédures
pour Excel 2003
et versions précédentes.



Et c'est ce que j'ai fait, chercher quelqu'un pour adapter, sur un
nouveau
fil.
Concernant les volets, tu as du voir sur mon ci-joint que mon fichier
n'avait que 2 volets.
Mais on va pas se fâcher. Tu as fait un boulot très important pour moi.
Cordialement.
JMM

"MichDenis" a écrit dans le message de news:
%
Bonjour Milloche,

| Je sèche, MichDenis aussi

Es-tu certain que ce que tu avances ?

S'il ne manque que ça à ton bonheur...

Quand tu figes les volets, ta feuille est divisée en 4 quadrants

quadrant 1 quadrant 2

quadrant 3 quadrant 4

Pour déterminer l'adresse de la première cellule d'un quadrant :

Le 3 représente le quadrant
Ceci pour l'adresse de la cellule
x = ActiveWindow.Panes(3).VisibleRange.Cells(1, 1).Address

Ceci pour la ligne de la première de la cellule
x = ActiveWindow.Panes(3).VisibleRange.Cells(1, 1).Row






"milloche" a écrit dans le message de
groupe de discussion : #
Bonjour,
Y aurait-il un moyen dans un fichier ou les titres sont figés, de
savoir
quelle est actuellement la ligne située le plus haut, juste sous les
titres.
Je le vois bien de mes yeux, mais j'aimerais qu'excel me mette ça dans
une
variable.
Je sèche, MichDenis aussi.
Merci








Avatar
milloche
Précision :
La taille et la position de la fenêtre quand je la réduis est fait par
macro aussi.
Ceci fait qu'elles sont toujours pile poil au même endroit et avec la même
taille.

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

ça va fonctionner pourvu que tu conserves certaines caractéristiques
de ta feuille de calcul comme :

- présence ou absence d'une barre d'outils (ligne occupée par celle-cci)
- présence de la barre de formule ou non
- présence de l'en-tête de ligne ou pas

Que se passe-t-il si un usager décide de places les barres d'outils à
gauche de l'écran ?

Ces modifications de l'interface de la feuille de calcul vont modifier
l'emplacement relatif
du bouton dans la feuille. Comme, tu n'as aucun moyen de modifier la
valeur des
constantes 400 et 300, dans certains cas, il se peut très bien que le
résultat attendu
ne soit pas au rendez-vous.
Si tu contrôles ce qui précède, l'exécution de la même ligne de commande
devrait
donner toujours le même résultat. Pourquoi en serait-il autrement ???

Dans une feuille sans volet figé, on n'a pas à tenir compte de ce qui
précède. J'ai déjà
tout expliqué dans un message précédent sur le sujet.

Avec la version Excel 2007, on a ajouté la propriété :
"PointsToScreenPixelsX" et "PointsToScreenPixelsY"
à l'objet "Pane" qui devient alors très utile. Si tu as la
chance d'ouvrir le fichier publié sous Excel 2007 sur le sujet,
tu vas pouvoir le constater !




"milloche" a écrit dans le message de
groupe de discussion :
Bonjour Denis
Nous sommes allés très très loin. C'est ma faute dois-je reconnaître.
La solution était sur le pas de la porte.Que pense tu de celle-là.

Private Declare Function SetCursorPos Lib "user32" _
(ByVal X As Long, ByVal Y As Long) As Long
Sub TestXY()
X = 400 : Y = 300 : SetCursorPos X, Y ' au centre de l' écran en 800*600
End Sub
Ligne que je peux ajouter, après réglage X et Y, ou je veux dans une
macros
quelconque. C'est du moins ce que montrent mes tests de ce jour.
Cordialement.
JMM


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

Si tu es satisfait, tant mieux !

P.S - J'ai ouvert le fichier, et au 7 ième clic le curseur était en
dehors
de la surface du bouton.





"milloche" a écrit dans le message de
groupe de discussion :
Le fichier modifié.
Je n'ai pas de classeur à te proposer.
Je ne fais pas partie des répondeurs bénévoles, et n'ai pas de
bibliothèque..
Cà fonctionne ou que tu sois dans la visualisation des données.
C'était d'ailleurs le problème. En bougeant les données, le Y était
perdu.
Il n'y a que 2 volets (freezepanes en A3)
Et çà fonctionne avec excel 2000.
http://cjoint.com/?fhfe3JcxQS
Cordialement.

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

Il me semblait que tu voulais automatiser le déplacement du curseur
au centre de la cellule ? Non ?

Cette demande selon moi, est très loin de ta question originale.

Avec les réponses que tu as reçues, ce serait gentil de nous revenir
avec
le code qui te permet de positionner le curseur au milieu d'une cellule
quelconque (selon le choix de l'usager). Tu as eu un classeur exemple
pour Excel 2007. J'aimerais bien avoir un classeur à cet effet sous les
versions précédentes.





"milloche" a écrit dans le message de
groupe de discussion : #
Denis
Aurais-je encore dis quelque chose qu'il ne fallait pas ?
Je m'en excuse, mais c'est toi même qui écrivait :

Voilà pourquoi tu n'as pas pu faire fonctionner les exemples de code
soumis.
Il y a peut-être quelqu'un sur ce forum qui peut adapter les
procédures
pour Excel 2003
et versions précédentes.



Et c'est ce que j'ai fait, chercher quelqu'un pour adapter, sur un
nouveau
fil.
Concernant les volets, tu as du voir sur mon ci-joint que mon fichier
n'avait que 2 volets.
Mais on va pas se fâcher. Tu as fait un boulot très important pour moi.
Cordialement.
JMM

"MichDenis" a écrit dans le message de news:
%
Bonjour Milloche,

| Je sèche, MichDenis aussi

Es-tu certain que ce que tu avances ?

S'il ne manque que ça à ton bonheur...

Quand tu figes les volets, ta feuille est divisée en 4 quadrants

quadrant 1 quadrant 2

quadrant 3 quadrant 4

Pour déterminer l'adresse de la première cellule d'un quadrant :

Le 3 représente le quadrant
Ceci pour l'adresse de la cellule
x = ActiveWindow.Panes(3).VisibleRange.Cells(1, 1).Address

Ceci pour la ligne de la première de la cellule
x = ActiveWindow.Panes(3).VisibleRange.Cells(1, 1).Row






"milloche" a écrit dans le message de
groupe de discussion : #
Bonjour,
Y aurait-il un moyen dans un fichier ou les titres sont figés, de
savoir
quelle est actuellement la ligne située le plus haut, juste sous les
titres.
Je le vois bien de mes yeux, mais j'aimerais qu'excel me mette ça dans
une
variable.
Je sèche, MichDenis aussi.
Merci








1 2