Als ik in Excel een macro opneem, wil ik een getal (willekeurig) kunnen invoeren. Hoe kan ik dat voor elkaar krijgen, zodat de macro stopt op het moment van input?

Anoniem

Ik heb via de button "Macro opnemen" een macro uitgevoerd. Nu wil ik, dat de macro, nadat hij wacht totdat er een cijfer(via Enter) ingevoerd is. Daarna weer teruggaat naar het Hoofdmenu.

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

Antwoord geaccepteerd door vraagauteur

Anoniem

@Joop,

Hieronder een envoudig voorbeeld van een macro waarmee je misschie verder kunt.

Als in de inputbox wat is ingevoerd, wordt gecontroleerd of die invoer wel een getal was en als het dat was, of het groter dan 0 en kleiner dan 73 was. Als daaraan niet voldaan is, gaat de macro terug naar het begin, net zo lang totdat de invoer wel in orde is. En is de invoer in orde, dan wordt cel A1 in het blad 'Menu' geselecteerd. Omdat je met 2 verschillende bladen werkt, is de naam van het blad telkens vermeld, anders bestaat het gevaar dat het getal dat wordt ingevoerd niet in het juiste blad terecht komt. Aangenomen is dat je naast het blad 'Menu' ook het blad 'Blad1'gebruikt.

Sub macro1() 

Dim getal As Integer 

Begin: 

getal = InputBox("Voer een getal in tussen 0 en 73") 

If WorksheetFunction.IsNumber(getal) And getal > 0 And getal < 73 Then 

Sheets("Blad1").Range("E2").Value = getal 

Else 

GoTo Begin 

End If 

Application.Goto Sheets("Menu").Range("A1") 

End Sub

0 opmerkingen

15 extra antwoorden

Anoniem

2024-11-22T12:30:12+00:00

Om automatisch (zonder dat je daar opdracht voor geeft) naar het blad Menu te gaan, is een ander soort macro nodig. En verder is voor goede beantwoording van je vraag inzage in de gehele macro nodig en bij voorkeur ook in de opbouw van de gebruikte bladen.
Was dit antwoord nuttig?

0 opmerkingen Geen opmerkingen
Anoniem

2024-11-22T11:31:28+00:00

In het tabblad Spelerslijst heb ik een range van b2:c73. Daar zit een formule achter die kijkt wat er ingevuld is (opgebouwd naar een getal max 72 In cel T3). Dit getal wordt, naarmate het invullen steeds groter. Wanneer dit getal gelijk is aan T1, dan moet via de macro het tabblad menu aangeroepen worden.

Hoop zo dat je dit begrijpt wat ik bedoel
Was dit antwoord nuttig?

0 opmerkingen Geen opmerkingen
Anoniem

2024-11-22T11:05:08+00:00

Welke foutmelding krijg je dan?

In mijn Excel werkt de code zonder problemen.

Je realiseert je toch wel dat het om T1 en T3 in het blad Spelerslijst gaat?

Het selecteren van B2 in het blad Spelerslijst lijkt mij geen nut te hebben.
Was dit antwoord nuttig?

0 opmerkingen Geen opmerkingen