Hi,I give u the following code you can run and get what u expect. For the next 
time u have to change the j value(i.e.,columnvalue,A=1 B=2 etc) to 6 to 7, and 
next time this should be 8 to 9.Or if u don't mind in over printing the data,u 
can put j value = 4 to 33.It is upto u.Here the row is fixed to 15 i.e., i value
Sub FillSheet1To2()Dim i, j As Integer For i = 1 To 15    For j = 4 To 5        
        Sheets("sheet2").Cells(i, j).Value = Sheets("sheet1").Cells(i, j).Value 
             Next j  Next i   End Sub
-r.Karunanithi.

      From: Kat <katherine...@gmail.com>
 To: MS EXCEL AND VBA MACROS <excel-macros@googlegroups.com> 
 Sent: Thursday, February 4, 2016 1:07 PM
 Subject: $$Excel-Macros$$ copy new column from sheet 1 and paste to sheet 2
   
Hi all,

I have a workbook in which the row is fixed (eg. from column A to C) and the 
user will keep adding new column (eg. from adding data in Column D to E first 
time, second time adding data in column F to H) in Sheet 1. Everytime when new 
column is added in Sheet1, I want it to be automatically being copied and 
pasted into Sheet2 as well starting from Column F. For instance, When user add 
data in Column D to E first time, then the data being added in Column D to E in 
Sheet1 will be automatically being copied and pasted in Column F to G in 
Sheet2. Can anyone help?

Thanks in advanced.
-- 
Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna be? It’s 
=TIME(2,DO:IT,N:OW) ! Join official Facebook page of this forum @ 
https://www.facebook.com/discussexcel
 
FORUM RULES
 
1) Use concise, accurate thread titles. Poor thread titles, like Please Help, 
Urgent, Need Help, Formula Problem, Code Problem, and Need Advice will not get 
quick attention or may not be answered.
2) Don't post a question in the thread of another member.
3) Don't post questions regarding breaking or bypassing any security measure.
4) Acknowledge the responses you receive, good or bad.
5) Jobs posting is not allowed.
6) Sharing copyrighted material and their links is not allowed.
 
NOTE : Don't ever post confidential data in a workbook. Forum owners and 
members are not responsible for any loss.
--- 
You received this message because you are subscribed to the Google Groups "MS 
EXCEL AND VBA MACROS" group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to excel-macros+unsubscr...@googlegroups.com.
To post to this group, send email to excel-macros@googlegroups.com.
Visit this group at https://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/d/optout.


  

-- 
Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna be? It’s 
=TIME(2,DO:IT,N:OW) ! Join official Facebook page of this forum @ 
https://www.facebook.com/discussexcel

FORUM RULES

1) Use concise, accurate thread titles. Poor thread titles, like Please Help, 
Urgent, Need Help, Formula Problem, Code Problem, and Need Advice will not get 
quick attention or may not be answered.
2) Don't post a question in the thread of another member.
3) Don't post questions regarding breaking or bypassing any security measure.
4) Acknowledge the responses you receive, good or bad.
5) Jobs posting is not allowed.
6) Sharing copyrighted material and their links is not allowed.

NOTE  : Don't ever post confidential data in a workbook. Forum owners and 
members are not responsible for any loss.
--- 
You received this message because you are subscribed to the Google Groups "MS 
EXCEL AND VBA MACROS" group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to excel-macros+unsubscr...@googlegroups.com.
To post to this group, send email to excel-macros@googlegroups.com.
Visit this group at https://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/d/optout.

Attachment: FillSheet1To2.xlsm
Description: application/vnd.ms-excel.sheet.macroenabled.12

Reply via email to