The couple for help - copy a table cell to table 2-CodePudding

http://pan.baidu.com/s/1jH9vPI2

Is made of the content of the sheet1 sheet2 form, because the self-study VBA, a week can read but can't write, write also special mess, help, help me to write a thank you god!

CodePudding user response:

Began keeping records in Excel macro, manual, complete the required function end record macros, press Alt + F11 key, check just record macro corresponding VBA code,

CodePudding user response:

Well, have been slowly write, advice on how to determine the content the last line out of the do loop

CodePudding user response:

 Dim, I % a % 
I=0 
A=2 
Do 
ActiveSheet. Cells (a + I, 1). Select 
Application. CutCopyMode=False 
Selection. Copy 
Sheets (" outbound order "). Select 
ActiveSheet. Cells (a + 13 * I, 4). Select 
ActiveSheet. Paste 
Sheets (" finishing template "). Select 
I=I + 1 
Loop Until I=14

I currently is to use the I for recycling, but you need to manually modify, I hope to determine automatically the content of the last line, there are a great god can give some ideas, I'll not

CodePudding user response:

 Loop Until I & lt;=Sheets (" finishing template ".) Rows. Count