Excel - Shared Workbook - Want to See list of Current Users

[Curtis99]

Hello,

I'm new to Excel VBA programming, and have much to learn. I apologize if my question is overly simple.

I have a shared workbook, and at any given time a number of people may be using it. Is there a way - using VBA - to see the names of all the users?

Thanks!

Sincerely,
Curtis

 

[bdmangum]

This should do what you need, though there may be a better way...

Sub CurUserNames()
    uSize = UBound(ThisWorkbook.UserStatus)
    For i = 1 To uSize
        MsgBox ThisWorkbook.UserStatus(i, 1)
    Next
End Sub

BD

 

[GlennUK]

Hi BD,

I find that Shared mode leaves a bunch of userstatus refs in memory from previous sessions, giving unrealistic results from the UserStatus property. Haven't worked on an alternative as yet.

Cheers, Glenn.

Beauty is in the eye of the beerholder.

 

[xlbo]

lol - the alternative is to not used the shred workbook feature of excel because it is buggy and doesn't usually work well.

Simple answer is:

Multi-user = database
single user = spreadsheet

Rgds, Geoff

We could learn a lot from crayons. Some are sharp, some are pretty and some are dull. Some have weird names and all are different colours but they all live in the same box.

Please read FAQ222-2244 before you ask a question