title image


Smiley Re: sanduhr Excel-VBA




Public Sub HierBeiDerArbeit()



Dim i As Long



On Error GoTo ErrHandler



Application.Cursor = xlWait



For i = 1 To 100000

DoEvents

Next i



ErrExit:

On Error Resume Next

Application.Cursor = xlDefault

Exit Sub



ErrHandler:

Resume ErrExit



End Sub







Schönen Gruß,

Eric

Spotlight-Kicktipp gestartet!

Steig ein und trete mit Deinem Bundesliga-Tipp gegen die Besten an! :o)

http://www.kicktipp.de/spotlight/



geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: