View Single Post
  #8   Report Post  
Posted to microsoft.public.excel.newusers
Seeking help
 
Posts: n/a
Default VBA coding needed badly


Thanks alot Jlatham!!This code is greati hope it is able to copy the ten
thousands rows of info i have to do.I have a question on some
coding..will hope to receive your reply soon.

Dim MoveInfo(1 To 2, 1 To 2) As String
MoveInfo(1, 1) = "B" 'from column B in other workbook...
MoveInfo(1, 2) = "D" '...to column D in this workbook
MoveInfo(2, 1) = "C" ' from column C in other workbook...
MoveInfo(2, 2) = "E" ' ...to column E in this workbook

I have changed it into
Dim MoveInfo(1 To 11, 1 To 11) As String
MoveInfo(1, 1) = "B"
MoveInfo(1, 2) = "K"
MoveInfo(2, 1) = "H"
MoveInfo(2, 2) = "L"
MoveInfo(3, 1) = "I"
MoveInfo(3, 2) = "M"
MoveInfo(4, 1) = "J"
MoveInfo(4, 2) = "N"
MoveInfo(5, 1) = "K"
MoveInfo(5, 2) = "O"
MoveInfo(6, 1) = "L"
MoveInfo(6, 2) = "P"
MoveInfo(7, 1) = "M"
MoveInfo(7, 2) = "Q"
MoveInfo(8, 1) = "N"
MoveInfo(8, 2) = "R"
MoveInfo(9, 1) = "O"
MoveInfo(9, 2) = "S"
MoveInfo(10, 1) = "P"
MoveInfo(10, 2) = "T"
MoveInfo(11, 1) = "Q"
MoveInfo(11, 2) = "U"
*Basically i need to copy total info of 11 columns.
They are from column B, H-Q in 2nd sheet to K-U in 1st sheet.Am i right
in the fill in??

With gratitude,
Seeking help:)

JLatham Wrote:
See if this doesn't help some.
http://www.jlathamsite.com/uploads/for_SeekingHelp.zip
should be fast even on dialup, only 19KB.

It's a .zip file with 2 .xls file in it. One has the code. Both have
to be
open for it all to work. Simulates your situation.

Let me know how I did in the class - or if I was late getting a
chair...



--
Seeking help
------------------------------------------------------------------------
Seeking help's Profile: http://www.excelforum.com/member.php...o&userid=35658
View this thread: http://www.excelforum.com/showthread...hreadid=554398