Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


69895 / 76732 ←次へ | 前へ→

【11350】Re:WebBrowserコントロールで表示したWE...
質問  ひら  - 04/3/6(土) 10:33 -

引用なし
パスワード
   ▼ichinose さんこんにちは

>  With WebWindow
>    .SetFocus
>    Application.SendKeys "^a", True
>    Application.SendKeys "^c", True
>    DoEvents
>    ActiveCell.Select
>    .....以下貼り付け.....
>  End With
> End If

 上のコードでコピーはできるようになりましたが、動作が不安定で4〜5回程度
に1回の割合でしか実行できません。(クリップボードには何も入っていないか、
以前にクリップした内容が残ったままとなっています。)
フォーカスがWebWindowにかからないのか、SendKeysの実行を待たずに次のステッ
プに進んでしまうのかわからない状況です。Winth〜With Endの外側をDo loop
で括って何回かループしたり、.SetFocusを2個以上つけたりしましたが、少しは
効果らしいものはありましたが、決め手になるような結果になりませんでした。
 それとついでで申し訳ありませんがクリップボードにクリップされたかどうかの
確認や、クリップボードをクリアする方法をご存知でしたらよろしくお願いします。(これは当質問箱(番号11315)で質問しています)

2 hits

【10850】WebBrowserコントロールで表示したWEB本文のコピー方法 ひら 04/2/16(月) 11:36 質問
【10861】Re:WebBrowserコントロールで表示したWEB本... ichinose 04/2/17(火) 7:52 発言
【10866】Re:WebBrowserコントロールで表示したWEB本... ひら 04/2/17(火) 13:57 質問
【10867】Re:WebBrowserコントロールで表示したWE... コロスケ 04/2/17(火) 15:20 発言
【10884】Re:WebBrowserコントロールで表示したWE... ひら 04/2/17(火) 22:24 お礼
【10952】Re:WebBrowserコントロールで表示したWE... ひら 04/2/19(木) 14:41 質問
【10953】Re:WebBrowserコントロールで表示したWE... コロスケ 04/2/19(木) 15:12 回答
【10964】Re:WebBrowserコントロールで表示したWE... ichinose 04/2/19(木) 17:50 発言
【10990】Re:WebBrowserコントロールで表示したWE... ひら 04/2/22(日) 15:12 発言
【11043】Re:WebBrowserコントロールで表示したWE... ichinose 04/2/24(火) 21:21 発言
【11070】Re:WebBrowserコントロールで表示したWE... ひら 04/2/26(木) 19:07 お礼
【11350】Re:WebBrowserコントロールで表示したWE... ひら 04/3/6(土) 10:33 質問
【11407】Re:WebBrowserコントロールで表示したWE... ichinose 04/3/8(月) 18:06 回答
【11626】Re:WebBrowserコントロールで表示したWE... ひら 04/3/12(金) 14:29 お礼

69895 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free