#1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 4
Default 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

  #2   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 4
Default 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
.

  #3   Report Post  
Posted to microsoft.public.excel.programming
jaf jaf is offline
external usenet poster
 
Posts: 300
Default 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



  #4   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 493
Default 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

Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
split post code (zip code) out of cell that includes full address Concord Excel Discussion (Misc queries) 4 October 15th 09 06:59 PM
Code to conditional format all black after date specified in code? wx4usa Excel Discussion (Misc queries) 3 December 26th 08 07:06 PM
Drop Down/List w/Code and Definition, only code entered when selec Spiritdancer Excel Worksheet Functions 2 November 2nd 07 03:57 AM
Convert a Number Code to a Text Code Traye Excel Discussion (Misc queries) 3 April 6th 07 09:54 PM
copying vba code to a standard code module 1vagrowr Excel Discussion (Misc queries) 2 November 23rd 05 04:00 PM


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

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Copyright ©2004-2024 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"