[Excel-VBA] Userform modeless openen*

[Verwijderd]

Hallo,

Ik probeer een Form in VBA te maken om wat data te visualizeren, echter moet de main loop van mijn VBA functie dus wel doorlopen, in Visual Basic had ik dit wel werkend denk ik echter in VBA krijgt de Form focus en loopt de main loop niet door.

Pseudo code

code:

Workbook_BeforeSave()

With frmSave
 .Show

 .UpdateProgressBar 0, "Starting Save"
 // do a bunch of data tasks
 .UpdateProgressBar 100, "Done!"
End With

Unload frmSave

Na het Show command is aangeroepen gaat de rest van de code door. Hoe kan ik dit doen zonder al mijn code naar de form te verplaatsen? Ik kan de form daar namelijk niet sluiten.

Bij voorkeur wil ik ook geen threading gebruiken, dit lijkt me niet zo mooi in VBA als het al zou kunnen.

bvd.

[NMe]

Waar hoort mijn topic?

PRG>>OFF

[Lustucru]

Alwaar we prijs stellen op een fatsoenlijke topictitel, dwz de vba host in tags er tussen en een titel die iets zegt over het probleem, en dat doet 'form in vba' nou niet bepaald.
--> titelfix (die trouwens ook meteen het probleem oplost

[Verwijderd]

de userform hoeft niet modeless te zijn. plaats dit gedeelte in het userform_activate event:

Visual Basic:

me.UpdateProgressBar 0, "Starting Save"
 doevents
datataskroutine
 me.UpdateProgressBar 100, "Done!"

in de module doabunch staat gewoon je datataskroutine:

Visual Basic:

public sub DatataskRoutine
for dataloop=1 to 1000
 '// do a bunch of data tasks
 frmsave.updateprogressbar int(dataloop/10)
doevents
next
frmsave.updateprogressbar 100