close
Is it possible to prompt a user for an input (date) when a spreadsheet is
opened, and save that value in a cell?
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(quot;Please type in a datequot;)
Worksheets(quot;Sheet1quot;).Range(quot;A1quot;) = vDate
End Sub--
Regards,
Peo Sjoblom
nwexcelsolutions.comquot;sdmccabequot; gt; wrote in message
...
gt; Is it possible to prompt a user for an input (date) when a spreadsheet is
gt; opened, and save that value in a cell?
全站熱搜
留言列表
