Jag har en combo som är kopplad till en tabell som heter t43Sektioner, denna tabell har tre kolumner ID, Sektion, Risk. Jag skulle ta med fältet "Risk" i radkällan för kombinationsrutan och sätta den kolumnens bredd till 0 så att den inte syns. Sedan kan du hämta värdet till textrutan så här: Funkade fint att få fram rätt rad i kolumnen risk, testade dock din Me.tbEX = .Column(1, .ListIndex) men får felmeddelande på den..? Ja du får ta bort "fnuttarna" om du använder tal:Kombobox
Comboboxen visar kolumnen Sektion och vid uppdatering skulle jag vilja visa i en textruta vad som står i vald rad fast i kolumnen Risk?
Så här ser koden ut som jag filar på men inte får att fungera:
Private Sub cbSektioner_AfterUpdate()
Me.tbEX = DLookup("Risk", "t43Sektioner='" & Me.cbSektioner & "'")
End Sub
Finns det någon vass VB-scriptare där ute Sv: Kombobox
With Me.cbSektioner
Me.tbEX = .Column(1, .ListIndex)
End With
Vad gäller din kod - om kombinationsrutans bundna kolumn innehåller fältet "Sektion" och fältet är av datatypen text så bör detta fungera:
Me.tbEX = DLookUp("Risk", "t43Sektioner", "Sektion='" & Me.cbSektioner & "'")
Sv:Kombobox
Försökte även få fram ID med samma
Me.tbID = DLookUp("ID", "t43Sektioner", "ID='" & Me.cbSektioner & "'") men det går inte.. är det skillnad på tal och text i den koden?Sv: Kombobox
Me.tbID = DLookUp("ID", "t43Sektioner", "ID=" & Me.cbSektioner)
(men varför ska du söka efter ID om du redan har det in kombon?)
Den andra koden som du fick felmeddelande på kräver att kombon har minst två kolumner och att du har "With-raderna" före och efter som jag skrev.