Word (VBA)

Word VBAに関するフォーラムです。
  • 解決済みのトピックにはコメントできません。
このトピックは解決済みです。
質問

 
(Windows 10 Home : Word 2010)
テキストボックスを回転
投稿日時: 20/03/18 19:25:46
投稿者: wtnb

テキストボックスを45度回転させるには、どのようにしたらできるでしょうか?
 
 

Sub textbox()
Dim TBox As Shape

Set TBox = ActiveDocument.Shapes _
.AddTextbox(Orientation:=msoTextOrientationHorizontal, _
Left:=100, Top:=100, Width:=100, Height:=20)

TBox.TextFrame.TextRange = "2020-04-01"
TBox.TextFrame.TextRange.Font.Color = wdColorWhite
TBox.TextFrame.TextRange.Font.Shadow = True

End Sub

回答
投稿日時: 20/03/19 11:10:38
投稿者: sk

引用:
テキストボックスを45度回転

TBox.Rotation = 45
 
-----------------------------------------------
 
この場合は時計回り。

投稿日時: 20/03/20 05:01:34
投稿者: wtnb

ありがとうございました。