2021-03-01から1ヶ月間の記事一覧

VBAからWin32のSleepを呼び出す

vbaでスリープさせる方法はたくさんありますが、Win32APIのスリープを直呼びしてみたらいまいちだったけどメモ。呼び出し方は以下の通り。 Private Declare PtrSafe Sub Sleep Lib "kernel32" (ByVal ms As LongPtr) Private Sub wait() Sleep 5000 End Sub…

OutlookVBA フォルダ選択ダイアログの出しかた

vba

outlookVBAでフォルダ選択ダイアログを出すには以下のように PickFolderを呼び出しましょう。 Sub FolderPick() Dim objNS As NameSpace Dim objFolder As Folder Set objNS = Application.GetNamespace("MAPI") Set objFolder = objNS.PickFolder If TypeNa…