Auteur Topic: Inputbox (gelezen 12374 keer)

Namy · « **Gepost op:** 20 november 2005, 11:18:03 »

::)Wie kan mij helpen,

Wil graag weten hoe ik een inputbox kan maken waar ik een datum in kan zetten.
Deze datum moet dan op mijn werkblad geplaatst worden.
En zo wil dan een begin datum en een eind datum op mijn werkblad laten
weergeven.

Alvast bedankt.

SoftAid · « **Reactie #1 Gepost op:** 20 november 2005, 12:48:54 »

Hallo Namy,

en in welke cel moet die begindatum staan, en in welke cel de einddatum.

Ik veronderstel dat er meer begin- en einddatums moeten komen, anders had je geen inputbox (of dergelijke) nodig.

Gaat het om een kolom met begindatums en een kolom met einddatums?

Geef eens een voorbeeldje mee van je werkblad. Hang het als bijlage aan je volgend bericht.

SoftAid

Namy · « **Reactie #2 Gepost op:** 20 november 2005, 19:11:09 »

Hallo SoftAid,

Zou graag de begindatum in kolom B11 en de eind datum in kolom C11. Wat zoals je kan zien in de bijlage wil ik die later wegschrijven in een DB.

Alvast Bedankt
8)Namy

spyder · « **Reactie #3 Gepost op:** 20 november 2005, 19:36:02 »

Hoi Namy,

Het volgende moet lukken.

Sub invoeren()
beDatum = InputBox("Geef de begin datum.")
eidatum = InputBox("Geef de einddatum.")

Sheets("Invoer").Range("B11").Value = beDatum
Sheets("Invoer").Range("C11").Value = eidatum
End Sub

groetjes

Namy · « **Reactie #4 Gepost op:** 20 november 2005, 19:59:51 »

;)Hoi Spyder,

Bedankt voor je reactie maar ik krijg de einddatum niet in kolom C11.
Heb de volgorden van de regels al veranderd, maar krijg alleen de begin datum op regel B11.

Groetjes

Namy · « **Reactie #5 Gepost op:** 20 november 2005, 20:01:31 »

Herstel,

Het moet kolom B11 zijn i.p.v. regel

SoftAid · « **Reactie #6 Gepost op:** 20 november 2005, 20:09:42 »

Wat zou je zeggen van cel "C11"

SoftAid

spyder · « **Reactie #7 Gepost op:** 20 november 2005, 21:08:32 »

Hoi Namy,

Het zal wellicht mijn schuld zijn

, maar ik was vergeten om te zeggen dat je deze code in je modules moest kopieren, en daarna met rechts moest klikken op de knop "nieuwe snipperdag invoeren" en naar "macro toewijzen" gaan.
selecteer de macro "invoeren" en klik op OK.

prober nu eens opnieuw.

In principe zou je nu eerst een inputbox moeten krijgen om je begindatum in te tikken en vervolgens een inputbox om de einddatum in te geven. Zodra deze verdwenen zijn worden deze datums in de cellen B11 en C11 geplaatst.

groetjes

LucHeyndrick · « **Reactie #8 Gepost op:** 20 november 2005, 21:14:08 »

Helaas Spyder... ik moet u tegenspreken.
Uw oplossing werkt schijnbaar wel... maar dat is slechts schijn. Datums in VBA is één van die lastige problemen. VBA spreekt Amerikaans... wij spreken Nederlands. En datums in Amerika worden nu net iets anders geschreven dan hier. Zij draaien maanden en dagen om.

Dus wat zal Excel doen? Enkele voorbeelden: De linkerkolom is hetgeen je invoert... de rechterkolom is hetgeen Excel er van maakt:

1/2/2005 2/1/2005
3/2/2005 2/3/2005
18/10/2005 18/10/2005

Enkel het laatste voorbeeld vertaalt excel dus correct
Maar ook dat is enkel schijn. Want Excel maakt er nu geen datum van, maar tekst (dat kan je zien omdat tekst links uitgelijnt wordt, en datums rechts.)

Bekijk dit effe... dan kan je vanavond met hoofdpijn gaan slapen

https://www.newbytes.be
Excel => lessen
5- Datums in VBA

Je kan Excel wel dwingen de juiste datums te plaatsen, maar dan heb je meer nodig dan een InputBox

Luc

SoftAid · « **Reactie #9 Gepost op:** 20 november 2005, 21:31:10 »

Citaat van: LucHeyndrick op 20 november 2005, 21:14:08

VBA spreekt Amerikaans... wij spreken Nederlands.

Hallo Luc,

spijtig genoeg moet ik jou tegenspreken. Misschien spreekt jou VBA Engels, mijn VBA spreekt Nederlands.
Als ik een datum ingeef zoals 2/1/05 dan verschijnt er in mijn tabblad Invoer cel "B11", mooi 2 januari 2005, of 2/1/2005 of zondag 2 januari 2005, afhankelijk van de opmaak die ik opgeef.

Is het mogelijk dat jij met een Engelse (amerikaanse) Excel werkt? Met mijn Office XP NL SP3 heb ik allezins geen problemen.

SoftAid

LucHeyndrick · « **Reactie #10 Gepost op:** 20 november 2005, 21:43:35 »

Hoi SoftAid,

Proficiat... je hebt de methode gevonden om er toch een goede datum in te krijgen (Staat trouwens ook uitgelegd op m'n website).

Toch heb ik niet helemaal ongelijk. De truc bij jou zit er hem in de variabelen als Datum te declareren:

Dim beDatum As Date
Dim eidatum As Date

Hierdoor neemt Excel toch de juiste datum. Haal effe die declaraties weg (Jij kan dat omdat je Option Explicit niet aan hebt staan), en je zal zien dat je dezelfde fout krijgt als ik beschreven heb.

Wat ik wil zeggen is dat Excel hier op een zeer onvoorspelbare manier zelf beslist welke datum het is. En als programmeur sta ik hier huiverig tegenover.
OK... door de variabelen als Datum te declareren begrijpt Excel u schijnbaar correct, maar voor profesionele toepassingen geef ik er toch de voorkeur aan om Excel te dwingen. Dan slaap ik beter.

Luc

SoftAid · « **Reactie #11 Gepost op:** 20 november 2005, 21:48:26 »

Citaat van: LucHeyndrick op 20 november 2005, 21:43:35

OK... door de variabelen als Datum te declareren begrijpt Excel u schijnbaar correct, maar voor profesionele toepassingen geef ik er toch de voorkeur aan om Excel te dwingen.

Door de variabelen als Datum te declareren dwing ik Excel toch ook

Niet?

Groeten,

SoftAid

LucHeyndrick · « **Reactie #12 Gepost op:** 20 november 2005, 21:55:03 »

Klopt.
Maar vermits excel in andere gevallen al eigenwijs is, vertrouw ik excel hier niet. Maar niets houd je tegen om de zaak toch zo op te lossen. Uiteraard zal jij wel sneller met je werk klaar zijn dan ikke... en ben ik waarschijnlijk de idioot die moeilijk zit te doen waar het niet nodig is.

Luc

Namy · « **Reactie #13 Gepost op:** 20 november 2005, 22:57:53 »

Bedankt Heren

SoftAid spyder Luc

Voor de uitleg en ik ga het direct proberen.

BEDANKT

:-[Namy

spyder · « **Reactie #14 Gepost op:** 21 november 2005, 00:13:11 »

Citaat van: LucHeyndrick op 20 november 2005, 21:14:08

Helaas Spyder... ik moet u tegenspreken.

Geen enkel probleem.

Van fouten maken kun je ook leren.

Citaat

VBA spreekt Amerikaans... wij spreken Nederlands. En datums in Amerika worden nu net iets anders geschreven dan hier. Zij draaien maanden en dagen om.

Hier heb je groot gelijk in gehad. Hier had ik geen rekening mee gehouden.

. Ik had een tijdje terug hetzelfde probleem voorgehad, en ben er toen ook na lang zoeken achtergekomen.

Laten we zeggen dat dit een beetje de schuld is van mijn jeugdige overmoed?

(het zou natuurlijk ook kunnen dat ik het declareren van variabelen nooit geleerd gehad heb.

Citaat

Bekijk dit effe... dan kan je vanavond met hoofdpijn gaan slapen

https://users.skynet.be/onderland/Excel.htm#Lessen
5- Datums in VBA

Ik had die pagina's al eens gelezen (zelfs ALLES afgedrukt) maar heb daar totaal niet bij stilgestaan.

Citaat

Je kan Excel wel dwingen de juiste datums te plaatsen, maar dan heb je meer nodig dan een InputBox

Je sprak over een "professionele" oplossing?

Is die in het kort uit te leggen?

groetjes

Help!

Menu

Hulp bij posten

Zoeken

Recente topics