PasteSpecial
 

I am using past special to paste a formula into a cell
range. My code is as follows:

With Worksheets(1)
.Range(Cells(40, 2), Cells(51, 2)).Copy
.Range(Cells(curRow, colCount + 1), Cells(maxRow,
colCount + 2)).PasteSpecial _
Paste:=xlPasteFormulas
End With

curRow, colcount and maxRow are all variables set
dynamically. This works but I get a message I have to
respond to that asks if I want to replace the contents in
the destination cell. Can I turn that off?

PasteSpecial
 

precede the code with
Application.displayalerts = False
Bob Umlas
Excel MVP

"Kevin" wrote in message
...
I am using past special to paste a formula into a cell
range. My code is as follows:

With Worksheets(1)
.Range(Cells(40, 2), Cells(51, 2)).Copy
.Range(Cells(curRow, colCount + 1), Cells(maxRow,
colCount + 2)).PasteSpecial _
Paste:=xlPasteFormulas
End With

curRow, colcount and maxRow are all variables set
dynamically. This works but I get a message I have to
respond to that asks if I want to replace the contents in
the destination cell. Can I turn that off?

PasteSpecial
 

try Application.DisplayAlerts = False before it and reset to True after

--

HTH

RP

"Kevin" wrote in message
...
I am using past special to paste a formula into a cell
range. My code is as follows:

With Worksheets(1)
.Range(Cells(40, 2), Cells(51, 2)).Copy
.Range(Cells(curRow, colCount + 1), Cells(maxRow,
colCount + 2)).PasteSpecial _
Paste:=xlPasteFormulas
End With

curRow, colcount and maxRow are all variables set
dynamically. This works but I get a message I have to
respond to that asks if I want to replace the contents in
the destination cell. Can I turn that off?

PasteSpecial
 

Thanks Guys! That worked great!

Thanks Again!

Kevin
-----Original Message-----
I am using past special to paste a formula into a cell
range. My code is as follows:

With Worksheets(1)
.Range(Cells(40, 2), Cells(51, 2)).Copy
.Range(Cells(curRow, colCount + 1), Cells(maxRow,
colCount + 2)).PasteSpecial _
Paste:=xlPasteFormulas
End With

curRow, colcount and maxRow are all variables set
dynamically. This works but I get a message I have to
respond to that asks if I want to replace the contents in
the destination cell. Can I turn that off?

.