PDA

Vollständige Version anzeigen : durch Listenfeldanzeige ein Formular automatisch öffnen lassen


Martin
04.10.2001, 14:10
Hi,

ich habe ein Formular in dem mehrere Listenfelder vorkommen auf ein Eregniss d.h. wenn bei dem Listenfeld [R_Art] die Option "Transport" ausgewählt wird soll sich automatisch ein Formular öffenen lassen wo die Daten des Fahrzeuges sowie Fahrer eingegeben werden.
Das Listenfeld steht in eine 1-n Beziehung mit dem Eingabeformular.

Für Eurer Hilfe vielen Dank

Klaus-Dieter
04.10.2001, 22:07
Hallo Matin,

wenn Du diesen Quelltext:

<div><link href="http://www.ms-office-forum.net/forum/externals/codeconv.css" rel="stylesheet"><pre><span class="TOKEN">Private Sub</span> EinAuswahl_Click()
<span class="TOKEN">Dim</span> stDocName <span class="TOKEN">As</span> <span class="TOKEN">String</span>
<span class="TOKEN">Dim</span> stLinkCriteria <span class="TOKEN">As</span> <span class="TOKEN">String</span>
<span class="TOKEN">If</span> EinAuswahl.ListIndex &gt; -1 <span class="TOKEN">Then</span>
stDocName = EinAuswahl.Value
<span class="TOKEN">End</span> <span class="TOKEN">If</span>
DoCmd.OpenForm stDocName, , , stLinkCriteria
<span class="TOKEN">End</span> <span class="TOKEN">Sub</span></pre></div>

als Ereignisprozedur unter "beim Klicken" mit dem Listenfeld verbindest, sollte es gehen.