「参照ボタン→ファイルのパスをコピペ→開く」の処理
昨日以降(0) ２日前以降(0) ３日前以降(0) ４日前以降(0) ５日前以降(0)
| Message#1 2015年3月24日(火)00時59分 From: さふみ | 返事 削除 変更 |
| こんにちわ、参照ボタンを押す処理はわかったのですが、それ以降に「ペースト→開く」の処理をしたいのですがうまくいきません。おしえていただけたら嬉しいです。 'http://www.vba-ie.net/form/file.htmlを参考に下記のコードに追記して Sub sampleopen() Dim objIE As InternetExplorer 'InternetExplorerでテスト用フォームページを起動 Call ieView(objIE, "http://www.vba-ie.net/code/test.html") 'ファイル選択をクリック objIE.Document.getElementsByName("img")(0).Click End Sub 〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜 'コピペと開くを加えました Sub sampleopen2() Dim objIE As InternetExplorer 'InternetExplorerでテスト用フォームページを起動 Call ieView(objIE, "http://www.vba-ie.net/code/test.html") 'ファイル選択をクリック objIE.Document.getElementsByName("img")(0).Click Sleep 300 SendKeys "^V" MsgBox ("ok") Sleep 300 'コピペできない、 SendKeys "~" MsgBox ("ok2") '開けない 'C:\img\1.jpgを開く End Sub |
昨日以降 ２日前以降 ３日前以降 ４日前以降 ５日前以降
