Excel VBA:使用DDE启动数据并将数据推送到Internet Explorer

时间:2014-01-15 20:34:18

标签: excel internet-explorer vba dde

我正在使用Excel 2010中的VBA。我需要从工作表中复制四个值,然后我想使用DDE(在VBA中):

  1. 启动Internet Explorer
  2. 导航至Intranet网址
  3. 选项卡通过网页,将工作表中的四个值粘贴到各自的字段(在网页中),然后
  4. 执行网页底部的保存按钮。
  5. 我可以将我使用DDE Excel的经验转换为Bloomberg来解决#3,我可能会想出#4。有人可以帮我解决上面解决#1和#2的示例VBA代码语句吗?

1 个答案:

答案 0 :(得分:0)

以下是步骤1和2的代码:

Sub Steps_1_2()

'step 1st
    Dim oIE As InternetExplorer
    Set oIE = New InternetExplorer
'step 2nd
    oIE.Visible = True
    'change the address to intranet
    oIE.navigate "http://www.stackoverflow.com"

    Do
        DoEvents
    Loop Until oIE.ReadyState = READYSTATE_COMPLETE

    MsgBox "IE Ready for step 3 and 4"
End Sub