Sign in
apache
/
poi
/
9618056f1d42e2d73a9813a6a13a4693d6ca4452
/
.
/
test-data
/
diagram
/
SimpleMacro.vba
blob: 7fcf1fdb4fae8a9289e5ac5454fbae011d988480 [
file
] [
log
] [
blame
]
Sub
TestMacro
()
'
'
TestMacro
Macro
' This is a test macro
'
'
With ActiveDocument.Pages(1).Shapes(1)
.Text = "This is a macro vector graphics drawing"
End With
End Sub