Hello,

I am working on a spreadsheet that in cells B3:B43 I have a list that the
user can select a planet from the list. When they select a planet I would
like the worksheet to auto fill in the current date in cell O3. And when
cells B3:B43 are blank cell O3 will be blank as well.

Hi,
try

=IF(COUNTA(B3:B43)>0,TODAY(),"")

if this helps please click yes, thanks

"RJ Swain" wrote:

> Hello,
>
> I am working on a spreadsheet that in cells B3:B43 I have a list that the
> user can select a planet from the list. When they select a planet I would
> like the worksheet to auto fill in the current date in cell O3. And when
> cells B3:B43 are blank cell O3 will be blank as well.

If the date is to be always in O3 try the below. or if it is in Col O then
change Range("O3") = to Range("O" & Target.Row)=

Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False
If Not Application.Intersect(Target, Range("B3:B43")) Is Nothing Then
If WorksheetFunction.Count(Range("B3:B43")) <> 0 Then
Range("O3") = Date
Else
Range("O3") = ""
End If
End If
Application.EnableEvents = True
End Sub

If this post helps click Yes
---------------
Jacob Skaria


"RJ Swain" wrote:

> Hello,
>
> I am working on a spreadsheet that in cells B3:B43 I have a list that the
> user can select a planet from the list. When they select a planet I would
> like the worksheet to auto fill in the current date in cell O3. And when
> cells B3:B43 are blank cell O3 will be blank as well.

Now a little twist to this. How can I have it auto update the date when
someone opens the excel spreadsheet? Right now, it puts in the date when the
data is entered but is it possible to have it auto update the date when the
user opens it up the following day?

"Eduardo" wrote:

> Hi,
> try
>
> =IF(COUNTA(B3:B43)>0,TODAY(),"")
>
> if this helps please click yes, thanks
>
> "RJ Swain" wrote:
>
> > Hello,
> >
> > I am working on a spreadsheet that in cells B3:B43 I have a list that the
> > user can select a planet from the list. When they select a planet I would
> > like the worksheet to auto fill in the current date in cell O3. And when
> > cells B3:B43 are blank cell O3 will be blank as well.

Hi,

If you have a look tomorrow you'll see the formula Eduardo gave you will
have updated to tomorrows date.

Mike

"RJ Swain" wrote:

> Now a little twist to this. How can I have it auto update the date when
> someone opens the excel spreadsheet? Right now, it puts in the date when the
> data is entered but is it possible to have it auto update the date when the
> user opens it up the following day?
>
> "Eduardo" wrote:
>
> > Hi,
> > try
> >
> > =IF(COUNTA(B3:B43)>0,TODAY(),"")
> >
> > if this helps please click yes, thanks
> >
> > "RJ Swain" wrote:
> >
> > > Hello,
> > >
> > > I am working on a spreadsheet that in cells B3:B43 I have a list that the
> > > user can select a planet from the list. When they select a planet I would
> > > like the worksheet to auto fill in the current date in cell O3. And when
> > > cells B3:B43 are blank cell O3 will be blank as well.