macro pour remplir cartouche, une fonction pour la taille du texte ?

Bonjour,

je suis entrain de me faire une macro pour remplir mon cartouche mais j'ai un petit soucis.
Y a t'il une fonction pour donner une taille de police dans la zone de texte que l'on vient de créer ? Parce que ça me sort des textes de 4,2mm ce qui est bien trop grand...

voici une partie de ma macro où je crée une zone texte que je remplis avec l'info dont j'ai besoin et que je place dans mon cartouche :

Code:

Set Sheets = doc.Sheets
Set Sheet = Sheets.Item("Sheet.1")
Set Views = Sheet.Views
Set View = Views.Item("Main View")
Set Texts =View.Texts

Set Text =Texts.Add(A1, 203, 41)
Set Text =Texts.Add(B1, 203, 45)
Set Text =Texts.Add(C1, 203, 49)

Set Text =Texts.Add(A2, 218, 41)
Set Text = Texts.Add(B2, 218, 45)
Set Text = Texts.Add(C2, 218, 49)

merci d'avance pour votre aide

salut,

essaye avec cette fonction, moi ça marche sur du catscript:

Text.SetFontSize 0, 0, 3.5

juste a changer le 3.5 par la taille de police que tu souhaite!