Avatar billede puppetmaster Nybegynder
16. september 2005 - 13:07 Der er 12 kommentarer og
1 løsning

Fra VBA til formular

Følgende VBA kode i Access
xlsheet.Cells(2, 20).Formula = "=VALUE(($M$3)&HOUR($J3)&MINUTE($J3))"
bliver til en formel i Excel:
=VÆRDI(($M$3)&TIME($J3)&MINUT($J3))

Der bliver altså "oversat" fra VBA til Dansk, hvis man kan kalde det det.
Men når jeg bruger
xlsheet.Cells(2, 20).Formula = "=IF(IS.EMPTY($M3)=FALSE;$M3&TEXT($J3;'0000');'')"
får jeg en fejl fordi IF og IS.EMPTY enten ikke eksisterer eller fordi det skal hedde noget andet, men hvad?

Her er formlen som jeg vil have den til at se ud i Access:
=HVIS(ER.TOM($M3)=FALSK;$M3&TEKST($J3;"0000");"")
Avatar billede sjap Praktikant
16. september 2005 - 13:42 #1
Er.Tom hedder vistnok IsEmpty på engelsk (altså uden punktum)
Avatar billede kjulius Novice
17. september 2005 - 18:45 #2
Hmm. Er du sikker på, at det er Access vi taler om?
For mig ser det mere ud til at være Excel kode.
Avatar billede sjap Praktikant
17. september 2005 - 18:56 #3
Det skyldes måske at koden bruges fra Access til at skrive i celler i regneark ;0)
Avatar billede kjulius Novice
17. september 2005 - 20:14 #4
Bortset fra det, så tror jeg nok det burde hedde:

=IF(ISBLANK($M3)=FALSE;$M3&TEXT($J3;"0000");"")

Jeg har fundet denne liste over engelske excel funktioner:

http://www.jaxworks.com/functions.htm
Avatar billede sjap Praktikant
17. september 2005 - 21:08 #5
Tjah, det vist rigtigt. Godt set!
Avatar billede kjulius Novice
18. september 2005 - 18:10 #6
Den engelske version bruger vist også komma til at separere værdier, så det burde være:

=IF(ISBLANK($M3)=FALSE,$M3&TEXT($J3,"0000"),"")
Avatar billede puppetmaster Nybegynder
19. september 2005 - 08:41 #7
Ovenstående funktion fungerer ikke, koden stopper med Application error, selv hvis jeg bare prøver med:
=IF(j>2;2;5)
Avatar billede puppetmaster Nybegynder
19. september 2005 - 08:44 #8
(det virker heller ikke med =HVIS(j>2;2;5))
Avatar billede sjap Praktikant
19. september 2005 - 17:05 #9
Har du prøvet med kommaer - som kjulius foreslog?
Avatar billede sjap Praktikant
19. september 2005 - 17:22 #10
Prøv evt. med denne her

Cells(2, 20).Formula = "=IF(ISBLANK($M3)=FALSE,$M3&TEXT($J3,""0000""),"""")"
Avatar billede puppetmaster Nybegynder
20. september 2005 - 08:56 #11
Takker, sjap og kjulius, det virker! smid et svar.
Avatar billede sjap Praktikant
20. september 2005 - 19:43 #12
Giv det bare til kjulius - han kom med det korrekte svar :0)
Avatar billede kjulius Novice
20. september 2005 - 20:55 #13
Jo, men sjap, du var online, da det gjalt. Det er jo også noget værd!
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