Søg
Avatar billede engsvang Nybegynder
23. februar 2002 - 23:09 Der er 8 kommentarer og
1 løsning

Optælling i poster

Jeg har en formular med 11 ens rullefelter hvor værdierne kan være ens alle 11 steder og tilhørende indtastning af antal udlånte varer. F.Eks. kan første person registreres i felt 1 med 1 sovepose, og person 2 bliver måske registreret med soveposen i felt 3.
Hvordan får jeg en samlet opgørelse over de forskellige varer ??
Avatar billede mugs Novice
23. februar 2002 - 23:18 #1
Prøv denne VBA-procedüre indsat i en kommandoknaps OnClick Event. Du skal rette TABELNAVN og FELTNAVNE til de aktuelle i din DB:

Dim Svar As String
Me.Refresh
Svar = MsgBox(Prompt:="Der er:" & vbNewLine & vbNewLine & DCount("*", "TABELNAVN", "[Felt1] = 'Sovepose' Or [Felt2] ='Sovepose' Or [Felt4] = 'sovepose'") & " Soveposer")
Avatar billede engsvang Nybegynder
23. februar 2002 - 23:28 #2
Problemet er at jeg har en tabel hvor der løbende indtastes varer der kan udlånes.
Så hvis de kan sammentælles hurtigt uden at skulle lave en procedure for hver enkelt vare.
Avatar billede mugs Novice
23. februar 2002 - 23:32 #3
Svar = MsgBox(Prompt:="Der er:" & vbNewLine & vbNewLine & DCount("*", "TABELNAVN", "[Felt1] = Forms!FORMULARNAVN!FELTNAVN Or [Felt2] =Forms!FORMULARNAVN!FELTNAVN  Or [Felt4] = Forms!FORMULARNAVN!FELTNAVN ") & Forms!FORMULARNAVN!FELTNAVN")

Vir returnere antal udlån af den vare du ser i formularen.
Avatar billede engsvang Nybegynder
24. februar 2002 - 00:17 #4
Beklager men jeg kan ikke få det til at virke
Avatar billede mugs Novice
24. februar 2002 - 00:23 #5
Er det mit 1. eller 2. forslag der ikke virker?

Hvilken fejlmelding får du?
Avatar billede engsvang Nybegynder
24. februar 2002 - 16:10 #6
Jeg har prøvet at indtaste dit svar i et modul. Den bliver ved med at være med rød skrift, så jeg har indtastet noget forkert.
Det er dit 2. svar jeg har indtastet.
Avatar billede mugs Novice
24. februar 2002 - 17:54 #7
Jeg har lavet en lille testdb og min kode fungerer. Læg din e-mail og jeg sender den.

Der er koden lagt i en kommandoknap. Lad os få det til at fungere først, bagefter kan vi prøve med et modul.
Avatar billede engsvang Nybegynder
24. februar 2002 - 19:11 #8
Tak for hjælpen,
email rolf@engsvang.dk
Avatar billede engsvang Nybegynder
25. februar 2002 - 16:02 #9
Tak for db, jeg prøver at arbejde videre derfra.
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
Access kurser
Dyk ned i databasernes verden på et af vores praksisnære Access-kurser
Se alle Access kurser

Flere spørgsmål fra Access kategorien

Titel Indlæg Oprettet Seneste aktivitet
Access database udskriver ikke rammer korrekt Af Uvanga i Access 8 18/11/202500:24 18/11/202510:25
Menu linie forsvundet i editoren Af per2edb i Access 10 13/11/202515:30 18/11/202518:09
Tekst format i Kodevinduet Af per2edb i Access 11 02/11/202517:28 04/11/202516:08
Tabstop, vba Af zuschlag i Access 8 05/10/202513:34 08/10/202512:48
Fejl i Dato = Format(Now(), "dd-mm-yyyy hh:mm:ss") Af per2edb i Access 6 26/09/202513:37 07/11/202507:47
Se alle spørgsmål i kategorien Opret spørgsmål

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.

Opret Log ind

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten
Seneste spørgsmål Seneste aktivitet
I går 19:26 Opstart af ny computer Af Bent i Windows
25/0120:06 Hjemmeside der virker både på mobil og computer Af Strawberry i PHP
25/0117:08 Problemer med borger.dk Af valby i Windows
25/0114:19 Fejl Af buls i Windows
25/0113:44 Adgang til Google konto via Ipad Af cyperbent i E-mail programmer
White papers
Flere white papers »