Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Automate infil of data into a cell on subsequent worksheets.
I have sheet One.
Sheet one, amongst other info, has a list of reference numbers in Column A. I want to generate a load of other individual sheets in the workbook that subsequently reference the values in column in Sheet 1. EG. On Sheet 1 A1 = Ref No1 A2 = Ref No2 A3 = Ref No3 A4 = Ref No4 --------- All other sheets are templates with identical layout How can I quickly populate all the values in Cell A1, on sheets 2 onwards such that: Sheet 2 A1 = Value in Sheet1, CellA1 Sheet 3 A1 = Value in Sheet1, CellA2 Sheet 4 A1 = Value in Sheet1, CellA3 Sheet 5 A1 = Value in Sheet1, CellA4 Sheet 6 A1 = Value in Sheet1, CellA5 Sheet 7 A1 = Value in Sheet1, CellA6 SS. |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Automate infil of data into a cell on subsequent worksheets.
assuming you have N values and N+1 sheets, with the list of values on sheet
1 for each sh in sheets if sh.Index < 1 then sh.Range("A1").Value = Sheet(1).Cells(sh.Index-1,1).Value end if Next -- Regards, Tom Ogilvy "simon" wrote in message ... I have sheet One. Sheet one, amongst other info, has a list of reference numbers in Column A. I want to generate a load of other individual sheets in the workbook that subsequently reference the values in column in Sheet 1. EG. On Sheet 1 A1 = Ref No1 A2 = Ref No2 A3 = Ref No3 A4 = Ref No4 --------- All other sheets are templates with identical layout How can I quickly populate all the values in Cell A1, on sheets 2 onwards such that: Sheet 2 A1 = Value in Sheet1, CellA1 Sheet 3 A1 = Value in Sheet1, CellA2 Sheet 4 A1 = Value in Sheet1, CellA3 Sheet 5 A1 = Value in Sheet1, CellA4 Sheet 6 A1 = Value in Sheet1, CellA5 Sheet 7 A1 = Value in Sheet1, CellA6 SS. |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Automate infil of data into a cell on subsequent worksheets.
I'm not sure how to apply this.
Can you clarify.. "Tom Ogilvy" wrote in message ... assuming you have N values and N+1 sheets, with the list of values on sheet 1 for each sh in sheets if sh.Index < 1 then sh.Range("A1").Value = Sheet(1).Cells(sh.Index-1,1).Value end if Next -- Regards, Tom Ogilvy "simon" wrote in message ... I have sheet One. Sheet one, amongst other info, has a list of reference numbers in Column A. I want to generate a load of other individual sheets in the workbook that subsequently reference the values in column in Sheet 1. EG. On Sheet 1 A1 = Ref No1 A2 = Ref No2 A3 = Ref No3 A4 = Ref No4 --------- All other sheets are templates with identical layout How can I quickly populate all the values in Cell A1, on sheets 2 onwards such that: Sheet 2 A1 = Value in Sheet1, CellA1 Sheet 3 A1 = Value in Sheet1, CellA2 Sheet 4 A1 = Value in Sheet1, CellA3 Sheet 5 A1 = Value in Sheet1, CellA4 Sheet 6 A1 = Value in Sheet1, CellA5 Sheet 7 A1 = Value in Sheet1, CellA6 SS. |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
Automate infil of data into a cell on subsequent worksheets.
Its called a macro, since posted in programming. Here are some help
articles for getting your feet on the ground. http://www.mvps.org/dmcritchie/excel/getstarted.htm http://web.archive.org/web/200312040...01/default.asp http://msdn.microsoft.com/office/und.../odc_super.asp http://msdn.microsoft.com/office/und...d/default.aspx http://www.mvps.org/dmcritchie/excel....htm#tutorials If you can't be bothered. then copy th code below, do Alt+F11, insert =Module, paste then Alt+F11 back to excel. Tools=Macro=Macros, select AAAA and click the run button. Recall the previous conditions. Sub AAAAA() Dim sh As Worksheet For Each sh In Sheets If sh.Index < 1 Then sh.Range("A1").Value = _ Sheets(1).Cells(sh.Index - 1, 1).Value End If Next End Sub -- Regards, Tom Ogilvy "simon" wrote in message ... I'm not sure how to apply this. Can you clarify.. "Tom Ogilvy" wrote in message ... assuming you have N values and N+1 sheets, with the list of values on sheet 1 for each sh in sheets if sh.Index < 1 then sh.Range("A1").Value = Sheet(1).Cells(sh.Index-1,1).Value end if Next -- Regards, Tom Ogilvy "simon" wrote in message ... I have sheet One. Sheet one, amongst other info, has a list of reference numbers in Column A. I want to generate a load of other individual sheets in the workbook that subsequently reference the values in column in Sheet 1. EG. On Sheet 1 A1 = Ref No1 A2 = Ref No2 A3 = Ref No3 A4 = Ref No4 --------- All other sheets are templates with identical layout How can I quickly populate all the values in Cell A1, on sheets 2 onwards such that: Sheet 2 A1 = Value in Sheet1, CellA1 Sheet 3 A1 = Value in Sheet1, CellA2 Sheet 4 A1 = Value in Sheet1, CellA3 Sheet 5 A1 = Value in Sheet1, CellA4 Sheet 6 A1 = Value in Sheet1, CellA5 Sheet 7 A1 = Value in Sheet1, CellA6 SS. |
#5
Posted to microsoft.public.excel.programming
|
|||
|
|||
Automate infil of data into a cell on subsequent worksheets.
Tom.
Got it working thanks... You've saved me an awful lot of cutting and pasting!! SS |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
data links on subsequent worksheets | Excel Worksheet Functions | |||
How can I copy filtered data to subsequent worksheets? | Excel Discussion (Misc queries) | |||
How i have #10 in cell when previous#5 and subsequent #15 | New Users to Excel | |||
Tool fro entering data in subsequent cells | Excel Discussion (Misc queries) | |||
Automate a macros when data in a cell changes (e.g.when using quer | Excel Discussion (Misc queries) |