Multiple variables in MsgBox

[smiffy197]

Hi There,

I am trying to get a pop up message box to display a list of names that may change each time you open the sheet.

I deal with new starters at work and want to have a popup box that finds the users who are starting in the next 2 weeks and haven't already been assigned a laptop. I have the code sorted to the point where I have a list of these people on a separate sheet, but I want a MsgBox to display them like this:

The following users haven't been assigned laptops:

Firstname Lastname
Firstname Lastname
etc.

I can get the message box to display the first name on the list but don't know how to add the rest. Any help would be appreciated because I have spent a couple of days on this now and got no where!

Many Thanks
J

 

[dreid1011]

Something like this perhaps:

-

MsgBox "The following users haven't been assigned laptops:" & vbNewLine & Firstname & " " & Lastname & vbNewline & Firstname & " " & Lastname & vbNewline ....


-

 

[smiffy197]

Thanks dreid,

That's pretty much as far as I have got at the moment but the names are variables based on cell references and the number of names might change each time

Sometimes you'll open the sheet and have 6 people sometimes only one or two.

The way you suggested, which is a method I have tried leaves lots of blank space in the MsgBox if there is only one persons name.

 

[smiffy197]

Managed to get this working.
This is the bit of the code I was stuck on.

 Dim c As Range
                Dim strng As String
        
                    Set c = Range("A2").End(xlDown)
                    k = 1
                    Do
                        k = k + 1
                        strng = strng & Cells(k, 4) & " " & Chr(13)
                    Loop Until k = c.Row
                    
                    '//Displays message for multiple users
                    MsgBox "The following users will start soon and have not been assigned laptops: " & vbNewLine & vbNewLine & strng, vbInformation, "Welcome"