Kernel32.dll

CopyMemory
FileTimeToSystemTime
GetTempPathA
GetTickCount	Used for timing a macro
GetVersionEx
GlobalAlloc
GlobalLock
GlobalSize
GlobalUnlock
LocalFileTimeToFileTime
MultiByteToWideChar
RtlMoveMemory
RtlZeroMemory
Sleep
SystemTimeToFileTime
WideCharToMultiByte

Declare PtrSafe Sub xLib "Kernel32" Alias "Sleep" (ByVal dwMilliseconds As Long) 

Public Sub TestPause() 
    Dim start As Double 
    start = Timer 
    Sleep 8000      'Pause for 8 seconds  
    Debug.Print "Paused for " & Format(Timer - start, "#,###.000") & " seconds" 
End Sub