Creating Ask type field in Excel

[Guest]

Is there a way to create a field with similar functionality to the Word field type Ask? I want to create an Excel template that ask me for a customer's name when I open it and then puts what I type in a specific place on the spreadsheet.

 

[Frank Kabel]

Hi
you may use the workbook open event. Put the following in your workbook
module (not in a standard module):

Private Sub Workbook_Open()
Dim ret
ret = InputBox("Enter something")
If ret <> "" Then
Me.Worksheets("Sheet1").Range("A1").Value = ret
End If
End Sub