Avatar billede juks Novice
09. april 2003 - 16:07 Der er 25 kommentarer og
1 løsning

skrive til tabel i vba

Hejsa
jeg vil gerne lave en opdaterings/tilføjelses-funktion i vba
den skal kunne tage alle felter fra "tbl_konti" hvor "k_nr" = 1 også skrive dem til en ny tabel "tbl_ny"

1 ad gangen sådan så der kommer til at stå

auto knr
  1  4
  2  9
  3  12

osv.
hvordan gør man det i VBA er så sikker i loop etc.
Avatar billede henrik13 Nybegynder
09. april 2003 - 16:53 #1
Kikker
Avatar billede mugs Novice
09. april 2003 - 17:53 #2
DoCmd.RunSQL "INSERT INTO tbl_Ny SELECT * FROM tbl_konti WHERE tbl_konti.k_nr=1"

Du behøver ikke at have autonr med, hvis det er et autonemmerfelt.
Avatar billede juks Novice
09. april 2003 - 19:10 #3
mugs den er helt rigtig men så kunne jeg lige så godt have lavet en forspørgelse.
det jeg gerne ville vare at bruge en loop af en eller anden slags.
det var ligesom for at lære lidt mere om at bruge loop funktionen
Avatar billede mugs Novice
09. april 2003 - 19:12 #4
OK - Så har jeg misforstået. Jeg har vist et eksempel på en løkke. Din e-mail?
Avatar billede juks Novice
09. april 2003 - 21:13 #5
jhc-it@mail.dk
Avatar billede juks Novice
09. april 2003 - 21:18 #6
takker
Avatar billede juks Novice
09. april 2003 - 21:21 #7
men mugs der er ingen løkke i din database
Avatar billede mugs Novice
09. april 2003 - 21:22 #8
Jo - i alle 3, hvilken taler du om?
Avatar billede juks Novice
09. april 2003 - 21:27 #9
ok jeg ser hvar du menere men jeg forstår stadig ikke hvordan
jeg for min vba kode til at gennem gå alle recordset indtil jeg når sidste record
Avatar billede mugs Novice
09. april 2003 - 21:30 #10
løkken i db8 (den med Excel) gennemløber hele tabellen.
Avatar billede juks Novice
09. april 2003 - 21:32 #11
ok takker prøver lige at finde en løsning tak igen igen igen.
Avatar billede juks Novice
09. april 2003 - 22:01 #12
nu har jeg faktisk løst det mangler dog lige lidt where hjælp.


denne virker ikke
"Select * from tbl_konti where [kommunenavn] = [Forms]![frm_vaelg_udskrift]![kommune] "

det virker hvis jeg skriver 2 istedet for "[Forms]![frm_vaelg_udskrift]![kommune] "
Avatar billede mugs Novice
09. april 2003 - 22:03 #13
Er formularen aktiv?
Avatar billede juks Novice
09. april 2003 - 22:08 #14
ja
Avatar billede juks Novice
09. april 2003 - 22:10 #15
det er en combobox
Avatar billede juks Novice
09. april 2003 - 22:11 #16
ahhh jeg  tror jeg ved hvorfor i comboboksen skriver den navn men den skal jo bruge et tal i vba
Avatar billede juks Novice
09. april 2003 - 22:12 #17
kan man angive i vba om det er combo selct nr 1 eller 2
Avatar billede mugs Novice
09. april 2003 - 22:14 #18
Det mener jeg
Avatar billede juks Novice
09. april 2003 - 22:16 #19
min loop blev sådanne her
----------

rst2.MoveFirst
 
  Do While Not rst2.EOF

   
 
    With rst
        .AddNew
        !Kontonr = rst2.Fields![Kontonr]
        .Update
    End With

rst2.MoveNext
Loop

-----------
er det ikke den korrekte måde ?

jeg løste spg med comboboksen ved at lave en string med if combobox = "test" then str = 1
men ville gerne vide hvordan man finder ud af om det er combo 1 eller 2
Avatar billede mugs Novice
09. april 2003 - 22:19 #20
det ser korrekt ud, og det ligner jo min db2.

Jeg er ikke lige med på den der combo, hvad mener du?
Avatar billede juks Novice
09. april 2003 - 22:29 #21
det er fordi i min combo er der to valg
valg1
valg2

istedet for at få teksten valg1 når "henter den" i vba ville jeg gerne have den til at skrive 1 for valg1 og 2 for valg2
så man ikke fik værdien i comboen men om det var 1. på listen eller 2. valg op listen
Avatar billede juks Novice
09. april 2003 - 22:33 #22
glem alt hvad jeg skrev i 09/04-2003 22:29:25

det virker med [Forms]![frm_vaelg_udskrift]![kommune]
Avatar billede juks Novice
09. april 2003 - 22:34 #23
og tusind tak for al hjælpen sov godt :-)
Avatar billede mugs Novice
09. april 2003 - 22:35 #24
OK - jeg var lidt inde på en Select Case
Avatar billede mugs Novice
09. april 2003 - 22:36 #25
Selv tak og i lige måde.
Avatar billede juks Novice
09. april 2003 - 22:36 #26
[Forms]![frm_vaelg_udskrift]![kommune] giver en talværdi
men det med loop var perfekt nu tror jeg næsten jeg har fattet det :-)
Avatar billede Ny bruger Nybegynder

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.

Loading billede Opret Preview
Kategori
Dyk ned i databasernes verden på et af vores praksisnære Access-kurser

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester