MS Excel

Téma: "Straight Arrow Connector" vlastnosti

Zaslal/a Pimek 9.1.2021 19:54

Prosím o radu. Mám na listě vložený obrazec - obyčejnou přímku. Potřeboval bych ji různě zvětšovat a přemísťovat.
Ale dokáži měnit pouze jeden konec přímky pomocí změny vlastností Top a Left. Existuje možnost, jak měnit souřadnice i druhého konce úsečky?
Díky

Zaslat odpověď >

elninoslov(9.1.2021 20:56)#049417

Ak to dobre chápem, tak takto ???
Sub pokus()
ZmenaCiary Worksheets("Hárok1").Shapes("Straight Connector 2"), 40, 40, 90, 60
ZmenaCiary Worksheets("Hárok1").Shapes("Straight Connector 4"), 90, 60, 100, 160
End Sub

Sub ZmenaCiary(ByRef Ciara As Shape, X1 As Single, Y1 As Single, X2 As Single, Y2 As Single)
With Ciara
.Left = X1
.Top = Y1
.Width = X2 - X1
.Height = Y2 - Y1
End With
End Sub

Příloha: zip

49417_zmena-bodov-usecky.zip (13kB, staženo 11x)

citovat

Uživatelské menu

Nejste přihlášen(a)

Formulář Faktura

Formulář Faktura IV

Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.

Helios iNuvio

Používáte podnikový systém Helios iNuvio? Potřebujete pomoci se správou nebo vyvinout SQL proceduru? Více informací naleznete na stránce Helios iNuvio.