dim auswahl as variant dim antwort as variant dim uiws as new notesuiworkspace auswahl = split(meinString,char(10)) antwort = uiws.prompt(PROMPT_OKCANCELLIST,"titel","Prompt","",auswahl) if antwort <>"" then 'antwort enthält ausgewähltes element end if