• Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 492
  • Last Modified:

VBA Excel Statement NM = MsgBox("Data has been clear", vbOKOnly, "New Month")

See

NM = MsgBox("Data has been clear", vbOKOnly, "New Month")

What does this mean?  I understand the bit to the right of the "=".

What does the bit to the left mean?

The NM (presumably "New Month") is never referred to again else where.
What purpose does it serve (since never referred to again)


Sub NewMonth()
    Application.ScreenUpdating = False
    Sheet48.Select
    Range("GoTo1").Select
    Range(Selection, Selection.End(xlDown)).Select
    Selection.Copy
    Range(Selection, Selection.End(xlToLeft)).Select
    Selection.PasteSpecial Paste:=xlPasteFormulas, Operation:=xlNone, _
        SkipBlanks:=False, Transpose:=False
    Range("A1").Select
    Sheet38.Select
    Range("EvaDailyData").Select
    Selection.ClearContents
    Range("A1").Select
    Sheet29.Select
    Application.ScreenUpdating = True
    NM = MsgBox("Data has been clear", vbOKOnly, "New Month")
End Sub
0
Patrick O'Dea
Asked:
Patrick O'Dea
  • 2
1 Solution
 
SteveCommented:
As you are using the vbOKOnly in the messagebox VBA is expecting a response of some kind to the messagebox question "is it OK".
So if you try the following you will see it wants a response, as it will error saying "expected =".

Sub test()
    MsgBox("Data has been clear", vbOKOnly, "New Month")
End Sub

Open in new window


The NM is just there to fulfill that requirement... it does nothing else and can be anything really.
0
 
Patrick O'DeaAuthor Commented:
Ahhh!  Easym thanks!
0
 
Martin LissOlder than dirtCommented:
Since you have already accepted an answer to this question I obviously don't expect any points but I feel I should make a couple of comments.

1) While as Steve pointed out MsgBox("Data has been clear", vbOKOnly, "New Month") will give you an error, MsgBox "Data has been clear", vbOKOnly, "New Month" won't. That's because the former is calling the MsgBox function expecting a return value, while the latter doesn't.

2) When you want to know what the user's response is you can do something like this.

NM = MsgBox("Do you want to clear the data?", vbYesNo, "New Month")
If NM = vbNo Then 
    Exit Sub
Else
    ' Clear the data
End If

Open in new window

0
 
Patrick O'DeaAuthor Commented:
Thank ML .... Some day that will be useful!
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

Join & Write a Comment

Featured Post

Free Tool: IP Lookup

Get more info about an IP address or domain name, such as organization, abuse contacts and geolocation.

One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.

  • 2
Tackle projects and never again get stuck behind a technical roadblock.
Join Now