Home |
Search |
Today's Posts |
#1
|
|||
|
|||
transfering information from one cell to another
I'm using Excel 2003
I have a workbook open and am using 2 worksheets. On sheet 1 I get information from the internet and then transfer three cells of it to sheet 2. Sheet 1 updates every time I open the workbook. How do I get sheet 1 to put the information into a different cell in sheet 2 each time it updates. I would like to get them to follow the dates down a column. Garry |
#2
|
|||
|
|||
You'd need a VBA (Visual Basic for Applications) module for that. There is no built-in function. -- nbrcrunch |
#3
|
|||
|
|||
Garr
Provide some detail about the layout of your data in each sheet. HTH Otto "garr" wrote in message news:iBfRd.417671$6l.364472@pd7tw2no... I'm using Excel 2003 I have a workbook open and am using 2 worksheets. On sheet 1 I get information from the internet and then transfer three cells of it to sheet 2. Sheet 1 updates every time I open the workbook. How do I get sheet 1 to put the information into a different cell in sheet 2 each time it updates. I would like to get them to follow the dates down a column. Garry |
#4
|
|||
|
|||
This is a little more info on what I'm tring to do
I have down loaded stock info into sheet 1 and would like to transfer it to sheet 2. Each piece of info in the cells in sheet one will be transferred to cells in sheet two into a different column with a date of that day at the beginning of each row on sheet two. Every day I will update sheet one and would like it to update the info on sheet two in the next row down and not update the previous row (leave the previous row with the last days info) Garr "garr" wrote in message news:iBfRd.417671$6l.364472@pd7tw2no... I'm using Excel 2003 I have a workbook open and am using 2 worksheets. On sheet 1 I get information from the internet and then transfer three cells of it to sheet 2. Sheet 1 updates every time I open the workbook. How do I get sheet 1 to put the information into a different cell in sheet 2 each time it updates. I would like to get them to follow the dates down a column. Garry |
#5
|
|||
|
|||
I think I understand what you want except for the phrase "in a different
column". Explain that please. I take it that you download stock data into one or more rows of sheet one. And you want all the data in sheet one transferred to sheet 2 but one column to the right leaving Column A of each row for today's date. Is that correct? HTH Otto "garr" wrote in message news:FhCRd.431821$6l.423743@pd7tw2no... This is a little more info on what I'm tring to do I have down loaded stock info into sheet 1 and would like to transfer it to sheet 2. Each piece of info in the cells in sheet one will be transferred to cells in sheet two into a different column with a date of that day at the beginning of each row on sheet two. Every day I will update sheet one and would like it to update the info on sheet two in the next row down and not update the previous row (leave the previous row with the last days info) Garr "garr" wrote in message news:iBfRd.417671$6l.364472@pd7tw2no... I'm using Excel 2003 I have a workbook open and am using 2 worksheets. On sheet 1 I get information from the internet and then transfer three cells of it to sheet 2. Sheet 1 updates every time I open the workbook. How do I get sheet 1 to put the information into a different cell in sheet 2 each time it updates. I would like to get them to follow the dates down a column. Garry |
#6
|
|||
|
|||
This macro does what you want, if I read you correctly.
Post back if this isn't what you want. Expand this message to full screen to avoid line wrap. HTH Otto Sub MoveData() Dim RngA1 As Range Dim Dest As Range Dim i As Range Set RngA1 = Range("A1", Range("A" & Rows.Count).End(xlUp)) With Sheets("Two") If .[A1] = "" Then Set Dest = .[A1] Else Set Dest = .Range("A" & Rows.Count).End(xlUp).Offset(1) End If End With For Each i In RngA1 Range(i, Cells(i.Row, "IV").End(xlToLeft)).Copy Dest.Offset(, 1) Dest = Date Set Dest = Dest.Offset(1) Next i End Sub "garr" wrote in message news:FhCRd.431821$6l.423743@pd7tw2no... This is a little more info on what I'm tring to do I have down loaded stock info into sheet 1 and would like to transfer it to sheet 2. Each piece of info in the cells in sheet one will be transferred to cells in sheet two into a different column with a date of that day at the beginning of each row on sheet two. Every day I will update sheet one and would like it to update the info on sheet two in the next row down and not update the previous row (leave the previous row with the last days info) Garr "garr" wrote in message news:iBfRd.417671$6l.364472@pd7tw2no... I'm using Excel 2003 I have a workbook open and am using 2 worksheets. On sheet 1 I get information from the internet and then transfer three cells of it to sheet 2. Sheet 1 updates every time I open the workbook. How do I get sheet 1 to put the information into a different cell in sheet 2 each time it updates. I would like to get them to follow the dates down a column. Garry |
#7
|
|||
|
|||
Hi Otto I've tried to run your macro and I get
Run Time Error 9 Sub Script Out of Range and in VB the line reads With Sheets ("two") is high lited what next Thanks Garry "Otto Moehrbach" wrote in message ... This macro does what you want, if I read you correctly. Post back if this isn't what you want. Expand this message to full screen to avoid line wrap. HTH Otto Sub MoveData() Dim RngA1 As Range Dim Dest As Range Dim i As Range Set RngA1 = Range("A1", Range("A" & Rows.Count).End(xlUp)) With Sheets("Two") If .[A1] = "" Then Set Dest = .[A1] Else Set Dest = .Range("A" & Rows.Count).End(xlUp).Offset(1) End If End With For Each i In RngA1 Range(i, Cells(i.Row, "IV").End(xlToLeft)).Copy Dest.Offset(, 1) Dest = Date Set Dest = Dest.Offset(1) Next i End Sub "garr" wrote in message news:FhCRd.431821$6l.423743@pd7tw2no... This is a little more info on what I'm tring to do I have down loaded stock info into sheet 1 and would like to transfer it to sheet 2. Each piece of info in the cells in sheet one will be transferred to cells in sheet two into a different column with a date of that day at the beginning of each row on sheet two. Every day I will update sheet one and would like it to update the info on sheet two in the next row down and not update the previous row (leave the previous row with the last days info) Garr "garr" wrote in message news:iBfRd.417671$6l.364472@pd7tw2no... I'm using Excel 2003 I have a workbook open and am using 2 worksheets. On sheet 1 I get information from the internet and then transfer three cells of it to sheet 2. Sheet 1 updates every time I open the workbook. How do I get sheet 1 to put the information into a different cell in sheet 2 each time it updates. I would like to get them to follow the dates down a column. Garry |
#8
|
|||
|
|||
Do you have a sheet named "two"(no quotes).
If not, change Otto's "two" to the name of your sheet. e.g. "Sheet2" Gord Dibben Excel MVP On Sun, 20 Feb 2005 16:15:04 GMT, "garr" wrote: Hi Otto I've tried to run your macro and I get Run Time Error 9 Sub Script Out of Range and in VB the line reads With Sheets ("two") is high lited what next Thanks Garry "Otto Moehrbach" wrote in message ... This macro does what you want, if I read you correctly. Post back if this isn't what you want. Expand this message to full screen to avoid line wrap. HTH Otto Sub MoveData() Dim RngA1 As Range Dim Dest As Range Dim i As Range Set RngA1 = Range("A1", Range("A" & Rows.Count).End(xlUp)) With Sheets("Two") If .[A1] = "" Then Set Dest = .[A1] Else Set Dest = .Range("A" & Rows.Count).End(xlUp).Offset(1) End If End With For Each i In RngA1 Range(i, Cells(i.Row, "IV").End(xlToLeft)).Copy Dest.Offset(, 1) Dest = Date Set Dest = Dest.Offset(1) Next i End Sub "garr" wrote in message news:FhCRd.431821$6l.423743@pd7tw2no... This is a little more info on what I'm tring to do I have down loaded stock info into sheet 1 and would like to transfer it to sheet 2. Each piece of info in the cells in sheet one will be transferred to cells in sheet two into a different column with a date of that day at the beginning of each row on sheet two. Every day I will update sheet one and would like it to update the info on sheet two in the next row down and not update the previous row (leave the previous row with the last days info) Garr "garr" wrote in message news:iBfRd.417671$6l.364472@pd7tw2no... I'm using Excel 2003 I have a workbook open and am using 2 worksheets. On sheet 1 I get information from the internet and then transfer three cells of it to sheet 2. Sheet 1 updates every time I open the workbook. How do I get sheet 1 to put the information into a different cell in sheet 2 each time it updates. I would like to get them to follow the dates down a column. Garry |
#9
|
|||
|
|||
Well changing the two, to the name of the second sheet did work, but this
macro enters the date starting in A1 then in A2 and B2 and so on in sheet 2. "garr" wrote in message news:iBfRd.417671$6l.364472@pd7tw2no... I'm using Excel 2003 I have a workbook open and am using 2 worksheets. On sheet 1 I get information from the internet and then transfer three cells of it to sheet 2. Sheet 1 updates every time I open the workbook. How do I get sheet 1 to put the information into a different cell in sheet 2 each time it updates. I would like to get them to follow the dates down a column. Garry |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
store some of the information from one cell into another | Excel Discussion (Misc queries) | |||
List ? - How do I make information in one cell determine list to u | Excel Worksheet Functions | |||
Can you conditional format based on information in cell comments? | Excel Worksheet Functions | |||
how can i automatically copy the information in one cell on a she. | Excel Worksheet Functions | |||
GET.CELL | Excel Worksheet Functions |