ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Excel copy after question (https://www.excelbanter.com/excel-programming/384046-excel-copy-after-question.html)

ll

Excel copy after question
 
Hi,
I'm very new to the Excel copy after method, and I was wondering how I
would go about integrating the following code into my module. Would I
need to specify the name of the new workbook at some point within the
code? I have tried running the following code by itself in a module,
but I get the "object required" error. Any ideas? Thanks - Louis

==
bk.Worksheets(Array("Hourly Timesheets", "dates", "Time
Balances")).Copy after:=bk.Worksheets(bk.Worksheets.Count)


Tom Ogilvy

Excel copy after question
 
I ran this several times
Sub Macro1()
Dim bk As Workbook
Set bk = ActiveWorkbook
bk.Worksheets(Array("Hourly Timesheets", _
"dates", "Time Balances")).Copy _
after:=bk.Worksheets(bk.Worksheets.Count)
End Sub

after I created worksheets with the names you show (or at least what the
looked like in the email)


many times, when naming a sheet, you can get an extra space somewhere in the
name, especially at the end. Make sure your sheet names are correct and
match your code.

--
Regards,
Tom Ogilvy



"ll" wrote:

Hi,
I'm very new to the Excel copy after method, and I was wondering how I
would go about integrating the following code into my module. Would I
need to specify the name of the new workbook at some point within the
code? I have tried running the following code by itself in a module,
but I get the "object required" error. Any ideas? Thanks - Louis

==
bk.Worksheets(Array("Hourly Timesheets", "dates", "Time
Balances")).Copy after:=bk.Worksheets(bk.Worksheets.Count)



Dave Peterson

Excel copy after question
 
After you create the new workbook, you can set an object variable to that
workbook.

Dim bk as workbook
'whatevercode you used to create that workbook
'and with that workbook the active workbook.
set bk = activeworkbook
'then lots more code
'and finally, you copy code:
bk.Worksheets(Array("Hourly Timesheets", "dates", "Time Balances")).Copy _
after:=bk.Worksheets(bk.Worksheets.Count)



ll wrote:

Hi,
I'm very new to the Excel copy after method, and I was wondering how I
would go about integrating the following code into my module. Would I
need to specify the name of the new workbook at some point within the
code? I have tried running the following code by itself in a module,
but I get the "object required" error. Any ideas? Thanks - Louis

==
bk.Worksheets(Array("Hourly Timesheets", "dates", "Time
Balances")).Copy after:=bk.Worksheets(bk.Worksheets.Count)


--

Dave Peterson

Jay

Excel copy after question
 
Check the following items:

1. If this line does not yet exist in your code, add it before the statment
you posted:

Set bk = ActiveWorkbook 'or Set bk=Workbook(yourworkbookname)

2. Check for extra spaces in your sheet names. I noticed a trailing space
in "Time Balances "... if it's absent in the actual sheet name, you would
receive the 'Object required' response from Excel.

--
Jay


"ll" wrote:

Hi,
I'm very new to the Excel copy after method, and I was wondering how I
would go about integrating the following code into my module. Would I
need to specify the name of the new workbook at some point within the
code? I have tried running the following code by itself in a module,
but I get the "object required" error. Any ideas? Thanks - Louis

==
bk.Worksheets(Array("Hourly Timesheets", "dates", "Time
Balances")).Copy after:=bk.Worksheets(bk.Worksheets.Count)




All times are GMT +1. The time now is 04:52 PM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com