Help!

PC-Problemen?
De vrijwilligers van Oplossing.be zoeken gratis met u mee!

Hulp bij posten

Recente topics

Auteur Topic: datum  (gelezen 2259 keer)

0 leden en 1 gast bekijken dit topic.

Offline elena

  • Nieuw lid
  • Berichten: 2
  • Oplossing.be
datum
« Gepost op: 16 juli 2004, 12:25:45 »
Hallo iedereen,
De datum op verschillende velden op mijn acces database is b.v.b 240 dat betekent 2->2002
                                    40->40ste week van het jaa.
Hoe kan ik dat omzitten in normaal datum in acces???
 ::)
Bedankt!!!
Elena
Gelieve uw systeemgegevens in te vullen. Klik HIER voor meer informatie.

Offline Tornado

  • Ervaren lid
  • ***
  • Berichten: 363
  • Geslacht: Man
  • Bedankt voor uw reactie !
Re:datum
« Reactie #1 Gepost op: 16 juli 2004, 18:20:46 »
In tabel, ontwerpweergave, in cel datum, het invoermasker aanpassen.

groetjes
Windows 10 -interne 12 TB - extern 48 TB - Printer(s) HP ALl In One: 6600 - 7700 & 7750 - Telenet - Proximus

Offline spyder

  • Ambassadeur
  • *****
  • Berichten: 5.265
  • PC probleem zit meestal tussen scherm en rugleun
Re:datum
« Reactie #2 Gepost op: 16 juli 2004, 22:14:49 »
Hoi Tornado,

In tabel, ontwerpweergave, in cel datum, het invoermasker aanpassen.
Zou dit wel lukken? :-\ Als ik de datum bekijk die Elena geeft (240 ) geloof ik nooit dat dit een datumveld is. Volgens mij staat daar een numeriek veld. :(
Over hoeveel records gaat het hier? Je zou dit volgens mij kunnen oplossen met via "Bewerken>Vervangen"

spyder

Windows 7 Ultimate Unknow NLD
Intel(R) Core(TM) i7 CPU         870  @ 2.93GHz 2934
P7P55D-E PRO
NVIDIA GeForce GTX 470 1280MB 1680 x 1050
HD 1 : INTEL SSDSA2M080G2GC (80GB)
HD 2 : ST31500341AS (1,5TB)
HD 3 : ST320006 41AS (2TB)
browser: Maxthon  mail:Thunderbird AV: Bitdefender
Scarlet user

guido1

  • Gast
Re:datum
« Reactie #3 Gepost op: 23 juli 2004, 23:01:42 »
Hoi elena,

Je moet via een macro of via een query de string "240" omzetten naar een string inde vorm van "jjjj/mm/dd". Ik geloof dat in VBA een funktie is om een week om te zetten, anders zul je die zelg moeten schrijven. En de dag zul je ook moeten bepalen.

Guido

Offline powerkite

  • Volledig lid
  • **
  • Berichten: 207
  • Oplossing.be
Re:datum
« Reactie #4 Gepost op: 11 augustus 2004, 02:34:57 »
Ik weet niet juist hoe de eerste week wordt geteld. ik heb verondersteld dat als bv de eerste week slechts een halve week is, dat deze toch als 1 meetelt. De maandag daarop begint de volgende week.

Normaalgezien zou volgende code moeten werken

Public Function VeranderNaarDatum(Datum As String) As Date
Dim AantalWeken, Jaar, AantalDagen As Integer
Dim EersteDag As Single

AantalWeken = Val(Right(Datum, 2))
Jaar = Val("200" & Left(Datum, 1))
EersteDag = Weekday("1/1/" & Jaar, vbMonday)
AantalDagen = AantalWeken * 7 - EersteDag
VeranderNaarDatum = DateAdd("d", AantalDagen, "1/1/" & Jaar)
End Function

Er wordt telkens de laatste zondag van die week als datum gegeven (dit kan je uiteraard aanpassen).

Ik hoop dat dit een beetje geholpen heeft.
Win XP (pro) - Pentium - 2400Mhz - 512Mb - Hercules 9200se - ADSL - Office 2003 Pro

 


www.combell.com