I am trying to insert a unique ID for each row in multiple sheets that are
not connected but the data will later be combined (so I need the unique ID to
be unique).

I thought I would use the following code:
Dim GId As Guid = Guid.NewGuid() but I get an error message that it is not
supported in VBA.

I'm sure many people have this same problem and there must be a preferred
method.

I would appreciate any advise.

Ron

A common way to do this is to use the date and time functions, along with
some prefix, like this:

="SS" & year(now) & month(now) & day(now) & hour(now) & minute(now) &
second(now)

Each ID assigned will obviously be unique.

Stan Scott
New York City

"Ron Rasmussen" <Ron wrote in message
...
I am trying to insert a unique ID for each row in multiple sheets that are
not connected but the data will later be combined (so I need the unique ID
to
be unique).

I thought I would use the following code:
Dim GId As Guid = Guid.NewGuid() but I get an error message that it is not
supported in VBA.

I'm sure many people have this same problem and there must be a preferred
method.

I would appreciate any advise.

Ron

I think your right...I can randomize the first few characters and that should
do it. I have several thousand users worldwide.

Thanks again.

Ron

"Stan Scott" wrote:

A common way to do this is to use the date and time functions, along with
some prefix, like this:

="SS" & year(now) & month(now) & day(now) & hour(now) & minute(now) &
second(now)

Each ID assigned will obviously be unique.

Stan Scott
New York City

"Ron Rasmussen" <Ron wrote in message
...
I am trying to insert a unique ID for each row in multiple sheets that are
not connected but the data will later be combined (so I need the unique ID
to
be unique).

I thought I would use the following code:
Dim GId As Guid = Guid.NewGuid() but I get an error message that it is not
supported in VBA.

I'm sure many people have this same problem and there must be a preferred
method.

I would appreciate any advise.

Ron

Hi Ron,
You can test
Sub CreateGUID()
MsgBox Left(CreateObject("Scriptlet.TypeLib").GUID, 38)
End Sub

Regards,
MP

"Ron Rasmussen" <Ron a écrit dans le message
de ...
I am trying to insert a unique ID for each row in multiple sheets that are
not connected but the data will later be combined (so I need the unique ID to
be unique).

I thought I would use the following code:
Dim GId As Guid = Guid.NewGuid() but I get an error message that it is not
supported in VBA.

I'm sure many people have this same problem and there must be a preferred
method.

I would appreciate any advise.

Ron