Search : in
By :

Create Msg/Popup to notify in Excel VBA

Last answer on Feb 12, 2009 2:48:19 am GMT Siebel SME, on Feb 10, 2009 3:17:02 pm GMT 
 Report this message to moderators

Hello,

I need a Excel VB script to notify/popup a message when the number of the letter U on a calendar exceeds 6, 8, 12 etc. It will have to check the range of the calendar searching for the letter U and adding them and then providing an automatic popup when the number of U's are greater than 6 and etc. Thanks..

Configuration: Windows XP
Internet Explorer 6.0

Best answers for « Create Msg/Popup to notify in Excel VBA » in :
How to Create Msg/Popup to notifications in Excel VBA? Show How to Create Msg/Popup to notifications in Excel VBA? Issue Solution Note Issue I need a Excel VB script to notify/popup a message when the number of the letter U on a calendar exceeds 6, 8, 12 etc. It will have to check the range of...
Excel vba if first char of cell is 1 then Show
Repainting a cell using excel VBA Show
Repainting a cell using excel VBA ShowRepainting a cell using excel VBA Issue Solution Note Issue I am writing a code in excel VBA to generate a report.I am totally new to VBA.Here's my code Private Sub CommandButton1_Click() Dim a1 As Integer Dim d1 As Integer Dim...
[VBA: VB6] Using excel from another application Show[VBA: VB6] Using excel from another application Here is a little routine to call Excel from VB6 or another Office application. Paste in a general module (eg Module1) In VBA>> Insert>> Module and paste in the window ... In VB6>>...
VBA A simple second Timer ShowVBA A simple second Timer In VBA, there is Timer feature available,but you can create one very easily. In a module sheet: Private Sub Worksheet_SelectionChange(ByVal Target As Range) 'For example: Start / Stop the timer every...
Worksheet - Cells ShowThe Concept of a Cell A "cell" is the intersection between a line (horizontal) and a column (vertical) on a worksheet. Thus, the name of the line combined with the name of the column gives the cell's coordinates (the term address is sometimes also...
Hyperlinks ShowIntroduction to anchors Hypertext links or hyperlinks (anchors) are HTML elements that, when clicked on, enable readers to visit a new address. Hyperlinked text is underlined by default. Hyperlinks are what connect web pages to one another. They...
Management organizational chart ShowManagement organizational chart A project must be included in the general objectives of the business, because it generally mobilizes personnel for a long period of time. This is why it is necessary for an organization to determine its intentions in...
Ask your question Reply

1

Helper, on Feb 11, 2009 1:32:22 am GMT
  • +3

You stated you wanted the msgbox to pop up automatically, so the code will have to go into the worksheet change event and not just a regular macro or command button. Here is the code but I also have a link for you to check the file out. I made a February 2009 calendar and just added random words with the letter "U" in them. The total is at six words. Type in a word or words that you would actually use, and see if that is what you need. Hope this helps.

[URL=http://www.4shared.com/file/87077596/56259f70/Calendar.html]Calendar.xls/URL


Private Sub Worksheet_Change(ByVal Target As Range)

Dim i As Variant
Dim letter
letter = LCase("u")
letter2 = UCase("U")
Dim count As Integer
Dim FindU As Range
Set FindU = Range("A4:G12")
Dim temp

For Each i In FindU

If InStr(i, letter) > 0 Or InStr(i, letter2) > 0 Then

count = count + 1

temp = count

End If

Next i

Select Case temp

Case Is > 12

MsgBox "The number of U's have exceeded 12." & " The total is " & temp

Case Is > 8

MsgBox "The number of U's have exceeded 8." & " The total is " & temp

Case Is > 6

MsgBox "The number of U's have exceeded 6." & " The total is " & temp


End Select


End Sub

   
Reply to Helper

2

Siebel SME, on Feb 11, 2009 2:24:04 pm GMT

2 Questions:

When I try to run the Macro/VB Script it does nothing but come up with the Macros prompt to create a macro name. What do I do?

Is it different if I want to find the word "Unscheduled" in the calendar?

Thanks so much for your help..

   
Reply to Siebel SME

3

Helper, on Feb 12, 2009 1:20:32 am GMT

1) Did you copy and paste the code in you own worksheet? Where did you put the code?

2) It will not matter if the word is uppercase or lower case. This part is very important. The IntStr() is used so the way it is coded it will find the first occurance of "U" and count the position in the word and stop. So, the word "Unscheduled" only counts one "U" because it stops the first time it sees the character. Do you need the total to be one or two for that word? If you need it to count two, then that will be trickier to code.

   
Reply to Helper

4

 Siebel SME, on Feb 12, 2009 2:48:19 am GMT

I figured it out Helper.. thank you so much.. never mind. I got what you meant. MY new greater question is here: http://en.kioskea.net/forum/affich 67595 excel vba for multiple worksheets

   
Reply to Siebel SME
Ask your question Reply
They need your help