ajout d'un objet excel mais différence de taille.

[tonio44]

Bonjour,

J'ajoute un objet excel en vba mais il y a une différence de taille entre les 2 documents comment le résoudre ?

l'échelle du document inséré est 100%
et 43% pour le document sur lequel j'insère le fichier excel.

Le code utilisé est:

Range("A1").Select

ActiveSheet.OLEObjects.Add(Filename:= _
        chemin _
        , Link:=False, DisplayAsIcon:=False).Select
 
    Selection.Verb Verb:=xlPrimary ' je sais pas a quoi cela sert
    
    Range("C38:C42").Select ' je modifie certaine cellule du tableau ajouté
    ActiveCell.FormulaR1C1 = ind
    Range("C9:C35").Select
    ActiveCell.FormulaR1C1 = doc
    Range("B9:B35").Select
       ActiveCell.FormulaR1C1 = Pageactuelle & "/" & Nbpage
    ActiveWindow.Close
   
 Selection.ShapeRange.IncrementTop 260# '

Mon objet (quand je fais clique droit Format d'objet, Dimension, la taille initiale fait 17.59 en hauteur et 3.52 en largeur.
Et il est tout petit quand il est importer.

avez vous une solution ? Merci

 

[tonio44]

Re : ajout d'un objet excel mais différence de taille.

Je pense que c'est un problème d'échelle.

Quelqu'un a une idée ?
Merci d'avance