Declaratie in VBA

Anoniem
2017-03-14T15:53:33+00:00

Beste community-leden,

Ik ben getallen en een matrix nodig tot 10 miljard.

Wat gaat er mis in onderstaande declaratiecode.

Ook de knop F8 werkt niet meer.

Function (Celwaarde as Long) as Long

Aantal = Celwaarde

Dim Aantal As Long

Dim a(Aantal) As Long

Het maximum dat geaccepteerd wordt is 32000.

Ik gebruik Excel 2007

Groet,

Bocculus

Microsoft 365 en Office | Excel | Voor thuisgebruik | Windows

Locked Question. This question was migrated from the Microsoft Support Community. You can vote on whether it's helpful, but you can't add comments or replies or follow the question.

0 opmerkingen
Answer accepted by question author
Anoniem
2017-03-31T12:27:34+00:00

Bocculus,

Als ik dezelfde site heb gevonden als waar jij naar kijkt, dan zou ook bij jou moeten blijken dat het de juiste oplossing is.

Althans, ik heb hem op deze manier gecontroleerd:

http://tenvoorde.org/geocaching/GC677CX/checker?oplossing=7231042289

waarbij ik dus aan het eind van de link de oplossing heb gezet i.p.v. de cijfers die er oorspronkelijk stonden.

Hiervan werd gezegd dat de oplossing juist was.

Als jij een andere controle mogelijkheid hebt gevonden zou je de link ervan hier willen plaatsen?

Jan

Was dit antwoord nuttig?

0 opmerkingen

22 extra antwoorden

Sorteren op: Meest nuttig
Meest nuttig Nieuwste Oudste
  1. Anoniem
    2017-03-31T14:13:45+00:00

    Beste Jan,

    Ik weet niet waar het mis is gegaan. De oplossing werkt nu wel. Uiteraard heb ik ook het juiste getal aan het eind van de regel gezet.

    Wat kan er achter een gewoon aftelrijmpje zitten!

    Probleem opgelost. Bedankt voor je moeite, dat geldt ook voor Ronse.

    Groet,

    Bocculus

    Was dit antwoord nuttig?

    1 persoon vond dit antwoord nuttig.
    0 opmerkingen
  2. Anoniem
    2017-03-14T23:04:41+00:00

    Ik vermoed geheugen.

    10 000 000 000  das veel :)

    Ben je zeker dat je dat nodig hebt?

    Jan

    Was dit antwoord nuttig?

    0 opmerkingen
  3. Anoniem
    2017-03-14T18:14:03+00:00

    Beste JP Ronse,

    Over die 32000, daarin heb je gelijk, dat had ik afgerond. Is in werkelijkheid 32759 en dat komt overeen met het bereik van een integer.

    De functie werkt nog niet .

    Ik probeer het volgende:

    Function x(Celwaarde As Currency) As Currency

    Dim Aantal As Currency

    Dim a(Aantal) as Currency

    Ik moet dus ook een matrix hebben met de getallen 1 t/m 10 miljard.

    En waarom werkt de functietoets F8 niet meer?

    Groet,

    Bocculus

    Was dit antwoord nuttig?

    0 opmerkingen
  4. Anoniem
    2017-03-14T17:45:26+00:00

    Hallo Bocculus,

    Probeer eens:

    Function x(Celwaarde As Currency) As Currency

    Dim Aantal As Currency

    Een long is beperkt tot –2,147,483,648 to 2,147,486,647

    Currency: –922,337,203,477.5808 to 922,337,203,685,477.5807

    Maar dat je niet meer dan 32000 kunt ingeven is raar, dit is nog onder het bereik van een integer.

    Was dit antwoord nuttig?

    0 opmerkingen