Looking at code examples, it would seem this is simple, but I can't figure it out. From an Access 2000 form command button, I want to copy all worksheets in an existing workbook to an existing workbook and save the results in a new workbook. I keep getting the message "subscript out of range." Any help is greatly appreciated.
Private Sub Copier_Click()
' Copy all sheets in FileA before sheets in FileMaster and save as NewFile
Dim mysheet As Variant
Dim sheet As Variant
Dim FileName As String
Dim X As Integer
Set xlApp = CreateObject("E xcel.Applicatio n")
Set mysheet = xlApp.Workbooks .Open("C:\FileA .xls").Sheets(1 )
Set sheet = xlApp.ActiveWor kbook.Sheets(1)
For X = 1 To xlApp.ActiveWor kbook.Sheets.Co unt
'Loop through each of the sheets in the workbook
xlApp.ActiveWor kbook.Sheets(X) .Copy _
Before:=xlApp.W orkbooks("C:\Fi leMaster.xls"). Sheets(1)
Next
FileName = "C:\NewFile.xls "
mysheet.Applica tion.ActiveWork book.SaveAs FileName
End Sub
3 3814 FishVal 2,653
Recognized Expert Specialist
Hi, there.
I guess your have two different instances of Excel.Applicati on so you cannot refer to Workbooks collection via the same Excel.Applicati on object.
Regards,
Fish
Hi, there.
I guess your have two different instances of Excel.Applicati on so you cannot refer to Workbooks collection via the same Excel.Applicati on object.
Regards,
Fish
I've checked task manager, and only one instance is running. I'm new to Excel automation, so figure I've got something wrong in syntax. Code works fine to create new workbook from just FileA, but problem occurs when trying to combine with another existing workbook (FileMaster). Any thoughts?
FishVal 2,653
Recognized Expert Specialist
In order to copy to Workbooks("C:\F ileMaster.xls") you need to open it just as "C:FileA.xl s".
Additionally I'd like to say that your code is somewhat unstraight and hazy. Not clear why do you reference worksheets by variables sheet and mysheet, and, at the same time you don't have references to source and destination workbooks, which would be more useful of course. And so on, and so on.
Sign in to post your reply or Sign up for a free account.
Similar topics |
by: Chris |
last post by:
Hi,
I am using:
DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel9,
lcQueryName, strFilePathNamE, True
....to export my query data to an existing excel workbook. Then what i
need to do is sort the data and then copy and paste it to another
sheet in the workbook. I have managed to do similar things bofore but
|
by: sunilkeswani |
last post by:
I need help with exporting data from 2 access tables, into 2 existing
spreadsheets in a single Excel file.
Currently, I am using this code:
DoCmd.TransferSpreadsheet acExport, 8, "Table1", "D:\Test.xls", True
|
by: Peter |
last post by:
I am having a problem reading an Excel file that is XML based. The directory
I am reading contains Excel files that can be of two types. Either generic Microsoft
based or XML based. I am reading the Microsoft based files with an OleDbDataAdapter.
Then filling the contents of the first worksheet into a dataset.
However when I try to add the XML based file to my dataset using an XmlTextReader
I can never seem to get it to save to a...
|
by: Sam |
last post by:
Hi All,
I posted this message few days ago. No one has answered so far.
I just would like to know if it is possible to do or not.
Even if you can not tell me how to do this, maybe you know which library I
need to use in order to access excel information from a VB.NET code.
For example, I would be interested by knowing how to access a simple cell
value in an excel file from a vb.net code.
Here is the mail I sent last week, but as I...
|
by: RickH |
last post by:
..Cells(1,y).GetType ownly shows instead of .Value, .Copy, etc.
The code below is derived from samples, it should work, but I've messed up
somewhere...
Imports System.Windows.Forms
Imports Office = Microsoft.Office.Core
Imports Excel = Microsoft.Office.Interop.Excel
Imports MSForms = Microsoft.Vbe.Interop.Forms
' Office integration attribute. Identifies the startup class for the
| |
by: gssstuff |
last post by:
Hi
I have a need to send data from Access to an existing Excel template
that I am using for reporting purposes. The nature of the data in the
Access data table does not lend itself to a simple "CopyFromRecordset"
(at least I don't think so)
I got some info from the microsoft:
http://support.microsoft.com/default.aspx?scid=KB;EN-US;Q247412&ID=KB;EN-US;Q247412&LN=EN
|
by: hmiller |
last post by:
Hey there folks:
I have been trying to get this work for about a week now. I'm new to
VBA...
I am trying to transfer a populated table in Access to an existing, but
blank, Excel worksheet. I have seen methods for transfering cell by
cell, and understand how to get that to work. However, my recordset has
3600 cells of data. Cell by cell is just not an option. I am looking
for a way to specify the starting cell (most upper left cell) in...
|
by: John Bailo |
last post by:
I want to write an Excel file (.xls format) from some database data.
I don't want to use Excel.exe because of all the automation and security
issues.
Does Microsoft document the .xls file format anywhere?
Is there any c# class that will let me do this?
|
by: NeverLift |
last post by:
This is probably answered elsewhere, but I've searched the Web and VBA for Excel manual, find no answers.
I have a VBA-coded macro in an Excel workbook that is to open another existing workbook -- a .xls file, not .csv -- copy data from it, paste that into the original workbook where the macro resides, then close the source workbook.
If I use the debugger to step through the macro -- putting a breakpoint at its first executable line, run...
|
by: Oralloy |
last post by:
Hello folks,
I am unable to find appropriate documentation on the type promotion of bit-fields when using the generalised comparison operator "<=>".
The problem is that using the GNU compilers, it seems that the internal comparison operator "<=>" tries to promote arguments from unsigned to signed.
This is as boiled down as I can make it.
Here is my compilation command:
g++-12 -std=c++20 -Wnarrowing bit_field.cpp
Here is the code in...
|
by: jinu1996 |
last post by:
In today's digital age, having a compelling online presence is paramount for businesses aiming to thrive in a competitive landscape. At the heart of this digital strategy lies an intricately woven tapestry of website design and digital marketing. It's not merely about having a website; it's about crafting an immersive digital experience that captivates audiences and drives business growth.
The Art of Business Website Design
Your website is...
| |
by: Hystou |
last post by:
Overview:
Windows 11 and 10 have less user interface control over operating system update behaviour than previous versions of Windows. In Windows 11 and 10, there is no way to turn off the Windows Update option using the Control Panel or Settings app; it automatically checks for updates and installs any it finds, whether you like it or not. For most users, this new feature is actually very convenient. If you want to control the update process,...
|
by: tracyyun |
last post by:
Dear forum friends,
With the development of smart home technology, a variety of wireless communication protocols have appeared on the market, such as Zigbee, Z-Wave, Wi-Fi, Bluetooth, etc. Each protocol has its own unique characteristics and advantages, but as a user who is planning to build a smart home system, I am a bit confused by the choice of these technologies. I'm particularly interested in Zigbee because I've heard it does some...
|
by: agi2029 |
last post by:
Let's talk about the concept of autonomous AI software engineers and no-code agents. These AIs are designed to manage the entire lifecycle of a software development project—planning, coding, testing, and deployment—without human intervention. Imagine an AI that can take a project description, break it down, write the code, debug it, and then launch it, all on its own....
Now, this would greatly impact the work of software developers. The idea...
|
by: isladogs |
last post by:
The next Access Europe User Group meeting will be on Wednesday 1 May 2024 starting at 18:00 UK time (6PM UTC+1) and finishing by 19:30 (7.30PM).
In this session, we are pleased to welcome a new presenter, Adolph Dupré who will be discussing some powerful techniques for using class modules.
He will explain when you may want to use classes instead of User Defined Types (UDT). For example, to manage the data in unbound forms.
Adolph will...
|
by: TSSRALBI |
last post by:
Hello
I'm a network technician in training and I need your help.
I am currently learning how to create and manage the different types of VPNs and I have a question about LAN-to-LAN VPNs.
The last exercise I practiced was to create a LAN-to-LAN VPN between two Pfsense firewalls, by using IPSEC protocols.
I succeeded, with both firewalls in the same network. But I'm wondering if it's possible to do the same thing, with 2 Pfsense firewalls...
|
by: adsilva |
last post by:
A Windows Forms form does not have the event Unload, like VB6. What one acts like?
| |
by: muto222 |
last post by:
How can i add a mobile payment intergratation into php mysql website.
| |