Excel VBA 質問スレ Part37 [転載禁止]©5ch.io
レス数が900を超えています。1000を超えると表示できなくなるよ。
0943デフォルトの名無しさん
2015/09/05(土) 15:49:08.28ID:x7KkU3nJSub Sample2()
Dim WSH, LnkFile, DeskTopPath As String, LnkFileName As String
Set WSH = CreateObject("WScript.Shell")
DeskTopPath = WSH.SpecialFolders("Desktop")
LnkFileName = DeskTopPath & "\メモ帳.lnk"
Set LnkFile = WSH.CreateShortcut(LnkFileName)
MsgBox LnkFile.TargetPath
Set LnkFile = Nothing
Set WSH = Nothing
End Sub
のようなコードがあったとして、LnkFileのクラス(?)のメンバをオブジェクトブラウザで見れるようにする方法はありますか?
レス数が900を超えています。1000を超えると表示できなくなるよ。