ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Sendkeys (https://www.excelbanter.com/excel-programming/441433-sendkeys.html)

wangww

Sendkeys
 
Sub SendURL()
Shell "C:\Program Files\Internet Explorer\iexplore.exe", vbNormalFocus
SendKeys "www.google.com", True
End Sub

This procedure can open IE, but the URL isn't entered into address bar.

Mike H

Sendkeys
 
Hi,

If you hard coding the URL why bother with sendkeys, why not like this

MyPage = Shell("C:\Program Files\Internet Explorer\IEXPLORE.EXE
http://www.google.com", vbNormalFocus)
--
Mike

When competing hypotheses are otherwise equal, adopt the hypothesis that
introduces the fewest assumptions while still sufficiently answering the
question.


"wangww" wrote:

Sub SendURL()
Shell "C:\Program Files\Internet Explorer\iexplore.exe", vbNormalFocus
SendKeys "www.google.com", True
End Sub

This procedure can open IE, but the URL isn't entered into address bar.


Peter T

Sendkeys
 
Or even simply

ThisWorkbook.FollowHyperlink "http://www.google.com"

Regards,
Peter T

"wangww" wrote in message
...
Sub SendURL()
Shell "C:\Program Files\Internet Explorer\iexplore.exe", vbNormalFocus
SendKeys "www.google.com", True
End Sub

This procedure can open IE, but the URL isn't entered into address bar.





All times are GMT +1. The time now is 10:38 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com