I'd love to have a macro that did the following:
I would say "sites" to activate the macro.
I would get a dialogue with a list of sites.
I would select the site that I wanted to go to (e.g. www.espn.com)
I would click OK.
The macro would open a browser window and navigate to the selected site.
It would be great if:
>there was any easy/quick way to add additional sites to the list
>there was a way to mask the site names in the list (aka the list would show NHL Schedule but the selection would take you to http://espn.go.com/nhl/schedule/)
Here is a macro that DAS had written that I modified to see if I could achieve my objective. Worked OK but not exaclty as I hoped.
If someone has a script suggestion...feel free to abandon what I tried to do below and start from scratch.
Thanks in advance.
Dim Result As Variant , FormTitle, InputText, FinalString, ResultString
Dim Val1, Val2, Val3, Val4
Val1 = "www.google.com"
Val2 = "www.espn.com"
Val3 = "www.cbc.ca"
Val4 = "www.cnn.com"
FormTitle = "Sites"
InputText = "Select Site"
fShowDlg(Val1,Val2,Val3,Val4, FormTitle, InputText, Result, ResultString, FinalString)
Function fShowDlg(Val1,Val2,Val3,Val4, FormTitle, InputText, Result, ResultString, FinalString)
Begin Dialog UserDialog 340,189,FormTitle ' %GRID:10,7,1,1
Dim dlg As UserDialog
Result = dlg.list
ResultString = ListS$(dlg.list)