Calculate/populate ExpirationDate colum with macro

[jaycee.lions]

TapeLabel SerialNo CreationDate SaveFactor ExpirationDate HostName
PRDB0101 OP0025 01/01/2013 30 PRD






I would like to populate the ExpirationDate by Calculating using CreationDate + SaveFactor. Is this possible using a macro?

 

[GS]

TapeLabel SerialNo CreationDate SaveFactor ExpirationDate

HostName PRDB0101 OP0025 01/01/2013 30
PRD






I would like to populate the ExpirationDate by Calculating using
CreationDate + SaveFactor. Is this possible using a macro?

Yes, OR a simple formula in the ExpirationDate column...

=CreationDate+SaveFactor

...where both CreationDate and SaveFactor are local (sheet level)
defined names that are column-absolute, row-relative to their
respective fields of data. So then, assuming your headings start in
colA on Sheet1...

Select a cell anywhere in row1 and open the Define Name dialog;

Defined name: "'Sheet1'!CreationDate"
RefersTo: =$C1

Defined name: "'Sheet1'!SaveFactor"
RefersTo: =$D1

--
Garry

Free usenet access at http://www.eternal-september.org
Classic VB Users Regroup!
comp.lang.basic.visual.misc
microsoft.public.vb.general.discussion