Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
LInking workbooks
Hi,
I have a database set up which is very similar to another database which is used. Some of the questions are the same in both databases. Is there any way of transferring the data so to save time on typing? Also, The databases are shared by many and are updated frequently. Can i program excel to start on the next available free row when transferring data across? Hope you can help, Regards. |
#2
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
LInking workbooks
yes
-- Gary''s Student - gsnu200757 |
#3
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
LInking workbooks
How would i go about doing this?
"Gary''s Student" wrote: yes -- Gary''s Student - gsnu200757 |
#4
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
LInking workbooks
This is a simple example that you can adapt:
1. assume there are two open workbooks: sourse.xls destinaton.xls 2. assume the sheet name is: s1 on both workbooks 3. assume column A is always filled in The user (working in sourse.xls) completes entries, selects the rows to be copied, and runs this macro: Sub cary_across() Workbooks("sourse.xls").Activate Sheets("s1").Activate Set r1 = Selection Workbooks("destinaton.xls").Activate Sheets("s1").Activate n = Cells(Rows.Count, "A").End(xlUp).Row + 1 Set r2 = Cells(n, "A") r1.Copy r2 End Sub -- Gary''s Student - gsnu200757 "DaveAsh" wrote: How would i go about doing this? "Gary''s Student" wrote: yes -- Gary''s Student - gsnu200757 |
#5
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
LInking workbooks
Thanks for that. I'm a novice to macros though. How would i set this up?
"Gary''s Student" wrote: This is a simple example that you can adapt: 1. assume there are two open workbooks: sourse.xls destinaton.xls 2. assume the sheet name is: s1 on both workbooks 3. assume column A is always filled in The user (working in sourse.xls) completes entries, selects the rows to be copied, and runs this macro: Sub cary_across() Workbooks("sourse.xls").Activate Sheets("s1").Activate Set r1 = Selection Workbooks("destinaton.xls").Activate Sheets("s1").Activate n = Cells(Rows.Count, "A").End(xlUp).Row + 1 Set r2 = Cells(n, "A") r1.Copy r2 End Sub -- Gary''s Student - gsnu200757 "DaveAsh" wrote: How would i go about doing this? "Gary''s Student" wrote: yes -- Gary''s Student - gsnu200757 |
#6
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
LInking workbooks
Macros are very easy to install and use: 1. ALT-F11 brings up the VBE window 2. ALT-I ALT-M opens a fresh module 3. paste the stuff in and close the VBE window If you save the workbook, the macro will be saved with it. To use the macro from the normal Excel window: 1. ALT-F8 2. Select the macro 3. Touch Run To remove the macro: 1. bring up the VBE window as above 2. clear the code out 3. close the VBE window To learn more about macros in general, see: http://www.mvps.org/dmcritchie/excel/getstarted.htm -- Gary''s Student - gsnu200757 "DaveAsh" wrote: Thanks for that. I'm a novice to macros though. How would i set this up? "Gary''s Student" wrote: This is a simple example that you can adapt: 1. assume there are two open workbooks: sourse.xls destinaton.xls 2. assume the sheet name is: s1 on both workbooks 3. assume column A is always filled in The user (working in sourse.xls) completes entries, selects the rows to be copied, and runs this macro: Sub cary_across() Workbooks("sourse.xls").Activate Sheets("s1").Activate Set r1 = Selection Workbooks("destinaton.xls").Activate Sheets("s1").Activate n = Cells(Rows.Count, "A").End(xlUp).Row + 1 Set r2 = Cells(n, "A") r1.Copy r2 End Sub -- Gary''s Student - gsnu200757 "DaveAsh" wrote: How would i go about doing this? "Gary''s Student" wrote: yes -- Gary''s Student - gsnu200757 |
#7
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
LInking workbooks
alt and F11 does not work, is there an add in i need?
"Gary''s Student" wrote: Macros are very easy to install and use: 1. ALT-F11 brings up the VBE window 2. ALT-I ALT-M opens a fresh module 3. paste the stuff in and close the VBE window If you save the workbook, the macro will be saved with it. To use the macro from the normal Excel window: 1. ALT-F8 2. Select the macro 3. Touch Run To remove the macro: 1. bring up the VBE window as above 2. clear the code out 3. close the VBE window To learn more about macros in general, see: http://www.mvps.org/dmcritchie/excel/getstarted.htm -- Gary''s Student - gsnu200757 "DaveAsh" wrote: Thanks for that. I'm a novice to macros though. How would i set this up? "Gary''s Student" wrote: This is a simple example that you can adapt: 1. assume there are two open workbooks: sourse.xls destinaton.xls 2. assume the sheet name is: s1 on both workbooks 3. assume column A is always filled in The user (working in sourse.xls) completes entries, selects the rows to be copied, and runs this macro: Sub cary_across() Workbooks("sourse.xls").Activate Sheets("s1").Activate Set r1 = Selection Workbooks("destinaton.xls").Activate Sheets("s1").Activate n = Cells(Rows.Count, "A").End(xlUp).Row + 1 Set r2 = Cells(n, "A") r1.Copy r2 End Sub -- Gary''s Student - gsnu200757 "DaveAsh" wrote: How would i go about doing this? "Gary''s Student" wrote: yes -- Gary''s Student - gsnu200757 |
#8
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
LInking workbooks
Are you quite certain? In this context, I mean to use the ALT key like a
SHIFT key. So first press the ALT key and while it is still pressed, touch the F11 key -- Gary''s Student - gsnu200757 "DaveAsh" wrote: alt and F11 does not work, is there an add in i need? "Gary''s Student" wrote: Macros are very easy to install and use: 1. ALT-F11 brings up the VBE window 2. ALT-I ALT-M opens a fresh module 3. paste the stuff in and close the VBE window If you save the workbook, the macro will be saved with it. To use the macro from the normal Excel window: 1. ALT-F8 2. Select the macro 3. Touch Run To remove the macro: 1. bring up the VBE window as above 2. clear the code out 3. close the VBE window To learn more about macros in general, see: http://www.mvps.org/dmcritchie/excel/getstarted.htm -- Gary''s Student - gsnu200757 "DaveAsh" wrote: Thanks for that. I'm a novice to macros though. How would i set this up? "Gary''s Student" wrote: This is a simple example that you can adapt: 1. assume there are two open workbooks: sourse.xls destinaton.xls 2. assume the sheet name is: s1 on both workbooks 3. assume column A is always filled in The user (working in sourse.xls) completes entries, selects the rows to be copied, and runs this macro: Sub cary_across() Workbooks("sourse.xls").Activate Sheets("s1").Activate Set r1 = Selection Workbooks("destinaton.xls").Activate Sheets("s1").Activate n = Cells(Rows.Count, "A").End(xlUp).Row + 1 Set r2 = Cells(n, "A") r1.Copy r2 End Sub -- Gary''s Student - gsnu200757 "DaveAsh" wrote: How would i go about doing this? "Gary''s Student" wrote: yes -- Gary''s Student - gsnu200757 |
#9
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
LInking workbooks
Yes, this short cut definitely doesn't work.
"Gary''s Student" wrote: Are you quite certain? In this context, I mean to use the ALT key like a SHIFT key. So first press the ALT key and while it is still pressed, touch the F11 key -- Gary''s Student - gsnu200757 "DaveAsh" wrote: alt and F11 does not work, is there an add in i need? "Gary''s Student" wrote: Macros are very easy to install and use: 1. ALT-F11 brings up the VBE window 2. ALT-I ALT-M opens a fresh module 3. paste the stuff in and close the VBE window If you save the workbook, the macro will be saved with it. To use the macro from the normal Excel window: 1. ALT-F8 2. Select the macro 3. Touch Run To remove the macro: 1. bring up the VBE window as above 2. clear the code out 3. close the VBE window To learn more about macros in general, see: http://www.mvps.org/dmcritchie/excel/getstarted.htm -- Gary''s Student - gsnu200757 "DaveAsh" wrote: Thanks for that. I'm a novice to macros though. How would i set this up? "Gary''s Student" wrote: This is a simple example that you can adapt: 1. assume there are two open workbooks: sourse.xls destinaton.xls 2. assume the sheet name is: s1 on both workbooks 3. assume column A is always filled in The user (working in sourse.xls) completes entries, selects the rows to be copied, and runs this macro: Sub cary_across() Workbooks("sourse.xls").Activate Sheets("s1").Activate Set r1 = Selection Workbooks("destinaton.xls").Activate Sheets("s1").Activate n = Cells(Rows.Count, "A").End(xlUp).Row + 1 Set r2 = Cells(n, "A") r1.Copy r2 End Sub -- Gary''s Student - gsnu200757 "DaveAsh" wrote: How would i go about doing this? "Gary''s Student" wrote: yes -- Gary''s Student - gsnu200757 |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
linking to workbooks together | Excel Worksheet Functions | |||
linking workbooks | Excel Worksheet Functions | |||
Linking workbooks | Excel Discussion (Misc queries) | |||
Help linking workbooks | Excel Discussion (Misc queries) | |||
Linking Workbooks | Excel Worksheet Functions |