• 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.

meerkeuze vragen

Status
Niet open voor verdere reacties.

Roberto83

Gebruiker
Lid geworden
21 aug 2011
Berichten
32
Beste Excelisten,
Bijgevoegd bestand heb ik gemaakt om te oefen met vragen uit het ADN, ik zou graag 2 dingen willen doen.
ten eerste dat het antwoord dat je geeft (tijdelijk) geblokkeerd word en ten tweede datje eigenlijk random door de vragen spring en niet steeds van boven af aan begint.
bij een toets krijg je eigenlijk steeds 20 vragen.
bij voorbaat mijn dank
 

Bijlagen

  • voorbeeld.xlsm
    981,4 KB · Weergaven: 44
Je kan misschien eerst beginnen met alle samengevoegde cellen te verwijderen.
 
Beste Emields,
Bedankt voor je reactie.
Als dit nodig is pas ik dat natuurlijk aan, maar heb eigenlijk deze opzet zo gemaakt voor het snel door de vragen te springen. Heb op het forum de nodige tips gevonden en de rekenmachine overgenomen. aan de hand daarvan dit bestand gemaakt.
Er staan op het tabblad adn basis zo'n 650 vragen daarom wil ik graag dat die random de vragen uitkiest.
Indien nodig kan ik het volledige bestand sturen inclusief de vragenlijst
 
dat zal toch beter werken dan in het duister tasten.
 
Beste leden,
Iemand die een idee heeft hoe ik in een kolom, bijvoorbeeld tussen B3 en B1000 na het invoeren van A,B,C of D deze willekeurig naar een volgende cel springt in dit bereik.
 
De vragen in een apart blad zetten
De vragen via vba een random nummer geven. (is misschien voor verbetering vatbaar, ik ben geen expert hierin)
Via vert.zoeken de diverse vragen opvragen.

Bestandje even gemaakt met 6 vragen en een toets van 5 vragen.
 

Bijlagen

  • vragen voorbeeld.xlsm
    146,2 KB · Weergaven: 22
Beste Popipipo, bedankt voor je reactie. de antwoorden plaatsen zoals in je voorbeeld lukt niet. daar zijn ze te uitgebreid voor. bijgevoegd het gehele bestand. het zou mooi zijn dat na het invullen van A,B,C of D de cursor willekeurig verder naar een andere vraag springt maar geen idee of dit mogelijk is
 

Bijlagen

  • ADN VRAGEN.xlsm
    1,1 MB · Weergaven: 29
bedoel je dan zoiets
 

Bijlagen

  • vragenlijst 2.xlsm
    67 KB · Weergaven: 28
Beste Emields,
Hartelijk dank voor je voorbeeld.
Ik ga de vragenlijst inpassen in je voorbeeld en laat weten hoe hoe het bevalt.
in het voorbeeld ziet het er goed uit. bedankt hiervoor.
Zal alleen niet voor het weekend zijn
 
Al die samengevoegde cellen maakt het er niet makkelijker op.

In een module
Code:
Public t As Long
Sub leeg()
  ActiveSheet.Unprotect
  Application.EnableEvents = False
  Columns(2).SpecialCells(-4174).ClearContents
  Columns(2).SpecialCells(-4174).Locked = False
  Application.Goto Cells(1), True
  ActiveSheet.Protect
  Application.EnableEvents = True
End Sub
Sub Oval2_Click()
  frmCalculator.Show
End Sub

In de module van ThisWorkbook
Code:
Private Sub Workbook_Open()
  t = Application.Max(Columns(1))
End Sub
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
 t = Application.Max(Sh.Columns(1))
End Sub
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
  If Target.Column = 2 Then
    ActiveSheet.Unprotect
    Cells(Target.Row, 2).Resize(6).Locked = True
    Sh.Cells(Application.Match(Application.RandBetween(1, t), Sh.Columns(1), 0), 2).Select
    ActiveSheet.Protect
  End If
End Sub

Deze
Code:
Sh.Cells(Application.Match(Application.RandBetween(1, t), Sh.Columns(1), 0), 2).Select
Kan ook met application.goto maar dan kom ik, door de samengevoegde cellen, niet altijd lekker uit. Of het ook nog goed gaat als alle vragen zijn beantwoord mag je zelf even testen.
 

Bijlagen

  • ADN VRAGEN.xlsm
    1,1 MB · Weergaven: 29
zoals gevraagd met telkens 20 andere vragen
 

Bijlagen

  • vragenlijst 3.xlsm
    330,1 KB · Weergaven: 30
Beste Emields, .
Ik was al een eindje op weg met het omzetten van de gegevens naar je bestand maar dat heb je bij deze dus ook al gedaan. Hartelijk dank voor je werk. dit werkt perfect zo. hier gaan zeker een hoop mensen veel plezier van hebben.
Ook de andere leden bedankt voor jullie bijdrage, ik ga deze zeker ook bestuderen want het blijft boeien die formules. ik plaats deze als opgelost
 
Status
Niet open voor verdere reacties.
Steun Ons

Nieuwste berichten

Terug
Bovenaan Onderaan