Hi,
Basically what I have is two excel sheets. One extensive list of accounts
and one with a selection of accounts from the extensive list.
Sheet 1 has a selected list of account numbers in Col A (about 400). And

Private Sub CommandButton1_Click()
NewRowCount = 1
Lastrow = Range("N" & Rows.Count).End(xlUp).Row
For RowCount = 1 To Lastrow

Okay, I've got a pretty complex issue here, and was hoping someone had the
time to help or advise me.  It's posisble that I might be trying to solve
the problem in the wrong way, as well as not knowing quite how to solve it
using my own ideas.

I need to calculate and return a number in a cell based on the value in a
given cloumn. Here is what I need.
I have several packages waiting for return labels to be e-mailed. In column
L, if the package had a return label attached, the tracking number is

I have an xml file (below is the the sample) - how do I read this XML file to
get  "id", "name" and "division" values using VBA macro? Any sample code is
really appreciated. Thanks!
<CustomerDetails>

How can I change this macro
If cell.Value <= 32 Then
to activate another workbook
and to copy entire row in this

I have code in Excel that uses ADO to read a CSV file. It works IF the
CSV file has certain headings. That's the problem. The CSV file does
not have these headings. So I thought I might first use a query with
ADO to insert the headings I want. THEN query the CSV. So.....how do I

Programing a macro in excel 2003. At some point I got "Can't perform
requested operation" when trying to run it. So I saved the whole thing
and went to bed.
Now excel won't run the macro at all. If I just try "Step into" I get

Hello Gurus,
I have a workbook which includes a Word document.
When, by VBA, the user quits this workbook, once the
Word document is edited, and returns into my app,

I want to add a field code in the footer to automatically apply the name of
the user in the footer.  In Word, it is Last Saved By.  My students create
macros for the footers with these codes.

In cell G2 I have the following formula:
=INDEX('[Database -- AR and EQ.xls]Stock
Lookup'!$G$2:$G$6000,MATCH($B2,'[Database -- AR and EQ.xls]Stock
Lookup'!$B$2:$B$6000,0),1)

i have a vba code included the following:
shortest = count(1)
For r = 1 To 200
If count(r) < shortest And count(r) > 0 Then

I have used this commonly recommended formula to populate the file name
within cell A1 of my worksheet:
=MID(CELL("Filename"),FIND("[",CELL("Filename"),1)+1,(FIND(".",CELL("Filename"),1)+4)-(FIND("[",CELL("Filename"),1)+1))
I am experiencing a couple of issues with this:

I have a cell that checks the vertical totals with the horizontal totals and
shows the difference if they are difference.
I would like to add a pop up message box if they are different using sheet
code.

Requesting help to enhance the sub below
There are some charts on the sheet (linked to the data on the same sheet)
that I would like pasted as well when the sub iterates through the DV in B3.
How could the sub be revised to do this? Thanks