ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Passing variables from Outlook Macro to Excel Macro (https://www.excelbanter.com/excel-programming/319474-passing-variables-outlook-macro-excel-macro.html)

[email protected]

Passing variables from Outlook Macro to Excel Macro
 
I have a macro in Outlook 2003 that starts up Excel 2003 and loads a
workbook. I want to then, from Outlook call a Excel macro and send it
some variables. I followed the application.Run example in the help but
I still recieve a Runtime Error: 424 Object required.
Does anyone know what I am doing wrong in passing the variables?

'Outlook Macro
Sub StartExcel()
Dim xlApp As Object
Set xlApp = CreateObject("excel.application")
xlApp.Visible = True
a = "Test Text"
Set EBook = xlApp.workbooks.Add("C:\temp\book1.xls")
mySum = AxlApp.Run("book1.xls!macro1", a)

xlApp.Quit
Set xlApp = Nothing
End Sub


'Macro in Excel
Sub Macro1(a As String)
MsgBox a
End Sub

THanks
Scott


Bob Phillips[_6_]

Passing variables from Outlook Macro to Excel Macro
 
Scott,

If you are just creating the workbook, how can it have a macro in it?

--

HTH

RP
(remove nothere from the email address if mailing direct)


wrote in message
oups.com...
I have a macro in Outlook 2003 that starts up Excel 2003 and loads a
workbook. I want to then, from Outlook call a Excel macro and send it
some variables. I followed the application.Run example in the help but
I still recieve a Runtime Error: 424 Object required.
Does anyone know what I am doing wrong in passing the variables?

'Outlook Macro
Sub StartExcel()
Dim xlApp As Object
Set xlApp = CreateObject("excel.application")
xlApp.Visible = True
a = "Test Text"
Set EBook = xlApp.workbooks.Add("C:\temp\book1.xls")
mySum = AxlApp.Run("book1.xls!macro1", a)

xlApp.Quit
Set xlApp = Nothing
End Sub


'Macro in Excel
Sub Macro1(a As String)
MsgBox a
End Sub

THanks
Scott




[email protected]

Passing variables from Outlook Macro to Excel Macro
 
The workbook I am opening already has the macro in it. I fixed my
problem it was how I was sending the variables.
ExcelApp.Run Macroname:="macro2", varg1:=A

Scott



Bob Phillips wrote:
Scott,

If you are just creating the workbook, how can it have a macro in

it?

--

HTH

RP
(remove nothere from the email address if mailing direct)


wrote in message
oups.com...
I have a macro in Outlook 2003 that starts up Excel 2003 and loads

a
workbook. I want to then, from Outlook call a Excel macro and send

it
some variables. I followed the application.Run example in the help

but
I still recieve a Runtime Error: 424 Object required.
Does anyone know what I am doing wrong in passing the variables?

'Outlook Macro
Sub StartExcel()
Dim xlApp As Object
Set xlApp = CreateObject("excel.application")
xlApp.Visible = True
a = "Test Text"
Set EBook = xlApp.workbooks.Add("C:\temp\book1.xls")
mySum = AxlApp.Run("book1.xls!macro1", a)

xlApp.Quit
Set xlApp = Nothing
End Sub


'Macro in Excel
Sub Macro1(a As String)
MsgBox a
End Sub

THanks
Scott




All times are GMT +1. The time now is 10:41 AM.

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