I ran the following code under Sheet1, ThisWorkbook and Module1 with no
problem:
Public Sub ShowBarNames()
  Dim bar as CommandBar

Option Explicit
Private Sub REmove_Net_Pricing_Info_Click()
' SelectButton Macro
' Macro recorded 2/20/2006 by JFS

How can I add controls to a toolbar, using VBA code?

The following produces the run time error, even though
that part is an actual copy of a recorded macro.
What am I missing?
Option Explicit

This is my first post. I am new to excel macros. Please help me.
I need to copy from range(H2:M2) in sheet1 and paste it into range(A2)
in sheet2, then go to range(H5:M5), copy that and paste in range(A3)
and so on..

I have a web page download consists of the contact information like Name,
address and city etc. I opened it with the Excel and the information is
organized in the way that is impossible to import to an Access database.
However the "Name" is shown in a font and size differnt from ...

I'm having problems using web queries to analyize a list of data in regards
to performance horse sales for the year 2005.  In the sales that I'm looking
at, there are about 2000 horses and I need to find out how much each one
earned.  I have an excel sheet that I have all of the ...

Is there an equivalent dialog to GetSaveAsFilename which will just select the
folder to save a file in instead of returning a full filename? The intention
is that my macro will process a list of files and for each input file will
write an output file in the same user selected ...

I'm a VBA novice and have found this group helpful in my learning, but
I'm stuck with a particular piece of coding.  What I'm trying to do is
allow the user to select a Y and X range using an inputbox, which will
then be used for a regression.  Here's the problematic part of the

I would like to make this work with the group box but I don't seem to be
able to find it as a classtype ?
Sub AddComm_button()
ActiveSheet.OLEObjects.Add ClassType:="Forms.Frame.1", Left:=126, Top:=96,

Good day,
I am trying to determine if Employee's are in a 5th anniversary year of
there tenure. For example, employees's that started with the company on
Aug 8, 2001; are in there anniversary year for there 5th year, so there

I want to get the vlookup results to a variable, where that table data is in
book2
and the key search is in book1 somthing like
Vlook = application.worksheet.vlookup(book1!sheet1[a1],

Hi.  I have a workbook that calls the open dialog to open and minimize a
file.  The code then takes values from this called file and populates the
first workbook.  What I now need to do is copy an entire sheet (DosV) to the
new workbook - sheet DosV.

Hello Excel users and experts,
Excell 2002
I offered this code to a poster about four or five posts below this one
(Lucas Budlong, 1:13PM) and now I find that when I clear the series of the

I am trying to assign Named Ranges as follows:
Sub Macro2()
   Range("A1").Select
   ActiveWorkbook.Names.Add Name:="a", RefersToR1C1:="=Sheet2!R1C1"