位置の指定をすることは可能ですか?
VBAでテキストファイルを生成するコードを作ったのですが
その際位置の指定をすることは可能ですか?
Sub test()
Dim myFSO As New FileSystemObject
Dim ts As TextStream
Dim MyFileName As String
Dim MyPath As String
MyPath = MyDesktop & "\"
MyFileName = "test.txt"
Set myFSO = CreateObject("Scripting.FileSystemObject")
Set ts = myFSO.CreateTextFile(MyPath & MyFileName, True)
CreateObject("Shell.Application").ShellExecute MyPath & MyFileName
'ここで位置の指定をしたい
Set ts = Nothing
Set myFSO = Nothing
End Sub
こんな感じのコードは作成しました。
With MyFileName
.Top = 100
.Left = 100
End With
みたいな感じで位置の指定は可能ですか?
APIを使わないと無理ですか?
お礼
アドバイスありがとうございます^^ そのようにやってみたのですが、まったく動いてくれません。 すいません、説明不足でした。 動かしたいタイトルはテーブルで囲ったタイトルです。その下にも横長のテーブルがあるのですが、そことの間が大きくあいてしまうのです。