d'accords je coorige et te donne la ligne pour qu'elle soit universelle ta fonction
d'accords je coorige et te donne la ligne pour qu'elle soit universelle ta fonction
voila
donc soit
Code : Sélectionner tout - Visualiser dans une fenêtre à part cadre = IIf(Application.OperatingSystem Like "*10*" And Application.Version <> 12, -5, 1)
window10 et excelXXXX mais pas 2007 =-5
window7 et excel 2007 =1
window10 et excel 2007 =1 même si le shell de w10 n'affiche pas le cadres des fenêtres comme w7
voila
erreur13 imcompatibilité de type, quand je met le curseur sur cadre il est cadre = vide
cadre = IIf(Application.OperatingSystem Like "*10*", -5, 1)
comme ça ça marche
allons donc???
msgbox Application.OperatingSystem Like "*10*"
msgbox application.verion <>12
cadre = IIf(Application.OperatingSystem Like "*10*" And Application.Version = "16.0", -5, 1)
comme ça c'est ok
alors ca devrait marcher
a moins qu'avec val
ou bien encore
Code : Sélectionner tout - Visualiser dans une fenêtre à part cadre = IIf(Application.OperatingSystem Like "*10*" And val( Application.Version )<> 12, -5, 1)
Code : Sélectionner tout - Visualiser dans une fenêtre à part cadre = IIf(Application.OperatingSystem Like "*10*" And not Application.Version like"*12*", -5, 1)
T'es un champion, ça marche nickel avec l'une ou l'autre, merci
re
Bonjour Nicolas
maintenant on peut le dire c'est universel
maintenant que tu comprends ma logique tu peut essayer de reprendre la méthode de Jacques en essayant de lui affublé cette condition
elle sera universel aussi
la seule chose qui me gène dans ta version c'est le( -5 /+1)qui fonctionne mais on ne sais pas ou il les prends
je préfèrerait que tu trouve une dimension dans excel
perso j'ai pensé a ceci:
X=round((cells(rows.count,columns.count).height/3))'=5
il faudrait que tu teste voir si c'est pareil chez toi avec ou sans zoom
que donne le rsultat de ca chez toi vu qu'avec W10 le cadre est absent
Code : Sélectionner tout - Visualiser dans une fenêtre à part usable = Application.Width - Application.UsableWidth
et application.width-application.usablewidth ca donne quoi! chez toi
c'est ce qui explique le + ou - 6
mais pour l'universalité c'et inexploitable car chez moi c'est 9.086xxxxx
ca m'ennuie d'utiliser une cells pour le 5 car elle pourrait être éventuellement modifiée
faut chercher encore
on finira bien par trouver
j'ai un doute
essaie -4 plutôt chez toi et teste a 100 et 200%
escuse moi je m'étais planter, à force je mi perds, le résultat à l'œil est le même, j'ai essayé à 400%, je vois rien de différent
Quand je mets la colonne A à 20pix et avec 4 j'ai un décalage, mais en 5 je suis toujours ok
Vous avez un bloqueur de publicités installé.
Le Club Developpez.com n'affiche que des publicités IT, discrètes et non intrusives.
Afin que nous puissions continuer à vous fournir gratuitement du contenu de qualité, merci de nous soutenir en désactivant votre bloqueur de publicités sur Developpez.com.
Partager