ExcelVBAからPowerShell(ps1)を実行

vba

' ************************************************** ' PowerShellの実行（Execコマンド使用バージョン） ' ************************************************** Private Function ExecPowerShell(cmdStr As String) As String ' WshShellオブジェクト D…

2019-06-07

ブラウザの待機処理がうまくいかない場合の対処方法には「ズバリ」の解決策が無い

vba

VBAのIE操作とかでブラウザ待機処理はこんなに書きますが、その先の処理でまぁエラーが出る。 Do While objIE.Busy Or objIE.readyState <> READYSTATE_COMPLETE DoEvents Loopどうやら一瞬READYSTATE_COMPLETEでるけど読み終わってないとかいろいろ原因が…

2017-12-04

vbaマクロからXlsファイルのパスを取得する

vba

ActiveWorkbook.Path=xlsファイルのパス ThisWorkbook.path=もし実行しているマクロがアドインだったらアドインのパスが返るネタ元 https://detail.chiebukuro.yahoo.co.jp/qa/question_detail/q1143335356

2014-12-16

ExcelVBAで存在するIEオブジェクトを探して根こそぎQuitする

ExcelVBA vba

Public Sub ie_quit() Dim objShell Dim objWindow Set objShell = CreateObject("Shell.Application") For Each objWindow In objShell.Windows If TypeName(objWindow.Document) = "HTMLDocument" Then objWindow.Quit Sleep 100 End If Next Set objShell…

2014-06-17

Document.Links(n).Titleを探り .Clickする VBA IE操作

VBA

2013-03-25

Excel　VBAで、ユーザーフォームをモードレス表示している間に処理させる　お待ちください処理

excel vba

[excel][vba]excel2000以上ならユーザーフォームにvbModeless指定でいけるDoEvents() はOSに溜まった仕事をさせる関数 Dim flag As Boolean Private Sub CommandButton1_Click() If MsgBox("中止しますか？", 292) = vbYes Then flag = True End Sub Privat…