23. juli 2003 - 16:43Der er
16 kommentarer og 2 løsninger
Overføre markeret værdi fra en liste til en anden
Hej Jeg har en formular på denne form er der to lister. Liste0 for data fra en tabel "tblPostNr" den anden liste har ikke nogen rowsource. Liste0 har egenskaben simpel markering.
Jeg markere så en eller flere værdier på liste0 og klikker så til sidst på en knap. Nedenstående kode ligger bagved knappen, men der sker ingenting når listen er sat til simpel markering, dog kan jeg godt få det til at virke hvis liste0 er sat til Enkel,men så kan jeg jo kun flytte en værdi og det er ikke meningen med det. nogen der kan hjælpe med at få koden til at virker, jeg arbejder i access2000
'Koden Private Sub Kommandoknap3_Click()
Dim itm As Variant Dim SQl As String
If Me!Liste0.ItemsSelected.Count > 0 Then
For Each itm In Me!Liste0.ItemsSelected
SQl = "Select * From tblPostNr where ID = " & Me!Liste0
Private Sub Kommandoknap4_Click() Dim itm As Variant Dim SQl As String A = Me!Liste0.ItemsSelected.Count If A >= 0 Then SQl = "Select * From [Tabel1] where [ID] = " For Each itm In Me!Liste0.ItemsSelected SQl = SQl & Me!Liste0.ItemData(itm) & " or [ID] = "
Hej Terry og kabbak Nu har jeg testet begge jeres forslag, og de virker faktisk begge to, det var lige hvad jeg havede brug for, mange tak for det. Nu kommer så øjeblikket hvor points skal uddeles, hvad siger i til at dele dem, da i begge jo har givet et brugbart svar *SS*. Forresten det der med -11 i slutningen ad SQL,en hvad er det egenligt der sker der.
Okay, her kommer her kommer så points til jer begge, tak for nu, nok ikke sidste gang i høre fra mig *SS*, meeeen er blevet mere ferm til det. hvem ved måske en dag jeg selv begynder at svare på indlæg her på eksperten *SSS*. forsat god aften
mvh Anders
Synes godt om
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.