Generate a unique time stamp per x instruction cycles? Is it possible?

[111StepsAhead]

I have been looking into some more challenging topics and this came up. Basically, I need a way to create a unique time stamp after a far smaller value than a second which seems to be Excels smallest unit. Any help is appreciated here.

Public Function TimeInUS() As String
     Dim x As Integer
     For x = 1 To 10
          Range("B" & x).Value = x & "_person."
          Range("A" & x).Value = z     'TIME STAMP HERE <-------------
     Next x
End Function

Where 'z' is a new value slightly greater than itself a few microseconds ago. I need a value based off the time since I may run this program today, export the information, and re-run the program tomorrow with new data. The timestamp is a way to keep track of entered values througout all time.

Maybe over kill doing it this way but any help is appreciated. Thank you.

[Chippy]

Have a look at the GetTickCount function (Windows API).

[111StepsAhead]

I don't know if there is any way to get the times closer but what I have here will be ok. Thank you Chippy.

Public Declare Function GetTickCount Lib "kernel32.dll" () As Long

Sub testTimer()
    Dim t As Long
    Dim x As Long
    Dim temp As Long
    Dim temp2 As Long
    
    temp2 = 0
    For x = 1 To 50
        temp = temp2
        Do
            temp2 = GetTickCount
        Loop While temp = temp2
        Range("A" & x).Value = temp2
    Next x

End Sub