Selenium.WebDriver にて ctl +"v"をsendKey してもテキストがペーストされない件

Question

前提・実現したいこと

VBA より　Google Chrome上にてGoogle 翻訳使用して
翻訳プログラムを作成しています
Chromeの操作はSelenium.WebDriverにプログラミングしました

背景として
以前IE上にてGoogle 翻訳を使用していましたが
IEがなくなるのでプログラム修正変更しています

発生している問題

sendKey テキスト　だと遅いので　クリップボードを介して
Google 翻訳　にテキスト書き込みすることにしました
sendKey にて　ctl +"v" をおこなっていますが　実行していますが
テキストがペーストされません

該当のソースコード

  Dim Driver As New Selenium.ChromeDriver
  Dim elm As Selenium.WebElement
  Dim elm1 As Selenium.WebElement
  Dim CB As New DataObject
　Dim TranslateText as string
  Dim url as string 
　Dim CB As New DataObject

  TranslateText="This is a pen"
'google 翻訳にて英語→日本語
  url = "https://translate.google.co.jp/?hl=ja#97/102/"
  Driver.Start "chrome", url
  Driver.Get "/"
    CB.SetText TranslateText
    CB.PutInClipboard
    CB.GetFromClipboard
 
        
     Set elm = Driver.FindElementByXPath("//*[@id=""source""]")
    elm.Clear
    elm.Click
   
     elm.SendKeys Driver.Keys.Control, "v"


   Driver.Wait 500
  

    Set elm1 = Driver.FindElementByCss("body > div.container > div.frame > div.page.tlid-homepage.homepage.translate-text " & _
    "> div.homepage-content-wrap > div.tlid-source-target.main-header.small-font > div.source-target-row > div.tlid-results-container.results-container " & _
    "> div.tlid-result.result-dict-wrapper > div.result.tlid-copy-target > div.text-wrap.tlid-copy-target > div > span.tlid-translation.translation")

    mesgox elm1.Text

試したこと

１．クリップボードの内容確認
elm.SendKeys Driver.Keys.Control, "v"　にてブレイクして
手作業にて直接　　ctl +"v"　を入力すると
Google 翻訳 ページに張り付けることができます

２． elm.SendKeys Driver.Keys.Control, "v"　の確認

　１．クリップボードの内容確認　後データクリアして
elm.SendKeys Driver.Keys.Control, "v"　実行すると
データ貼り付けされる

３．Backspace　キーの確認

　　 elm.SendKeys "aaaa"
elm.SendKeys Driver.Keys.Backspace

補足情報（FW/ツールのバージョンなど）

Windows10
EXCEL　2013
Google Chrome　バージョン: 83.0.4103.116（Official Build） （64 ビット）
ChromeDriver 83.0.4103.39

Answer 1

自分もはまり調べまくって方法が分かったので。

Driver.Keyboard.KeyDown (skey.Control)
elm.SendKeys "v"
Driver.Keyboard.KeyUp (skey.Control)

コントロールキーを押した状態にしてｖを送るという単純な方法で行けます。
こんなのわかるわけないだろうと思いました。

Answer 2

ctl+vの前に「Doevents」や「Driver.Wait 500」をはさんではいかがでしょうか。
コピー処理が間に合っておらずctl+vの際にはクリップボードが空のままかもしれません。
少し待つことで改善の可能性があります。

Comments

[nittai]

回答ありがとうございます
ctl+vの前に「Doevents」や「Driver.Wait 500」をはさんでみましたが
現象は同じでした

１，２の作業より実行時クリップボードが空ででないのではないようです
タイムアウトの様です
1度手作業でペーストするとコードから貼り付け可能です。それも劇的に高速になります
もう少し調べてみますがまた何かアドバイスありましたらどうそよろしくお願いします