Het runnen van een procedure wanneer een werkmap wordt geopend

Je kan veroorzaken Excel om een ​​procedure automatisch wordt uitgevoerd wanneer een bepaalde werkmap wordt geopend. Bijvoorbeeld, wanneer de werkmap wordt geopend, wilt u misschien een procedure die de gebruiker vraagt ​​of ze willen een taak uit te voeren, zoals het opslaan van de gegevens van de vorige dag naar een ander bestand uit te voeren.

In werkelijkheid, Excel biedt twee verschillende manieren waarop je een procedure uitgevoerd wanneer een werkmap wordt geopend. In beide gevallen, alles wat je hoeft te doen is zorgen voor een speciale naam voor de macro; dat is het idee dat Excel vertelt u de procedure wilt lopen bij het openen. U kunt, indien gewenst, de naam van de procedure Auto_openen en plaats deze in een regelmatige macro-module. U kunt ook een procedure genaamd Workbook_Open binnen de ThisWorkbook object definiëren.

Als voorbeeld, overweeg dan de volgende code:

Sub Auto_openen ()
Dim sMsg als Koord
Dim iBoxType As Integer
Dim iUpdate As Integer
Dim sDefault als Koord
Dim sOldFile als Koord
Dim iStatusState As Integer

sMsg = "Wilt u de transacties van gisteren te redden?"
iBoxType = vbYesNo + vbQuestion
iUpdate = MsgBox (sMsg, iBoxType, "Automatic Backup")
Als iUpdate = vbYes Dan
sMsg = "Welke bestandsnaam wilt u gebruiken?"
sDefault = "OLD.DAT"
sOldFile = InputBox (sMsg, "Automatic Backup", sDefault)
iStatusState = Application.DisplayStatusBar
Application.DisplayStatusBar = True
Application.StatusBar = "Updaten afgelopen maanden ..."
UpdateYesterday (sOldFile)
Application.StatusBar = False
Application.DisplayStatusBar = iStatusState
End If
End Sub

(Vergeet niet dat deze procedure is een voorbeeld, het zal niet goed draaien op uw systeem, omdat het een functie genaamd UpdateYesterday, waarin de feitelijke actualisering doet noemt.)

Deze macro wordt automatisch uitgevoerd wanneer de werkmap waaraan het is bevestigd wordt geopend. Je kan ook de code te wijzigen en plaats deze in de ThisWorkbook object simpelweg door het veranderen van de eerste lijn om dit:

Private Sub Workbook_Open ()

ExcelTips is uw bron voor kosteneffectieve Microsoft Excel training. Deze tip (8451) is van toepassing op Microsoft Excel 2007, 2010 en 2013. U kunt een versie van deze tip voor de oudere menu-interface van Excel vindt u hier: Het runnen van een procedure wanneer een werkmap wordt geopend.


© 2019 Quilcedacarvers.com | Contact us: webmaster# quilcedacarvers.com