Excel 2007에서 고유 식별자 (SQL Server newid())를 생성하는 방법이 있습니까?

Question

Excel 2007에서 고유 식별자를 만들 수 있습니까? SQL Server 함수 newid()가 생성하는 동일한 값을 찾고 있습니다. .

감사

Answer 1

당신이 CoCreateGuid API 함수

Declare Function CoCreateGuid Lib "ole32" (ByRef GUID As Byte) As Long 

Public Function CreateGUID() 
    Dim ID(0 To 15) As Byte 
    Dim N As Long 
    Dim GUID As String 
    Dim Res As Long 
    Res = CoCreateGuid(ID(0)) 
    For N = 0 To 15 
     GUID = GUID & IIf(ID(N) < 16, "0", "") & Hex$(ID(N)) 
    Next N 
    CreateGUID = GUID 
End Function