Pop Up Windows

[Guest]

I want to have a pop up window appear that the user can input more
information into it and then transfer that information to another location in
the spreadsheet.

In my worksheet I have the user input a name in cell A1. When this name is
entered, I would like to have a pop up window appear asking the user to input
the birthday of the name just entered. Once the user enters this information
and closes the pop up window this birthday information is entered into cell
A139, which is then used for other programming of the worksheet.

I have never done this sort of thing before and am totally lost, please
someone help!

Thanks,
Russ

 

[Gord Dibben]

Without knowing what name you expect in A1 the code below will accept anything
entered in A1.

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
On Error GoTo stoppit
Application.Enableevents = False
If Target.Address = "$A$1" And Target.Value <> "" Then
B_Day = InputBox("enter your birthday")
Range("A39").Value = B_Day
End If
stoppit:
Application.Enableevents = True
End Sub

This is sheet event code.

Right-click on the sheet tab and "View Code"

Copy/paste into that sheet module.


Gord Dibben MS Excel MVP