Et bien deja je ne comprends pourquoi tu ajoutes 5 a ton CentimetersToPoints ici
Code :
- If cm Then
- Selection.RowHeight = Application.CentimetersToPoints(cm) + 5
- End If
|
1cm = 28.346456693 points
donc 5cm = 5x28.346456693
5cm = 141.732283465 points
Le souci, c'est qu'avec CentimetersToPoints, si je fais :
Code :
- Selection.RowHeight = Application.CentimetersToPoints(5)
|
J'obtiens une hauteur à 141.75
Alors qu'elle devrait faire 141.73 si je ne prends que 2 chiffres apres la virgule.
Cela vient peut etre de ca...?
Maintenant, si je prends une image (ou un dessin) que je definis sa hauteur à 5cm, et que je la positionne sur ma ligne, avec
Code :
- Selection.RowHeight = Application.CentimetersToPoints(5)
|
j'ai bien l'image et la ligne alignées...
Pour finir, quelle version d'Excel as tu ?
Dans 2007 on peut definir les tailles en cm me semble-t-il
Message édité par SuppotDeSaTante le 30-04-2010 à 11:23:02
---------------
Soyez malin, louez entre voisins !