Under makroafvikling gør windows inaktiv

Er det runtime errors du vil forhindre i at stoppe programafviklingen? Så kan du fx bruge On Error Resume Next:

On Error Resume Next
Err.Clear

' <Kodelinje der kan udløse en runtime error kommer her>

If Err.Number <> 0 Then
    Msg = "Error # " & Str(Err.Number) & " was generated by " _
            & Err.Source & Chr(13) & Err.Description
    MsgBox Msg, , "Error", Err.Helpfile, Err.HelpContext
End If

...

Du kan også vælge at hoppe til en decideret error handler med fx
'On Error GoTo Fejlhaandtering',
hvor Fejlhaandtering er navnet på den label der hoppes til ved fejl:

Sub Test()
    On Error GoTo Fejlhaandtering

    '<Kodelinjer, der kan fejle kommer her>

    Exit Sub    ' Exit Sub for at undgå fejlhåndtering,
                ' hvis ting går godt
Fejlhaandtering:
    ' Betinget håndtering ud fra fejlnummer
    Select Case Err.Number   
        Case 55    ' "File already open" fejl
            Close #1   
        Case Else  ' Alle andre fejl havner hér
            Msg = "Error # " & Str(Err.Number) _
                    & " was generated by " _
                    & Err.Source & Chr(13) & Err.Description
            MsgBox Msg, , "Error", Err.Helpfile, Err.HelpContext
    End Select
    Resume  ' Genoptager afviklingen fra den linje der fejlede
End Sub

Mange tak Tip, et svar tak

Havde du et bud på hvordan slå jeg den visuel afviklingen af makroprogram fra på på skærmen, når den køre ?

Here U R. :-)

Jeg er ikke helt med på hvad du mener med 'visuel afvikling af makroprogram'?

skærmopdatering fra
application.screenupdating=false
skærmopdatering til
application.screenupdating=true

Mange tak TJP

Hej excelent mange tak for svaret, men det er 2. gang jeg
får hjælp fra dig.

Vil du godt smide et svar for jeg mener man kan dele point

ok velbekom