\"Nøgleordsfelter\" i en oversigt

Følgende problemstilling:
  Jeg har 5 formularer og en oversigt. Det skal være muligt at oprette dokumenter, ud fra en hvilken som helst af de fem formularer, ved at aktivere én knap i oversigten (Der er kun plads til en knap mere).
Jeg kan gøre det vha. script og Inputbokse, men der bruger jeg FEM bokse - dvs. at skal man bruge den femte formular skal man igennem 4 andre inputbokse.

Mit spørgsmål er så, om det er muligt at oprette en Dialogboks, således at man i en boks får mulighed for, at vælge mellem de fem formularer. (jeg ved godt at man kan bruge knappen OPRET, det er bare ikke anvendeligt her).

Jeg bruger følgende script:

Sub Click(Source As Button)
    Dim workspace As New NotesUIWorkspace
    Dim uidoc As NotesUIDocument
    Dim valg As String
   
    valg = Inputbox(\"Skal du bruge: Vikarudmelding v/3 minusser\",,\"Vikudm_3minus\")
    If Valg = \"Vikudm_3minus\" Then
          Goto spring1
    End If
    valg = Inputbox(\"Skal du bruge: Vikarudmelding andre årsager\",, \"Vikudm_AndreÅrs\")
    If valg = \"Vikudm_AndreÅrs\" Then
          Goto spring2
    End If
    valg = Inputbox(\"Skal du bruge: Venteliste - tilbud om at komme ind i ordningen\",, \"VenteListe\")
    If valg = \"VenteListe\" Then
          Goto spring3
    End If
    valg = Inputbox(\"Skal du bruge: Tjenesteattest\",, \"Tjenesteattest\")
    If valg = \"Tjenesteattest\" Then
          Goto spring4
    End If
    valg = Inputbox(\"Skal du bruge: Vikar nyt skoleår\",, \"Vikar nyt skoleår\")
    If valg = \"Vikar nyt skoleår\" Then
          Goto spring5
    End If
    Msgbox \"Der er ikke truffet et muligt valg, funktionen stopper.\"
    Exit Sub   
   
spring1:
    Call workspace.ComposeDocument( \"\", \"\", \"Vikudm_3minus\" )
    Set uidoc = workspace.currentDocument 
    Exit Sub   
Spring2:
    Call workspace.ComposeDocument( \"\", \"\", \"Vikudm_AndreÅrs\" )
    Set uidoc = workspace.currentDocument 
    Exit Sub     
Spring3:
    Call workspace.ComposeDocument( \"\", \"\", \"VenteListe\" )
    Set uidoc = workspace.currentDocument 
    Exit Sub     
Spring4:
    Call workspace.ComposeDocument( \"\", \"\", \"Tjenesteattest\" )
    Set uidoc = workspace.currentDocument 
    Exit Sub     
Spring5:
    Call workspace.ComposeDocument( \"\", \"\", \"Vikar_nyt_skoleår\" )
    Set uidoc = workspace.currentDocument 
End Sub