< návrat zpět

MS Excel


Téma: Úprava makra rss

Zaslal/a 15.10.2013 21:06

Dobrý den,
prosím o radu. Mám makro v kterém vyhledávám duplicitní položky a ty označím oválem. Bohužel neumím upravit sílu čáry oválu, která překrývá text. Níže uvádím kód nastavení oválu u kterého je síla čáry 2,25 bodu a rád bych měl sílu čáry 1,5 bodu. Prosím poraďte.

With .Shapes.AddShape(msoShapeOval, _
rngX.Left, _
rngX.Top, _
rngX.Width, _
rngX.Height)
.Fill.Visible = msoFalse
.Line.ForeColor.SchemeColor = 13
End With

Zaslat odpověď >

icon #015679
avatar
Sub xxx()
Dim MyShape As Shape
Set MyShape = ActiveSheet.Shapes(1)
With MyShape.Line
.Weight = 1.5
End With
End Sub


čiže v tom Tvojom kóde by pred end with malo stačiť doplniť riadok:.Line.Weight = 1.5citovat
#015684
avatar
Moc děkuji funguje bezvadně.citovat
icon #015685
avatar
za nič 1citovat

Uživatelské menu

Nejste přihlášen(a)
avatar\n

Menu

On-line nástroje

Formulář Faktura

Formulář Faktura IV

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

Aktivní diskuse

excell uprava riadku vzorca

orangezradca • 13.6. 20:37

pomala tlac s exelu

jano5 • 12.6. 9:44

GRAF teploty

JoKe • 12.6. 9:22

Filtrování dat

Imh0tep • 12.6. 8:35

Filtrování dat

Lader • 11.6. 23:22

Filtrování dat

Imh0tep • 11.6. 21:15

Zjištění směny dle data a času

Ontik • 11.6. 14:23