Hi again,

I already asked about this, however I still do not know where to put the lastrow (sorry but I am not very familiar with this programming language). I already did a macro with a certain number of rows. However, it still can not read the extra rows of a text file (with more rows than the ones I used to create the macro initially). Now I know that I could use "lastrow" to make my calculations, however, I still do not know how to include this command in my program. Currently, one part looks like the one showed below: a formula is developed in the range of cells from D2 to D7 however I would like to say, instead of D7, until the last row appears in the file. Thus, I still do not know how to make it. What should I change here (in my main program)? How the subroutine should look like,if so? Hope somebody can help me with this!!!
Thanks in advance for your help,
Karolina
________________________________________________________________
Selection.Delete Shift:=xlUp
Columns("D:D").Select

Selection.Insert Shift:=xlToRight
Rows("1:1").Select

Selection.Insert Shift:=xlDown
Range("D2").Select
ActiveCell.FormulaR1C1 = "=DATE(RC[-1],RC[-3],RC[-2])"

Selection.AutoFill Destination:=Range("D2:D7"), Type:=xlFillDefault
Range("D2:D7").Select