Saturday, 15 November 2014

Adding Horizontal Text Box

Sub AddHorizontalTextBox()

    ActiveSheet.Shapes.AddTextbox(msoTextOrientationHorizontal, 0.25, 400.75, 129, 33).Select


End Sub

No comments:

Post a Comment