je sais pas mais perso
quand je fait simplement cela a 2 zoom différents même si les résultats sont faux comme tu le prétends ou pas
et que je n'obtiens pas la même chose il est évident pour n'importe quel benets avec 2 neurones de comprendre que c'est "Z" qui est le responsable la bonne blague il y a que lui qui change
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4 with activewindow z=.zoom/100 .ActivePane.PointsToScreenPixelsX([D3].Width) - .ActivePane.PointsToScreenPixelsX(0)) / Z) / [D3].Width end with
et la il est nullement question de rustine ,bateau du voisin, tour de taille du fistion ou largeur du string de la voisine
c'est purement simple a comprendre
et si ce même benet n'avais qu'une seul neurones
en testant cela il verrait que pointstoscreenpixels n'a aucun problème
t'es pas miro non ?
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9 Sub test_cursor_pos() For i = 80 To 150 position_curseur [C3], i Sleep 200 Next End Sub Function position_curseur(rng, i) With ActiveWindow: .Zoom = i: SetCursorPos .ActivePane.PointsToScreenPixelsX(rng.Left), .ActivePane.PointsToScreenPixelsY(rng.Top): End With End Function
et la ca démontre bien ce que je dis malgré le defaut d'affichage que provoque le zoom pointstoscreenpixel lui donne la vrai position ECRAN!!!! car la il n'y a aucune operation ou formule utilisant le zoom seulement les point left et top en pixels
et la tu peut pas dire le contraire c'est gros comme le nez au milieu de ta figure
Partager