Function ShowGradientProperties(oSld as Slide) Dim counter as Integer With oSld.Background.Fill.GradientStops For counter = 1 to .Count Debug.Print counter, .Item(counter).Color Debug.Print counter, .Item(counter).Position Debug.Print counter, .Item(counter).Transparency Next End With End Function
oSld.Background.Fill.GradientStops.Insert2 RGB, Position, [Transparency], [Index], [Brightness]
|passing a value with stream reader AFTER a ";"||3||59|
|VBS Script not working correctly.||1||38|
|Running VB/Batch script through Group policy||30||80|
|How to measure sizes and angles in scanned images ?||3||54|
Join the community of 500,000 technology professionals and ask your questions.
Connect with top rated Experts
23 Experts available now in Live!