Error 91 while trying to save a workbook
as a workbook, under Public variables
"Dave Peterson" wrote:
Did you declare wbforbighit as a string or an object/workbook?
Dim WBforBigHit as string
WBforBigHit = ActiveWorkbook.Name
or
dim WBforBigHit as workbook
set WBforBigHit = ActiveWorkbook
Adam_needs_help wrote:
The last line of the code here causes an error. Once I set the variable to
the name of the workbook I save that workbook (I do it later on). My
explanation was poor, sorry.
WBforBigHit = ActiveWorkbook.Name
"Dave Peterson" wrote:
What line causes the error? I don't see any saving going on.
I'd try:
workbooks("make_the_masterfile.xls").worksheets("O verallbighitters").copy
with activesheet 'the newly copied sheet
'.parent of the new worksheet is the new workbook
.parent.saveas filename:="C:\test.xls"
end with
Adam_needs_help wrote:
Here is my code, any idea why I ma getting error 91? I use the same basic
code elsewhere and it works. I think there may be an error in which workbook
is active. I am trying to save the workbook I just copied a sheet into.
Windows("Make_The_MasterFile.xls").Activate 'not trying to save this workbook
Sheets("OverallBigHitters").Activate
ActiveSheet.Select
ActiveSheet.Copy 'trying to save this one
WBforBigHit = ActiveWorkbook.Name
--
Dave Peterson
--
Dave Peterson
|