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

Vergrendelde vraag. Deze vraag is gemigreerd vanuit de Microsoft Ondersteuning-community. U kunt met een stem aangeven of de inhoud nuttig is, maar u kunt geen opmerkingen of antwoorden toevoegen of de vraag volgen.

0 opmerkingen Geen opmerkingen
Antwoord geaccepteerd door vraagauteur
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 Geen opmerkingen

22 extra antwoorden

Sorteren op: Oudste
  1. 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 Geen opmerkingen
  2. 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 Geen opmerkingen
  3. 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 Geen opmerkingen
  4. Anoniem
    2017-03-15T13:46:33+00:00

    Beste Jan212R,

    Dat is inderdaad zo. Ik krijg de melding overflow of onvoldoende geheugen.

    Ik ben een array nodig ter grootte van de wereldbevolking, dus bijna 7,5 miljard.

    Is er een manier om dat te omzeilen?

    Groet,

    Bocculus

    Was dit antwoord nuttig?

    0 opmerkingen Geen opmerkingen