Copying a formula to a range

[Brian]

Please help!

in column CY I have a list of names and there will never be an empty cell in the list but it will be of varying length from time to time.
I want the VBA to copy the formula from cell CP1 and place it in Column CZ next to each entry in column CY - it must not extend beyond the length of the number of entries in column CY. I then want to check the results of theformula and wherever the letters "Ct" appear I want to change it to "J".

my problem is determining how to make the formulas the same number as the number of entries in column CY.

Can anyone help.

I am using Excel 2007 and Windows 7

 

[Claus Busch]

Hi Brian,

Am Wed, 22 Oct 2014 06:36:47 -0700 (PDT) schrieb Brian:

my problem is determining how to make the formulas the same number as the number of entries in column CY.

LRow is the last cell in column CY:

Dim LRow As Long

LRow = Cells(Rows.Count, "CY").End(xlUp).Row
Range("CZ1:CZ" & LRow).Formula = "Your formula"


Regards
Claus B.

 

[dguillett]

Please help!

in column CY I have a list of names and there will never be an empty cellin the list but it will be of varying length from time to time.
I want the VBA to copy the formula from cell CP1 and place it in Column CZ next to each entry in column CY - it must not extend beyond the length ofthe number of entries in column CY. I then want to check the results of the formula and wherever the letters "Ct" appear I want to change it to "J".

my problem is determining how to make the formulas the same number as thenumber of entries in column CY.

Can anyone help.

I am using Excel 2007 and Windows 7

LRow = Cells(Rows.Count, "CY").End(xlUp).Row
with Range("CZ1:CZ" & LRow)
.Formula = "Your formula"
.replace, "ct","j"
end with