Shell command

VBA has a Shell command that can open certain programs like this:

RetVal = Shell("C:\WINDOWS\CALC.EXE", 1) ' Run Calculator

Is it possible to open Bloomberg using this command?

If you mean you want to open the Bloomberg website, try this:
(lines split to avpoid wrapping)

Private Declare Function ShellExecute _
Lib "shell32.dll" Alias "ShellExecuteA" _
(ByVal hwnd As Long, _
ByVal lpOperation As String, _
ByVal lpFile As String, _
ByVal lpParameters As String, _
ByVal lpDirectory As String, _
ByVal nShowCmd As Long) As Long

Sub OpenBloomberg()
Dim RetVal As Long
RetVal = ShellExecute(0&, "OPEN", _
"http://www.bloomberg.com", "", 0&, 1)
End Sub




Viktor Ygdorff wrote:
> VBA has a Shell command that can open certain programs like this:
>
> RetVal = Shell("C:\WINDOWS\CALC.EXE", 1) ' Run Calculator
>
> Is it possible to open Bloomberg using this command?

Hello! Sorry I meant the Bloomberg program. Thanks anyway.

"Andrew Taylor" skrev:

> If you mean you want to open the Bloomberg website, try this:
> (lines split to avpoid wrapping)
>
> Private Declare Function ShellExecute _
> Lib "shell32.dll" Alias "ShellExecuteA" _
> (ByVal hwnd As Long, _
> ByVal lpOperation As String, _
> ByVal lpFile As String, _
> ByVal lpParameters As String, _
> ByVal lpDirectory As String, _
> ByVal nShowCmd As Long) As Long
>
> Sub OpenBloomberg()
> Dim RetVal As Long
> RetVal = ShellExecute(0&, "OPEN", _
> "http://www.bloomberg.com", "", 0&, 1)
> End Sub
>
>
>
>
> Viktor Ygdorff wrote:
> > VBA has a Shell command that can open certain programs like this:
> >
> > RetVal = Shell("C:\WINDOWS\CALC.EXE", 1) ' Run Calculator
> >
> > Is it possible to open Bloomberg using this command?
>
>

if you could go into the command prompt and type a command that will start it
or perhaps type the command in the run box under windows start, then yes, you
should be able to execute that command with SHELL.

--
Regards,
Tom Ogilvy


"Viktor Ygdorff" wrote:

> Hello! Sorry I meant the Bloomberg program. Thanks anyway.
>
> "Andrew Taylor" skrev:
>
> > If you mean you want to open the Bloomberg website, try this:
> > (lines split to avpoid wrapping)
> >
> > Private Declare Function ShellExecute _
> > Lib "shell32.dll" Alias "ShellExecuteA" _
> > (ByVal hwnd As Long, _
> > ByVal lpOperation As String, _
> > ByVal lpFile As String, _
> > ByVal lpParameters As String, _
> > ByVal lpDirectory As String, _
> > ByVal nShowCmd As Long) As Long
> >
> > Sub OpenBloomberg()
> > Dim RetVal As Long
> > RetVal = ShellExecute(0&, "OPEN", _
> > "http://www.bloomberg.com", "", 0&, 1)
> > End Sub
> >
> >
> >
> >
> > Viktor Ygdorff wrote:
> > > VBA has a Shell command that can open certain programs like this:
> > >
> > > RetVal = Shell("C:\WINDOWS\CALC.EXE", 1) ' Run Calculator
> > >
> > > Is it possible to open Bloomberg using this command?
> >
> >

This will not help as you have to login to the Bloomberg as well as simply
running the executable.

--
www.alignment-systems.com


"Tom Ogilvy" wrote:

> if you could go into the command prompt and type a command that will start it
> or perhaps type the command in the run box under windows start, then yes, you
> should be able to execute that command with SHELL.
>
> --
> Regards,
> Tom Ogilvy
>
>
> "Viktor Ygdorff" wrote:
>
> > Hello! Sorry I meant the Bloomberg program. Thanks anyway.
> >
> > "Andrew Taylor" skrev:
> >
> > > If you mean you want to open the Bloomberg website, try this:
> > > (lines split to avpoid wrapping)
> > >
> > > Private Declare Function ShellExecute _
> > > Lib "shell32.dll" Alias "ShellExecuteA" _
> > > (ByVal hwnd As Long, _
> > > ByVal lpOperation As String, _
> > > ByVal lpFile As String, _
> > > ByVal lpParameters As String, _
> > > ByVal lpDirectory As String, _
> > > ByVal nShowCmd As Long) As Long
> > >
> > > Sub OpenBloomberg()
> > > Dim RetVal As Long
> > > RetVal = ShellExecute(0&, "OPEN", _
> > > "http://www.bloomberg.com", "", 0&, 1)
> > > End Sub
> > >
> > >
> > >
> > >
> > > Viktor Ygdorff wrote:
> > > > VBA has a Shell command that can open certain programs like this:
> > > >
> > > > RetVal = Shell("C:\WINDOWS\CALC.EXE", 1) ' Run Calculator
> > > >
> > > > Is it possible to open Bloomberg using this command?
> > >
> > >