Hi,
I m running a macro from one of the excel workbook let s say workbook1, i want to add a call macro code so that i can execute the macro in other workbook2.
Guys, do u have any idea/
Thanks,
ppyxl
Hi,
I m running a macro from one of the excel workbook let s say workbook1, i want to add a call macro code so that i can execute the macro in other workbook2.
Guys, do u have any idea/
Thanks,
ppyxl
Like this:
Application.Run "Workbook1!MyMacro"
Col
Application.Run "book2.xls!test_msgbox"
--
HTH
Bob Phillips
(replace somewhere in email address with gmail if mailing direct)
"ppyxl" <[email protected]> wrote in
message news:[email protected]...
>
> Hi,
>
> I m running a macro from one of the excel workbook let s say workbook1,
> i want to add a call macro code so that i can execute the macro in other
> workbook2.
>
> Guys, do u have any idea/
>
> Thanks,
> ppyxl
>
>
> --
> ppyxl
> ------------------------------------------------------------------------
> ppyxl's Profile:
http://www.excelforum.com/member.php...o&userid=36116
> View this thread: http://www.excelforum.com/showthread...hreadid=560641
>
code is not working, pls check for me. Error msg is Objected required
Many thanks
____________________________
Sub SaveFO2()
'define date
Dim ReportDate, LsReportDate As Date
Dim ReportName, directoryName As String
LsReportDate = Workbooks("startup").Sheets("FO2").Range("B2")
ReportDate = Workbooks("startup").Sheets("FO2").Range("B3")
'save from one file to another
Workbooks.Open fileName:=("K:\Reporting\XL\DataBase\FO2 " & Format(LsReportDate, "yyyymmdd") & ".xls"), updatelinks:=0
ActiveWorkbook.SaveAs "K:\Reporting\XL\DataBase\FO2 " & Format(ReportDate, "yyyymmdd") & ".xls"
'define some strings
directoryName = "K:\Reporting\XL\DataBase\FO2 " & Format(ReportDate, "yyyymmdd")
ReportName = "FO2 " & Format(ReportDate, "yyyymmdd") & ".xls"
Sheets("Input_Working").Activate
Cells(2, 4).Value = ReportDate
'run macro
Application.Run ReportName!Main
End Sub
Application.Run ReportName & "!Main"
--
Regards,
Tom Ogilvy
"ppyxl" wrote:
>
> code is not working, pls check for me. Many thanks
> ____________________________
> Sub SaveFO2()
>
> -'define date-
>
> Dim ReportDate, LsReportDate As Date
> Dim ReportName, directoryName As String
>
> LsReportDate = Workbooks("startup").Sheets("FO2").Range("B2")
> ReportDate = Workbooks("startup").Sheets("FO2").Range("B3")
>
> -'save from one file to another-
>
> Workbooks.Open fileName:=("K:\Reporting\XL\DataBase\FO2 " &
> Format(LsReportDate, "yyyymmdd") & ".xls"), updatelinks:=0
>
> ActiveWorkbook.SaveAs "K:\Reporting\XL\DataBase\FO2 " &
> Format(ReportDate, "yyyymmdd") & ".xls"
>
> -'define some strings-
> directoryName = "K:\Reporting\XL\DataBase\FO2 " & Format(ReportDate,
> "yyyymmdd")
> ReportName = "FO2 " & Format(ReportDate, "yyyymmdd") & ".xls"
>
> Sheets("Input_Working").Activate
> Cells(2, 4).Value = ReportDate
>
> -'run macro-
> Application.Run ReportName!Main
>
> End Sub
>
>
> --
> ppyxl
> ------------------------------------------------------------------------
> ppyxl's Profile: http://www.excelforum.com/member.php...o&userid=36116
> View this thread: http://www.excelforum.com/showthread...hreadid=560641
>
>
Hi, thanks!
error msg still! macro not found
is it any speical setting for the macro in another excel work book
the macro should be in a general module and not in a sheet module or the
thisworkbook module. the macro should be public, but this is the default.
--
Regards,
Tom Ogilvy
"ppyxl" wrote:
>
> Hi, thanks!
>
> error msg still! macro not found
>
> is it any speical setting for the macro in another excel work book
>
>
> --
> ppyxl
> ------------------------------------------------------------------------
> ppyxl's Profile: http://www.excelforum.com/member.php...o&userid=36116
> View this thread: http://www.excelforum.com/showthread...hreadid=560641
>
>
the macro should be in a general module and not in a sheet module or the
thisworkbook module. the macro should be public, but this is the default.
--
Regards,
Tom Ogilvy
"ppyxl" wrote:
>
> Hi, thanks!
>
> error msg still! macro not found
>
> is it any speical setting for the macro in another excel work book
>
>
> --
> ppyxl
> ------------------------------------------------------------------------
> ppyxl's Profile: http://www.excelforum.com/member.php...o&userid=36116
> View this thread: http://www.excelforum.com/showthread...hreadid=560641
>
>
Try
Application.Run "'" & ReportName & "'!Main"
--
HTH
Bob Phillips
(replace somewhere in email address with gmail if mailing direct)
"ppyxl" <[email protected]> wrote in
message news:[email protected]...
>
> Hi, thanks!
>
> error msg still! macro not found
>
> is it any speical setting for the macro in another excel work book
>
>
> --
> ppyxl
> ------------------------------------------------------------------------
> ppyxl's Profile:
http://www.excelforum.com/member.php...o&userid=36116
> View this thread: http://www.excelforum.com/showthread...hreadid=560641
>
Good catch on Bob's part - Spaces in a workbook name require the name be
enclosed in single quotes.
--
Regards,
Tom Ogilvy
"Tom Ogilvy" wrote:
> the macro should be in a general module and not in a sheet module or the
> thisworkbook module. the macro should be public, but this is the default.
>
> --
> Regards,
> Tom Ogilvy
>
>
> "ppyxl" wrote:
>
> >
> > Hi, thanks!
> >
> > error msg still! macro not found
> >
> > is it any speical setting for the macro in another excel work book
> >
> >
> > --
> > ppyxl
> > ------------------------------------------------------------------------
> > ppyxl's Profile: http://www.excelforum.com/member.php...o&userid=36116
> > View this thread: http://www.excelforum.com/showthread...hreadid=560641
> >
> >
There are currently 1 users browsing this thread. (0 members and 1 guests)
Bookmarks