ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   VBA code (https://www.excelbanter.com/excel-programming/277154-vba-code.html)

Jeff[_21_]

VBA code
 
File Structu

H:\
GO
Finance
Function_Labor
MKTG
JUN
MKTG_GROUP.XLS
JUL
MKTG_GROUP.XLS
AUG
MKTG_GROUP.XLS


VBA Code:

Sub MKTGRPsumm()
ChDrive "H"
ChDir "H:\GO\FINANCE\FUNCTION_LABOR\MKTG\" &
Months.Value
Workbooks.Open Filename:="MKTG_GROUP.XLS",
Password:="MKT2646"
End Sub ''


Scenario:

Combobox(Months) with a list of months. User selects
month in combo box then clicks on button tied to macro
above. The object is to have the user select the month of
the report to open.

Error:

Receive the following error when executing the macro:

Run-time error '424'
Object Required


Can anyone help fix this code? Thanks


Jeff[_21_]

VBA code
 
I have added this to one line. I still get the same'424'
object required error. After doing some trouble-shooting,
the problem is the & Months.value in the code. It does
not appear it is recognizing that for some reason
-----Original Message-----
Jeff,

personally, I would just use:

Workbooks.open
filename:= "H:\GO\FINANCE\FUNCTION_LABOR\MKTG\" &
Months.value & "\MKTG_GROUP.XLS"

Although I'd probably type it on one line!!

Cheers, Pete
.


jaf

VBA code
 
Hi Jeff,
What does months.value return? A number or text?


--

John

johnf202 at hotmail dot com


"Jeff" wrote in message
...
File Structu

H:\
GO
Finance
Function_Labor
MKTG
JUN
MKTG_GROUP.XLS
JUL
MKTG_GROUP.XLS
AUG
MKTG_GROUP.XLS


VBA Code:

Sub MKTGRPsumm()
ChDrive "H"
ChDir "H:\GO\FINANCE\FUNCTION_LABOR\MKTG\" &
Months.Value
Workbooks.Open Filename:="MKTG_GROUP.XLS",
Password:="MKT2646"
End Sub ''


Scenario:

Combobox(Months) with a list of months. User selects
month in combo box then clicks on button tied to macro
above. The object is to have the user select the month of
the report to open.

Error:

Receive the following error when executing the macro:

Run-time error '424'
Object Required


Can anyone help fix this code? Thanks




J.E. McGimpsey

VBA code
 
Are you using Set to assign an object to your Months variable? For
instance

Set Months = Range("A1")

If you haven't declared Months to be an object variable, e.g.,

Dim Months As Range

then Months will by default be of type Variant. That's OK if you use
Set, but if not:

Months = Range("A1')

will assign the default property (here, .Value) to Months, rather
than the object itself.

This is a great reason to always use Option Explicit at the top of
your module and to declare each variable within your procedure.




In article ,
"Jeff" wrote:

After doing some trouble-shooting,
the problem is the & Months.value in the code. It does
not appear it is recognizing that for some reason



All times are GMT +1. The time now is 08:28 AM.

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