Avatar billede besida Nybegynder
08. december 2008 - 22:18 Der er 14 kommentarer og
1 løsning

Dato i mellem to dato

Hej:)

Jeg har forgæves forsøgt at få en makro til at placere et "1" tal i kolonne 14, hvis datoen i kolonne A, for rækkerne 2 til 10003.

Når jeg kører min "selvlavede" kode, sætter den et 1 tal, hvis der bare står en dato?
Nogen der har en kode?

De to datoer som er hhv. start og slut dato, er Sheets("fakturaer").range("c9") & Sheets("fakturaer").range("c10"), hvorimod opslagsværdien er Sheets("fakturaer").cells(t,1).
Avatar billede besida Nybegynder
08. december 2008 - 22:22 #1
Arh, der var jeg lidt hurtig med spørgsmålet :)
Self. overskrift = dato i mellem to datoer.
Kriteret for at kolonne 14 skal have et 1tal, er self. hvis datoen er i mellem datoen i kolonne 1.
Avatar billede staal84 Nybegynder
08. december 2008 - 22:27 #2
Jeg forstår det stadig ikke....;-)
Du har en dato stående i kolonne A, hvis den ligger efter den i celle C9 og før den i celle C10, så skal der stå et 1-tal i Kolonne N i samme række som den tilhørende dato i kolonne A? Eller?
Avatar billede staal84 Nybegynder
08. december 2008 - 22:33 #3
Forstået på min måde så gør følgende kode tricket:

Sub ettal()

Dim slut, i As Integer

slut = Range("A10005").End(xlUp).Row

For i = slut To 1 Step -1
Cells(i, 1).Select
    If ActiveCell.Value > Range("c9").Value And ActiveCell.Value < Range("c10").Value Then
            Cells(i, 14).Value = 1
    End If
Next

End Sub
Avatar billede besida Nybegynder
08. december 2008 - 22:37 #4
hej stall84, tak for et hurtigt svar.
Jeg har datoer fra række 2 til 10003 i kolonne A.
Hvis en værdi i Kolonne A ligger i mellem start (01-01-2008) & Slut(31-12-2008), skal
der sættes et 1 tal i kolonne n, for de datoer som ligger i mellem Start 6 slut :)
Avatar billede besida Nybegynder
08. december 2008 - 22:40 #5
Hm, hvis jeg bruger din kode, så sætter den også bare et 1 tal, selvom jeg har en dato der eks. hedder 12-12-2011?
Avatar billede staal84 Nybegynder
08. december 2008 - 22:45 #6
Har brugt samme datoer. 01-01-2008 i C9 og 31-12-2008 i C10, og får intet 1-tal i ved datoen 12-12-2011, har du datoerne defineret som datoer eller som tekst?
Avatar billede staal84 Nybegynder
08. december 2008 - 22:49 #7
Du kan også indsætte værdierne for start & slut datoerne i koden:

    If ActiveCell.Value > 39448 And ActiveCell.Value < 39813 Then

39448 er værdien for 01-01-2008 og 39813 er for 31-12-2008
Avatar billede besida Nybegynder
08. december 2008 - 22:57 #8
Men start og slut ændres løbende, eller på et tidspunkt i hvert fald.?
Jeg har datoerne defineret som datoer. Format = dd-mm-yyyy?
Avatar billede staal84 Nybegynder
08. december 2008 - 23:00 #9
Seriøst - hvis du sætter min første kode ind uændret og skriver start og slut datoerne i C9 og C10, har du så problemer med 1-tallene?

Jeg fatter det ikke for det virker, som det skal i mit excel.
Vi kan evt udveksle dokumentet på mail!?
Avatar billede besida Nybegynder
09. december 2008 - 14:03 #10
Hej Staal

Sorry jeg ikke fik skrevet igår... faldte sq i søvn.

Jeg kan lige prøve at sende mit dokument til dig når jeg kommer hjem fra arbejde.

Hva er din email?
Avatar billede staal84 Nybegynder
09. december 2008 - 17:49 #11
micande snabela gmail punktum com
Avatar billede besida Nybegynder
09. december 2008 - 18:51 #12
er sendt :)
Avatar billede staal84 Nybegynder
09. december 2008 - 19:34 #13
Er returneret.
Avatar billede staal84 Nybegynder
09. december 2008 - 22:54 #14
Tilsyneladende virker koden nu også i dit ark, så du får et svar.
Avatar billede besida Nybegynder
10. december 2008 - 09:49 #15
Det virker i den grad nu ja :)
mange tak for hjælpen :)
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
Excel kurser for alle niveauer og behov – find det kursus, der passer til dig

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