*

Help!

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

Hulp bij posten

Recente topics

Pagina's: [1]   Omlaag

Auteur Topic: Problemen met regel in Excel  (gelezen 5521 keer)

0 leden en 1 gast bekijken dit topic.

Offline EricV

  • Volledig lid
  • **
  • Berichten: 138
  • Oplossing.be
Problemen met regel in Excel
« Gepost op: 07 september 2006, 15:22:45 »
Goedemiddag,

Aan de hand van voorbeelden op internet heb ik voor de eerste keer een Formulier aangemaakt in Excel.

Het is gelukt behalve een ding.

Allereerst sluit ik de code bij waarin het probleem zit:

'copy the data to the database
ws.Cells(iRow, 1).Value = Me.txtDatum = Value
ws.Cells(iRow, 2).Value = Me.txtKM.Value
ws.Cells(iRow, 3).Value = Me.txtBedrag.Value
ws.Cells(iRow, 5).Value = Me.txtLiters.Value
ws.Cells(iRow, 6).Value = Me.txtOmschrijving.Value

'clear the data
Me.txtDatum.Value = ""
Me.txtKM.Value = ""
Me.txtBedrag.Value = ""
Me.txtLiters.Value = ""
Me.txtOmschrijving.Value = ""
Me.txtDatum.SetFocus
End Sub

Als ik het formulier nu invul dan krijg ik bij de datum als ik invoer 07/09/2006 in het werkblad te zien 09/07/2006.
Ik weet niet hoe ik dit goed kan krijgen. Kan mij iemand helpen en dit aanpassen ?

Verder heb ik nog een vraagje:

Wat betekent in de macro:
  Me.txtDatum.SetFocus

Alvast bedankt voor jullie reacties.

Eric
Gelogd
Gelieve uw systeemgegevens in te vullen. Klik HIER voor meer informatie.

Offline WG

  • Ervaren lid
  • ***
  • Berichten: 366
  • Geslacht: Man
  • http://www.wimgielis.be
Re:Problemen met regel in Excel
« Reactie #1 Gepost op: 07 september 2006, 15:46:39 »
Citaat van: EricV op 07 september 2006, 15:22:45
Als ik het formulier nu invul dan krijg ik bij de datum als ik invoer 07/09/2006 in het werkblad te zien 09/07/2006. Ik weet niet hoe ik dit goed kan krijgen. Kan mij iemand helpen en dit aanpassen ?
Gebruik

ws.Cells(iRow, 1).Value = Format(Me.txtDatum,"dd/mm/yyyy")

SetFocus geeft de tekstbox de focus, je kan er dan iets in typen.

Lukt het?

Wigi

PS: maak je eerste deel van de code efficiënter en korter:

With ws.Cells(iRow, 1)
.Offset(0,0) = Me.txtDatum
.Offset(0,1) = Me.txtKM
.Offset(0,2) = Me.txtBedrag
.Offset(0,4) = Me.txtLiters
.Offset(0,5) = Me.txtOmschrijving
End With
Gelogd
Gelieve uw systeemgegevens in te vullen. Klik HIER voor meer informatie.

Offline LucHeyndrick

  • Volledig lid
  • **
  • Berichten: 217
  • Oplossing.be
Re:Problemen met regel in Excel
« Reactie #2 Gepost op: 07 september 2006, 17:30:25 »
Hallo,

Datums zijn echt lastig in VBA.  Meneerke Bill Gates heeft alles aangepast naar Amerikaanse notaties... en VBA heeft hier problemen mee.

Kijk hier 's:

https://www.newbytes.be
Excel => Lessen => Datums in VBA

mvg,
Luc
Gelogd
Gelieve uw systeemgegevens in te vullen. Klik HIER voor meer informatie.

Offline EricV

  • Volledig lid
  • **
  • Berichten: 138
  • Oplossing.be
Re:Problemen met regel in Excel
« Reactie #3 Gepost op: 08 september 2006, 08:39:42 »
Hallo Wigi,

Iedere keer weer sta ik er versteld van dat je overal een oplossing voor hebt. Hoe doe je dat ? Welke cursussen heb je gevolgd ?

Ik heb je oplossing toegepast en het werkte. Alleen de datum werd toch nog omgekeerd weergegeven.
Toen heb ik het volgende geprobeerd en daarna werkte ook de datum goed.
  .............. = Format (Me.txtDatum,"mm/dd/yyyy")

Nogmaals bedankt.

Eric
Gelogd
Gelieve uw systeemgegevens in te vullen. Klik HIER voor meer informatie.

Offline LucHeyndrick

  • Volledig lid
  • **
  • Berichten: 217
  • Oplossing.be
Re:Problemen met regel in Excel
« Reactie #4 Gepost op: 08 september 2006, 08:56:54 »
En toch is het fout wat je doet.
Je had het artikel op m'n site moeten lezen.

Wigi heeft de juiste redenering gevolgd, door de datum in het juiste formaat in de cel te zetten (Eerst dag; dan maand; dan jaar)... maar het bewijst dus weer 's duidelijk dat ze bij Microsoft geen rekening houden met Europese datumnotaties.  
Vandaar dat Excel zelfs hier denkt om het even te moeten aanpassen, en omdraaien.

Wat jij doet, is de zaak omdraaien... je plaatst in de cel eerst de maand, vervolgens de dag, en dan het jaar... op z'n Amerikaans dus.  En volgens dezelfde gebrekkige logica draait Excel ook hier de datum om, waardoor je de ene blunder hersteld met een andere.

Ik blijf hier met een slecht gevoel zitten.  Een beetje zoals de Toren Van Pisa... die heeft ook slechte fundamenten, en dat probeert men nu ook op te lossen door te ondersteunen met lapmiddelen.

Je zou beter deze code gebruiken: daarin maar ik Excel al op voorhand wijs dat het om een datum gaat... en dat schijnt ook te lukken.

Stond trouwens op m'n website:

    Dim dt As Date
    dt = Me.txtDatum.Value
    Range("A1").Value = dt

Luc
Gelogd
Gelieve uw systeemgegevens in te vullen. Klik HIER voor meer informatie.

Offline WG

  • Ervaren lid
  • ***
  • Berichten: 366
  • Geslacht: Man
  • http://www.wimgielis.be
Re:Problemen met regel in Excel
« Reactie #5 Gepost op: 08 september 2006, 09:29:14 »
Citaat van: LucHeyndrick op 08 september 2006, 08:56:54
En toch is het fout wat je doet.
Je had het artikel op m'n site moeten lezen.

Wigi heeft de juiste redenering gevolgd, door de datum in het juiste formaat in de cel te zetten (Eerst dag; dan maand; dan jaar)... maar het bewijst dus weer 's duidelijk dat ze bij Microsoft geen rekening houden met Europese datumnotaties.  
Vandaar dat Excel zelfs hier denkt om het even te moeten aanpassen, en omdraaien.

Wat jij doet, is de zaak omdraaien... je plaatst in de cel eerst de maand, vervolgens de dag, en dan het jaar... op z'n Amerikaans dus.  En volgens dezelfde gebrekkige logica draait Excel ook hier de datum om, waardoor je de ene blunder hersteld met een andere.

Ik blijf hier met een slecht gevoel zitten.  Een beetje zoals de Toren Van Pisa... die heeft ook slechte fundamenten, en dat probeert men nu ook op te lossen door te ondersteunen met lapmiddelen.

Je zou beter deze code gebruiken: daarin maar ik Excel al op voorhand wijs dat het om een datum gaat... en dat schijnt ook te lukken.

Stond trouwens op m'n website:

    Dim dt As Date
    dt = Me.txtDatum.Value
    Range("A1").Value = dt

Luc

Nuttige info, bedankt Luc.
Gelogd
Gelieve uw systeemgegevens in te vullen. Klik HIER voor meer informatie.

Offline WG

  • Ervaren lid
  • ***
  • Berichten: 366
  • Geslacht: Man
  • http://www.wimgielis.be
Re:Problemen met regel in Excel
« Reactie #6 Gepost op: 08 september 2006, 09:32:13 »
Citaat van: EricV op 08 september 2006, 08:39:42
Hallo Wigi,

Iedere keer weer sta ik er versteld van dat je overal een oplossing voor hebt. Hoe doe je dat ? Welke cursussen heb je gevolgd ?

Geen cursussen. Aanleg hebben om met getallen en formules te kunnen werken, erin geïnteresseerd zijn, en logisch denkvermogen hebben. En dan lukt het wel. Oh ja, blijven proberen tot iets niet lukt, en inventief zijn, helpt dikwijls ook wel een handje. Ten laatste, de de belangrijkste Excel formules en basisbeginselen van VBA onthouden.

Groeten

Wigi
Gelogd
Gelieve uw systeemgegevens in te vullen. Klik HIER voor meer informatie.

Offline EricV

  • Volledig lid
  • **
  • Berichten: 138
  • Oplossing.be
Re:Problemen met regel in Excel
« Reactie #7 Gepost op: 08 september 2006, 21:19:08 »
Luc,

Sorry dat ik pas zo laat reageer. Nog bedankt voor je reactie. Ik heb je raad opgevolgd en de wijziging doorgevoerd in de macro en het werkt perfect !

Gr.
Eric
Gelogd
Gelieve uw systeemgegevens in te vullen. Klik HIER voor meer informatie.
Pagina's: [1]   Omhoog
 


www.combell.com