Archive for category Office

フィールド更新 VBA

in Word on 2007/10/25

For Each aStory In ActiveDocument.StoryRanges
aStory.Fields.Update
Next aStory

No Comments

複数ファイル取得 VBA

in Word on 2007/10/24

GetOpeFilename が Word にはないので、
Excelを利用するらしい。

Sub test()
Dim varFile As Variant
With CreateObject("Excel.application")
varFile = .GetOpenFilename(FileFilter:="Wordファイル,*.doc", MultiSelect:=True)
End With
End Sub

2 Comments

ハイパーリンク

in Excel on 2007/04/22

シートへのハイパーリンクを作成
=HYPERLINK(“#’シート名’!A1″,”シート名”)
マクロにしようとすると、
sname = シート名
“=HYPERLINK(” & Chr(34) & Chr(35) & “‘” & sname & “‘!C2” & Chr(34) & “,” & Chr(34) & sname & Chr(34) & “)”

2 Comments