Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Copy?import whole sheet from another workbook
Hi,
If I automate the opening of another workbook what is the way to copy the whole worksheet and paste it to the current workbook? Or should this be done by importing. I realise that the worksheet will be overwriten. I am working on a VBA code to ask a question if the current workbook needs updating and if yes, then another workbooks worksheet is added. This will then allow me to copy and paste ranges from one sheet to another and update records automatically. I figure this is the only way to do it as to have both workbooks open and selectively cut and paste from one book to the other is beyond me. -- Regards Bill |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Copy?import whole sheet from another workbook
The follwowing should work:
Sub Macro1() Dim wsCurrent as Worksheet Dim wbCopy as Workbook Dim wbCurrent as Workbook Dim x Dim sYourFilename as String x = MsgBox("Do You Wish to Update", vbYesNo, "Update?") If x = vbYes Then Set wbCurrent = ActiveWorkbook Set wsCurrent = ActivveSheet sYourFilename = "xxxxxxxx.xls" 'Replace with your filepath and name Workbooks.Open sYourFilename Sheets("Sheet1").Activate 'Replace with your sheet name Cells.Select Selection.Copy wbCurrent.Activate wsCurrent.Activate Applicaiton.DisplayAlerts = False 'If you want to copy over any existing data with no warning ActiveSheet.Paste wbCopy.Close Application.DisplayAlerts = True Set wbCurrent = Nothing Set wbCopy = Nothing Set wsCurrent = Nothing End If End Sub "justagrunt" wrote in message ... Hi, If I automate the opening of another workbook what is the way to copy the whole worksheet and paste it to the current workbook? Or should this be done by importing. I realise that the worksheet will be overwriten. I am working on a VBA code to ask a question if the current workbook needs updating and if yes, then another workbooks worksheet is added. This will then allow me to copy and paste ranges from one sheet to another and update records automatically. I figure this is the only way to do it as to have both workbooks open and selectively cut and paste from one book to the other is beyond me. -- Regards Bill |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Import sheet or only data of another workbook | Excel Programming | |||
Import/Copy some data from one workbook to a similar workbook | Excel Programming | |||
How do I import data from 1 workbook excel sheet into another? | New Users to Excel | |||
Import Sheet from Closed Workbook | Excel Programming | |||
Database Filtering and Import or Copy to Remote Client Workbook | Excel Programming |