Macro en CM comme unité de mesure

vieuxray -  
 vieuxray -
Bonjour a tous, Forum bonjour



Je suis sous excel 2007- VBA et Windows 7

Je recherche une macro pour mon excel 2007 de façon a pouvoir utiliser l'unité de mesure le centimètre pour les colonnes et les lignes.

j'ai chercher sur le net mais je n'ai pas retrouver cette macro

Merci a vous pour votre aide vu l'heure bon appétit a tous

Cordialement Ray

3 réponses

  1. ThauTheme Messages postés 1564 Statut Membre 160
     
    Bonjour Ray, bonjour le forum,

    Excel 2010 - Windows Seven

    Pour avoir les valeurs en centimètre il faut passer à l'affichage mode [Mise en Page]. J'ai enregistré une macro pour avoir une largeur de colonne de 1 cm et une hauteur de ligne de 1 cm et voici ce quelle me donne :

    Sub Macro3()
    ActiveWindow.View = xlPageLayoutView
    Columns("A:A").Select
    Selection.ColumnWidth = 4.29
    Rows("1:1").Select
    Selection.RowHeight = 28.25
    End Sub

    Donc visiblement Excel convertit les valeurs de deux manières différentes :
    1 cm = 4.29 pour la largeur
    1 cm = 28,5 pour la hauteur
    mais, comme tu le vois, les centimètres ne sont pas pris en compte...

    À plus,
    ThauTheme
    1
  2. vieuxray
     
    Salut ThauTheme,

    Merci pour ta réponse

    sous excel 2007 ce n'ai pas tout a fait exact sauf erreur de ma part

    mes essais pour 20cmx10cm

    1cm=4,29 pour largeur donc 4,29*20=85,8

    1cm=28,5 pour hauteur donc 28,5*10=285

    or sous excel 2007 pour imprimer exactement 10cm x 20cm

    92 pour 20cm et 296 pour 10cm

    j'ai imprimer c'est pil poil la bonne impression

    pas très facile tout ca et pas très précis non plus

    Merci a toi pour ton aide, je poursuis mes recherches.

    Cdlt Ray
    0
  3. vieuxray
     
    Salut ThauTheme,

    Donc après plusieurs essais, ta méthode n'ai pas mal ca fonctionne du moins quand on veux imprimer une image en Cm

    mais ce n'ai pas très pratique pour le retour a la page de travail normal.

    bonne soirée et merci

    Cdlt Ray
    0