Av8tordude
Well-known Member
- Joined
- Oct 13, 2007
- Messages
- 1,075
- Office Version
- 2019
- Platform
- Windows
I have a table I would like to add the following code but i'm not sure how to do it since i never work with tables before.
The code simply inserts 1/1/2020 and sequentially inserts the following date in the same column.
FYI, I have a header row at BS6
Can someone assist.
Thank you kindly
The code simply inserts 1/1/2020 and sequentially inserts the following date in the same column.
FYI, I have a header row at BS6
Can someone assist.
Thank you kindly
VBA Code:
With Wks
.Range("BS7") = "1/1/" & cboYear
.Range("BS7").DataSeries Rowcol:=xlColumns, Type:=xlChronological, Date:=xlDay, Step:=1, stop:=DateSerial(Year(Range("BS7").Value), 12, 31)
End With