Dates column Is this possible

D

Debptg

Hello, I wonder if I can somehow set up a sheet, where column
represents the date. And the current date is automatically entered i
column A each time a new row is used? Can it be done
 
D

Don Guillett

That can be done. When you say a new row is used. How is it "used"??? That
would influence how your desire is met.
 
P

Paul B

Debptg, give this a try

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
'will put date in column A when something is put in any other column
'right click on sheet tab view code and paste
If Target.Count > 1 Then Exit Sub
If Target.Column >= 2 Then
Range("A" & Target.Row).Value = Date
End If
End Sub

--
Paul B
Always backup your data before trying something new
Please post any response to the newsgroups so others can benefit from it
Feedback on answers is always appreciated!
Using Excel 97 & 2000
** remove news from my email address to reply by email **
 
D

Debptg

Thanks for the replies.

Don, when I say used, I mean if any data is entered.

Paul, this is my first time doing anything with the initials VBA so,
am missing something very basid. I have no trouble getting into th
right screen. Once there I've attempted pasting the info in your pos
into that white center screen.

Do I need to save somehow? Is there another step?

Thanks in advance
 
D

Don Guillett

Paul gave you an ans that should do what you want. To install
right click the desired sheet tab>view code>copy/paste it>save workbook
Now when you enter anything on the row in col 2 and beyond the date will be
put in col a
 
Top