Új hozzászólás Aktív témák

• #18518 Delila_1 veterán huan #18516

  Új Válasz 2013-07-12 21:42:37 #18518

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  Delila_1

  veterán

  válasz huan #18516 üzenetére

  Tedd be a képeket, ahogy sikerül, és egy makróval az összeset egyszerre méretezheted.

  Sub Egyforma_meret()
  ActiveSheet.DrawingObjects.Select
  Selection.ShapeRange.LockAspectRatio = msoFalse
  Selection.ShapeRange.Height = 77.25
  Selection.ShapeRange.Width = 113.25
  Application.CutCopyMode = False
  End Sub

  A szélesség, és magasság értéket változtathatod, hogy a kívánt értéket elérd. Ha egész számot adsz, a végére #-ot tegyél, pl. 83#.

Új hozzászólás Aktív témák