• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

Vraagformule

Status
Niet open voor verdere reacties.

wjvdlinden

Gebruiker
Lid geworden
20 jun 2006
Berichten
150
Goedemiddag,

Ik zou graag in excel formule maken die ik kan bedienen met een knop.

Ik klik op de knop:

1. Excel vraagt dan: Geef Crediteurnummer: Vervolgens tik ik het in. Excel plaatst de ingaven bijvoorbeeld in cel A1.

2. Excel vraagt vervolgens Geef Datum: Vervolgens tik ik de factuurdatum in. Excel plaatst de ingaven bijvoorbeeld in cel A3.

Is bovenstaande mogelijk?

Wie helpt mij uit de brand?

Met vriendelijke groet,

Wim van der Linden
 
niet met een formule, wel met een macro,
bijvoorbeeld
activesheet.range("A1").value=inputbox("Geef het crediteurnummer in","Nummer invoer")
 
Goedemiddag,

Bedankt voor het antwoord. Dit is echt super. Ik wil bij één van de vragen ook een datum in kunnen geven is dit ook mogelijk?

M.vr.gr.
Wim
 
activesheet.range("A3").value=inputbox("Geef datum","Factuurdatum")
 
Goedemiddag,

Dit gaat echt geweldig.

Maar wat is nu het verschil tussen deze twee formules?

Wat ik eigenlijk ook zou willen dat zodra ik dit excel bestand open gelijk deze formule wordt geactiveerd. Heel vroeger in lotus 1-2-3 werkte dit met autoexec macro's. Maar hoe krijg ik dit voor elkaar in Excel / VBA?

M.vr.gr.
Wim
 
Er is geen verschil. De gebruiker typt gewoon een getal in, of een tekst, of een datum, en die komt in de cel die aangeeft. A1 of A3 of whatever.

Je moet in de VBA code natuurlijk wel code opnemen die test of hetgeen de gebruiker invult wel degelijk een datum is (als je een datum verlangt)

Wigi
 
Om automatisch te starten:

- open het bestand
- doe Alt-F11
- open in het project ThisWorkbook
- klik bovenaan het witte scherm op de linkse dropdownlijst (met General)
Kies daar Workbook

er verschijnt:

Code:
Private Sub Workbook_Open()
End Sub

Plaats je code ertussen:

Code:
Private Sub Workbook_Open()
ActiveSheet.Range("A3").Value = InputBox("Geef datum", "Factuurdatum")
End Sub

Opslaan, afsluiten, Excel bestand afsluiten en terug openen.

Klaar!

Wigi
 
Geachte heren,

Bedankt voor uw antwoorden. Bij kwam de datum er inderdaad op zijn engels te staan. Dus misschien iets celeigenschappen proberen.

De Alf + F11 is dan wel bestand gebonden.

Kan ik er ook formulier van maken dat na de laatste vraag automatisch afdrukt.



De allereerste vraag moet éénmalig zijn geef Boekdatum.

1. Geef banknummer relatie. (Als dat ingegeven wordt verschijnt het crediteurnummer)
2. Geef documentdatum.
3. Geef grootboekrekeningnummer.
4. Geef kostenstelle?
5. Geef Kostenplaats?

Laatste vraag wilt u nog meer regels invoeren? Ja/Nee

Bij Nee automatisch printen.

Indien mogelijk maar dan wordt het waarschijnlijk voor mij te moeilijk.

Nog meer formulieren van dezelfde crediteur invoeren? Ja / Nee Bij Ja spring naar vraag 1 en bij Nee spring naar vraag 2.

Ik probeer zometeen even een voorbeeld excel te plaatsen?

Ik hoop echt dat dit gaat lukken.

Bij voorbaat dank.

M.vr.gr.

Wim
 
Sorry dat ik weer over hetzelfde onderwerp doorgaat.

Maar met Alt + F11. Kan ik inderdaad kiezen voor algemeen.

Wordt deze macro dat alleen opgestart bij het ene bestand wat ik wil?
 
Goedemiddag,

De uitleg over Alt + F11 is inmiddels succesvol.

Hoe kan ik instellen dat bijvoorbeeld 07-06-2006 goed wordt weergegeven. Dus komt er bij mij te staan 06-07-2006?

Is er nog iemand die wat kan vertellen hoe ik de punten in 1 formulier kan zetten?

Wim
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan