Macro to copy cells numeric data from from a worksheet to another worksheet

S

slcidc

My apologies I'm new at this and don't have a clue. Here is the macro
I've written:

Sub CopyCells()


Workbooks("hl57sym.xls").Sheets("Sheet1").Range("g82,g163,g244,g325,g406,g487,g568,g649,g730,g811,g892,g973,g1054,g1135,g1216,g1297,g1378,g1459,g1540,g1621,g1702,g1783,g1864,g1945,g2026,g2107,g2188,g2269,g2350,g2431").Copy_

Workbooks("TRANSFER.xls").Sheets("Sheet1").Range("b1,b2,b3,b4,b5,b6,b7,b8,b9,b10,b11,b12,b13,b14,b15,b16,b17,b18,b19,b20,b21,b22,b23,b24,b25,b26,b27,b28,b29,b30").Paste
End Sub

All I get is a userform1 and the data is not copied from one worksheet
to another. Please advise. I don't want a userform, all I want is for
the data to be copied.

Thanks
Steve
 
C

Chip Pearson

I don't understand how a userform figures into your question.


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top