{quote}{login=Captain_Nemo}{date=10.12.2009 12:18}{thema=_}{post}For Each x In ActiveSheet.Shapes
x.Line.ForeColor.RGB = RGB(0, 0, 0)
Next x{/post}{/quote}
огромное спасибо!
x.Line.ForeColor.RGB = RGB(0, 0, 0)
Next x{/post}{/quote}
огромное спасибо!