Modelbuilder

Hallo Gemeinde,
ist es möglich den Modelbuilder so einzustellen, daß er die Eingabedaten (hier: Shapefile) per Dialogfenster abfragt. Habe schon alles versucht: Als Modelparameter definiert (klappt nicht),usw, create Variable (shapefile) klappt nicht, usw. usw.
Geht das? und wenn ja, wie?

Grüße
Hallo Gemeinde,
noch ein Nachtrag. Wenn ich mein "modelbuilder-tool" von Hand starte, funktioniert die Sache mit der Shapefile-Auswahl. Nur ich möchte 8und habe) meine Modelbuilder-prozedur in ein VBA skript eingebaut:

Dim pUID As New UID
pUID = "esriGeoprocessingUI.ArcToolboxExtension"
Dim pATBExt As IArcToolboxExtension
Set pATBExt = Application.FindExtensionByCLSID(pUID)
Dim pAtb As IArcToolbox
Set pAtb = pATBExt.ArcToolbox
Dim pGP As Object
Set pGP = CreateObject("esriGeoprocessing.GPDispatch.1")
pGP.AddToolbox ("C:\mypath\ArcToolbox\My Toolboxes\My_tools.tbx")
pGP.Model

Und dann klapptdas wie gesagt nicht.
Hat irgendjemand eine Idee?

Grüße