Run time error message???....Help!!

H

hoyos

With the following code set in a userform:

Private Sub CommandButton1_Click()
UserForm9.Show
End Sub

When ever I press commandbutton1 I get the following error message:

Run-Time '1004'
Application-defined or object-defined error

Any fix for this?
 
D

donwb

Hi Hoyos

I created 2 Userforms 1 with 2 command buttons,
and the other blank.
On UF1,
Command button 2 is the exit or close
Command Button 1 is used to call up a second Userform2

This is the code in UF1:-
Private Sub CommandButton1_Click()
UserForm2.Show
End Sub

Private Sub CommandButton2_Click()
Unload UserForm1
End Sub

A code module opens UF1:-

Sub OpenUF1)
UserForm1.Show
End Sub

This worked OK for me.
donwb
 
J

Jim Thomlinson

My guess is you do not have a Userform9. Open the VBE (Alt + F11). On the
left hand side of the screen should be the project explorer listing all of
the currently open workbooks including the one you are working on. In the one
you are wokring on do you see an object called UserForm9. As a guess it has
been deleted or renamed.
 
H

hoyos

Thanks for answering my question.
I think I know what the problem is. on the left where you find the project
explorer, There is missing the following:
"XYChartLabller"
How do I insert it?
 
D

donwb

Hi Hoyos
Not sure where you are seeing missing "XYChartLabller".
However I suggest you try the following.
Go to VBA/Tools/References
There's a long list there.
Find the following 6 references and put a check mark against each.

VBA for applications
Microsoft Excel11 object library
Microsoft Office11 object library
Microsoft Forms 2.0 object library
atpbaen.xls
Microsoft Visual Basib for Applications Extensibility 5.3

Then come out of VBA and go to your Excel worksheet.
On the Menu Bar select Tools/Add-Ins.
Put a check mark against the following 2 Add-Ins.
Analysis ToolPak and Analysis ToolPak - VBA

This may help
donwb
 
H

hoyos

Hi Donwb,
Did all as you mentioned but still not working.
the "XYChartLabller" is on the Project-VBAProject window.
On the files that work it's included
On the ones that dont work that is missing.

I'll have a look at the rest of the VBA/Tools/References to see if it's there.
But many thanks for coming back to me.
 
H

hoyos

Donwb,
I think I have found where the problem lies.
In the Add-ins avalaible window there should be a tick on "XY Chart Labeler
7.0".
On the other computer with the copied file, that is missing.
Any ideas how to add it?

Hoyos
 
G

Gord Dibben

Install the xychartlabeller 7.0 add-in from Rob Bovey's site or copy it from
working computer to other computer.


Gord Dibben MS Excel MVP
 
H

hoyos

Yes.
Is there a way to copy a file with "xy chart labeler" to another computer
without having to down load the add-in on the second computer?
 
G

Gord Dibben

You could copy only the xychartlabeller.xla from one computer to the other
and see if you get full functionalityt.

The download from Rob's site is an executable and has an install routine.

Entries are written to the Registry along with several files being copied to
a folder.

help, example workbook.xls, uninstall routine, xychartlabeller.xla among
others.

Best to download and install by running the executable.

Only takes a minute or so and you will make sure the add-in is fully
installed and easily uninstalled should you decide.


Gord
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Run-time Error '1004' 1
Show all data 6
Launch Click Event Using Application.Run 4
UserForm will not appear 3
HELP to correc this macro 1
Why is this code not working ? 3
Excel Excel VBA (Saving as A CSV) 1
#REF! help please 3

Top