CreateObject("WScript.shell") + Intellisense

[Wulfi]

Hallo,

schaut euch bitte folgendes an:

Ohne Intellisense:
Dim objFSO As Object
Set objFSO = CreatObject("Scripting.FileSystemObject")

Mit Intellisense:
Dim objFSO As Scripting.FileSystemObject
Set objFSO = New Scripting.FileSystemObject

Außerdem: Verweise\Extras\ Microsoft Scripting Runtime    setzen!

Meine Frage:  Wie schalte ich bei "WScript.shell" die Intellisense ein?  Und welchen Verweis müßte ich setzen?
Dim objShell
Set objShell = CreateObject("WScript.shell")

[Kuwer]

Hallo Wulfi,

Sub baa()
 'Dim objShell As Object
 'Set objShell = CreateObject("WScript.shell")
 Dim objShell As WshShell
 Set objShell = New WshShell
 objShell.Popup "Hallo Welt!", "3", "Testprogramm"
End Sub

Dazu der Verweis:

   

Gruß Uwe

[Wulfi]

So etwas muss man erstmal wissen!
Danke.