Søg
Avatar billede martin_sj Nybegynder
04. januar 2008 - 13:20 Der er 8 kommentarer og
2 løsninger

Hjælp til VBA kode

Kan ikke få syntaksen korrekt til VBA:

Worksheets("DATA").Cells(t, 28).Formula = _
        "=IF(DATA!Z" & t & "="","""",IF(DATA!Z" & t & ">Today(),"""",IF(IsBlank(DATA!AC" & t & ")=False,""DELIVERED"",IF(DATA!AB" & t & "="",""PLEASE CHECK"",IF(DATA!AB" & t & "<Today(),""ARRIVED"",""DISPATCHED"")))))"

Er der nogen der kan hjælpe?
Avatar billede jensen363 Forsker
04. januar 2008 - 13:37 #1
Måske sådan :

Worksheets("DATA").Cells(t, 28).Formula = _
        "=IF(DATA!Z" & t & “"="","""",IF(DATA!Z" & t & ">Today(),"""",IF(IsBlank(DATA!AC" & t & ")=False,""DELIVERED"",IF(DATA!AB" & t & “"="",""PLEASE CHECK"",IF(DATA!AB" & t & "<Today(),""ARRIVED"",""DISPATCHED"")))))"
Avatar billede martin_sj Nybegynder
04. januar 2008 - 14:39 #2
Før kunne jeg compile uden fejl, men fik følgende fejl ved kørsel:
Run-time error '1004' Application-defined or object-defined error.
Med din rettelse får jeg syntax error når jeg compiler.
Avatar billede martin_sj Nybegynder
04. januar 2008 - 14:53 #3
Ups havde ikke set at det var under Access jeg havde stillet spørgsmålet.
Det går vel an, det var dog et Excel spørgsmål. hehe
Avatar billede jensen363 Forsker
04. januar 2008 - 14:57 #4
I mit tilfælde er det lige gyldigt :-) ... jeg er nogenlunde inde i begge dele
Avatar billede martin_sj Nybegynder
04. januar 2008 - 15:05 #5
Ok, hvis du kan løse den kan du smide et svar på samme spørgmål under Excel, så er der 60 point :-)
Avatar billede jensen363 Forsker
04. januar 2008 - 15:18 #6
Worksheets("DATA").Cells(t, 28).Formula = _
        "=IF(DATA!Z" & t & "="","""",IF(DATA!Z" & t & ">Today(),"""",IF(IsBlank(DATA!AC" & t & ")=False,""DELIVERED"",IF(DATA!AB" & t & "="",""PLEASE CHECK"",IF(DATA!AB" & t & "<Today(),""ARRIVED"",""DISPATCHED""))))"
Avatar billede jensen363 Forsker
04. januar 2008 - 15:19 #7
Jeg synes at kunne tælle mig frem til, at du har en højre-parantes for meget
Avatar billede martin_sj Nybegynder
04. januar 2008 - 15:27 #8
det har du ret i, men det løste desværre ikke fejlen. stadig samme fejlmeddelelse. :-(
Avatar billede martin_sj Nybegynder
04. januar 2008 - 15:43 #9
Har fundet fejlen, når man spørger på blank ="" så skal der stå ="""".
Jensen363 smid svar så deler vi point.
Tak for hjælpen.
Avatar billede jensen363 Forsker
04. januar 2008 - 15:45 #10
Velbekommen :-)
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 dag 20:51 Knap til ipad Af FinnLauridsen i Excel
I går 13:53 Icloud mail via Outlook Af lbc i E-mail programmer
I går 08:32 USB NØGLE gratis Af nu_igen i Andet hardware
20/0121:11 Hvordan får jeg reCAPTCHA på min hjemmeside? Af Strawberry i PHP
20/0116:10 Tomt felt i Start Af ErikHg i Windows
White papers
Flere white papers »