Saberexcel - site das macros
Essa macro do Aplicativo Microsoft Excel VBA(Visual Basic Application), insere na folha de planilha autoformas um autoformas(shape) na cor marrom gradiente(Degradê)
Sub Inserindo_shapes_degrade_planilha()
Set vDoc = Worksheets(1)
With vDoc.Shapes.AddShape(msoShapeRectangle, _
90, 90, 90, 50).Fill
.ForeColor.RGB = RGB(128, 0, 0)
.BackColor.RGB = RGB(170, 170, 170)
.TwoColorGradient msoGradientHorizontal, 1
End With
End Sub
Aprenda tudo sobre o Aplicativo Microsoft Excel VBA(Visual Basic Application), sozinho, com baixo custo, praticando com os produtos didáticos Saberexcel
Baixe o exemplo de planilha contendo o macro acima
Excel vba planilha shapes degrade planilha (64.77 KB 2011-03-10 09:15:34)