Macro pour unité de mesure en Cm

Bonjour a tous, Forum bonjour

Je suis sous excel 2007- VBA et Windows 7

Je recherche une macro déja vu pour 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, une bonne journée a tous.

Cordialement Ray

Bonjour,

Si j'ai compris la question

Code à adapter:

Option Explicit
Public Sub SetColumnWidthMM(ColNo As Long, mmWidth As Integer)
' changes the column width to mmWidth
Dim w As Double
    If ColNo < 1 Or ColNo > 255 Then Exit Sub
    Application.ScreenUpdating = False
    w = Application.CentimetersToPoints(mmWidth / 10)
    While Columns(ColNo + 1).Left - Columns(ColNo).Left - 0.1 > w
        Columns(ColNo).ColumnWidth = Columns(ColNo).ColumnWidth - 0.1
    Wend
    While Columns(ColNo + 1).Left - Columns(ColNo).Left + 0.1 < w
        Columns(ColNo).ColumnWidth = Columns(ColNo).ColumnWidth + 0.1
    Wend
End Sub
Public Sub SetRowHeightMM(RowNo As Long, mmHeight As Integer)
' changes the row height to mmHeight
    If RowNo < 1 Or RowNo > 65536 Then Exit Sub
    Rows(RowNo).RowHeight = Application.CentimetersToPoints(mmHeight / 10)
End Sub
' This example macro shows how you can set the row height for row 3 and th
' column width for column C to 3.5 cm:
Sub ChangeWidthAndHeight()
    SetColumnWidthMM 3, 35
    SetRowHeightMM 3, 35
End Sub

Salut Jean-Eric, salut forum

Merci pour ta réponse, c'est sympa.

J'ai coller le code que tu me propose dans un module

mais après je fais quoi svp, si tu veux bien m'en dire plus pour utiliser la macro.

j'ai lu le code mais ça ne me parle pas trop.

Bon début de semaine a toi et merci.

Cdlt Ray

Re,

Je te retourne la question. Qu veux-tu faire?

Sub ChangeWidthAndHeight()
    SetColumnWidthMM 3, 35
    SetRowHeightMM 3, 35
End Sub

Cette procédure formate la cellule C3 avec une largeur de 3,5 cm.

Cdlt.

Salut Jean-Eric

merci pour ta réponse,

je souhaiterai svp par le biais d'une macro pouvoir utiliser les centimètres pour les lignes et les colonnes.

Utilisation multiples usages images jaquettes étiquettes et les imprimer etc etc pil poil a la bonne dimension.

Ex:

j'insère une image

j'étire colonne et ligne comme mon besoin

j'insère l'image dans le cadre que je viens de créer

et zou j'imprime

j'avais cette macro qui une fois installer fonctionnais nickel

malheureusement je n'arrive pas a remettre la main dessus

voila vu l'heure bon appétit et merci pour ton aide

Voir svp photo ci-jointe à la place sur la photo de >>>>Largeur: 20,38 >>> s'affichait Exemple: 12 Cm

Valable pour les lignes et colonnes bien sur

Cordialement Ray

centimetre

Bonsoir

Depuis 2007, sans macro, en se mettant en mode Affichage ==> Mise en Page

capture

Amicalement

Nad

Salut a tous, salut forum,

Bonjour Nad,

Je ne connaissais pas cette possibilité sur Excel 2007, donc ça fonctionne bien.

je te remercie pour le tuyau (non percé)

Merci également a Jean-éric

Je te souhaite une très agréable journée et merci

Cordialement Raymond

je clos le sujet

Rechercher des sujets similaires à "macro unite mesure"