<div>
Replace line 6 with<br />
ActiveSheet.PasteSpecial xlPasteValues
</div>


Replace line 6 with
ActiveSheet.PasteSpecial xlPasteValues

<div>
Martin: &nbsp;<br />
<br />
runtime error 1004<br />
PasteSpecial &nbsp;method of Worksheet class failed.
</div>


Martin:  

runtime error 1004
PasteSpecial  method of Worksheet class failed.

<div>
Saurabh,<br />
Range(colTo &amp;&nbsp;3).PasteSpecial xlPasteValues<br />
<br />
worked fine...<br />
<br />
Thanks !
</div>


Saurabh,
Range(colTo & 3).PasteSpecial xlPasteValues

worked fine...

Thanks !

<div>
fordraiders..Always Happy to help.. :-)<br />
<br />
Saurabh...
</div>


fordraiders..Always Happy to help.. :-)

Saurabh...

<div>
<div class="content wysiwyg-content">
is there a way to enhance the code below to only copy over &quot;text&quot;...and not formatting.<br />
<br />

<pre><code id="code-10-28701349-1">Sub CopyData(colFrom As String, colTo As String)
    ThisWorkbook.Activate
    ws.Range(colFrom &amp; &quot;6:&quot; &amp; colFrom &amp; rwMax).Copy
    wb.Activate
    Range(colTo &amp; 3).Select
    ActiveSheet.Paste
End Sub</code></pre>
<br />
<br />
Thanks<br />
fordraiders
</div>
</div>


is there a way to enhance the code below to only copy over "text"...and not formatting.

(CODE)


Thanks
fordraiders

enhance code to only include text and not carry over formatting

Microsoft Excel topics include formulas, formatting, VBA macros and user-defined functions, and everything else related to the spreadsheet user interface, including error messages.