IE commands not working through QV macro

[#1]

I am trying to execute some IE commands through a QV macro. Some commands (such as Navigate) are working but some (such as visible, ExecWB) do not seem to work.

Here is a sample code

Set IE = CreateObject("InternetExplorer.Application")

Set RLLinks = ActiveDocument.Fields("RLLink").GetPossibleValues()

for i = 0 to RLLinks.count - 1

    RLLink = "" & RLLinks.item(i).text & ""

     IE.Navigate RLLink

     ActiveDocument.GetApplication.Sleep 5000

     IE.ExecWB 6,2

next