Prompts

[sdmccabe]

Is it possible to prompt a user for an input (date) when a spreadsheet is
opened, and save that value in a cell?

[Peo Sjoblom]

It won't work if the user doesn't enable macros when prompted

put it in ThisWorkbook module, it will put whatever you put in that input
box in sheet1 cell A1




Option Explicit

Private Sub Workbook_Open()

Dim vDate As String

vDate = InputBox("Please type in a date")

Worksheets("Sheet1").Range("A1") = vDate

End Sub


--

Regards,

Peo Sjoblom

http://nwexcelsolutions.com


"sdmccabe" <[email protected]> wrote in message
news:[email protected]...
> Is it possible to prompt a user for an input (date) when a spreadsheet is
> opened, and save that value in a cell?