have been experiencing an issue that I just can not figure out.
Please let me know if there might be a more appropriate group to post
this question in.  I am using Microsoft Jet OLEDB to retrieve a
recordset from an Access Database over our company network.  I use a

I'm using automation to start Excel and fill some columns with data.  Once
of the columns has quite a bit of text in some of the cells while some only
have  few lines.
I've set TextWrap=.t. for each Cell, but it doesn't adjust the height.  Is

When using Excel I click on 'Ctrl + F' to bring up the 'Find' box,
originally in the 'Look In' box the default setting came up as
'Formulas' now for some reason it has changed to 'Values' and I have
to keep changing it. Does anyone know how to revert the default

Sub changekey()
   If Range("b1").Value = "Joint" Then
       Range("key1").Value = "J" & Mid(Range("key1").Value, 2, 255)
   End If

I have a cell (G11) whose format is [h]:mm to store hours worked in a week.
I need to use that in a VBA function. If I query G11.value I get a
non-integer number (I DO know that Excel stores time internall like that).
How can I get in a VBA procedure exactly what is see in the ...

In a spreadsheet i have, some 20 charts along with the data. I have to
reduce the font size for the x and y axis and the title. For one chart
i can use the active chart method to achieve.
Please tell me, how i can loop through all the charts in the sheets

How can i count the number of rows until i reached a blank cell and then
stop counting for a column? I know there is this xl.up count , but then it
counts that row even when it is blank. e.g.LastCell =
Cells(Rows.Count,"A").End(xlUp)

I have a UserForm with a single Label Control that I do a .Show vbModeless on
to display status messages.  However, it only displays the the UserForm's
Title Bar and Borders.  The contents appear as solid white, unless I'm in
Debug mode or I've done a MsgBox after I called  ...

I have a workbook with several sheets that macros depend on (ie. reference
by name)  I've protected all of the sheets, but the "Move or Copy..." action
is still available.  I have found that even when protected a user can move
the sheet into a new workbook, therefore causing ...

I am experiencing a performance issue with my vba code. I think that
I'm making a mistake somewhere since a similar code this used to run
alot faster. Here are the details:
- I have tested the code on both Excel 2002 and 2003

I know how to do find and replace code but this is slightly different.
I want to find a value in a range, and replace the cell below where
the value was found.
Many thanks,

When debugging code, sometimes, It would be handy if there is a method to
step back. Since  there might be  a big gap between if , elseif block. I need
to trace the code.
Clara

Hi all, i have a spreadsheet that i need to insert either a list or
combo box (Not sure which is best), so that the user can sellect a date
(Jan-07 to Dec-07)with the selected date going into "B6". I then also
have to remove the Box as the user must send the sheet by e-mail but the

Say I have a range A1:A100. How, when clicking a command button, do I
get excel to loop through the range adding the contents into a string
with a colon between each entry?
e.g.

I would like to enter a formula into a pivot table.
I have the following data.
Item #    Qty    Date
(thousands of line of data)