For those who might be interested:-
+ The basic bugs remain, ie. Accessing a shape as a DrawingObject does
not work, eg. to reference its interior.
+ Excel 2007 no longer corrupts shape objects when it saves a workbook

I have written a series of macros which insert rows in a database.
Each macro inserts one line with data from the spreadsheet.
I want to avoid sending null rows to the database, but I need to allow
for up to 20 rows to be transferred to the database at a time, when

I have a column of values, which is interspersed with empty cells, that
typically looks like the following:
red
green

Hi, I define "Dim dt as variante" and
save "5 by 2 matrix value" for dt.
However, if i assume that we don't know 5, (# of rows)
How can I get that number?

The following code returns the page count for printed pages - Is it
possible to also find out the range for each page which will be printed,
based on this page count?
PageCount = 0

I have a form that allows users to enter working days for a month in 12 text
boxes and I call a ValidateWorkingDays procedure in the BeforeUpdate event
for each monthly text box.  If user needs to re-enter value I have this code
in my ValidateWorkingDays procedure:

I have a spreadsheet where various cells in row 7 columns c to ac have a
value of X
Is it possible to count the number of X's in that row and put the total in
column AD

How can I test a text value in a cell when CAPITALIZATION DOES NOT EQUAL
LOWER CASE???
In other words,  "MIAMI" and "Miami" is NOT a match.
Thanks,

I created macro and only few people will use it. How change characters to
stars(on monitor) when somebody is writing password?
below Is macro code:
Private Sub CommandButton2_Click()

I have two columns D2 &E2  which one is for received date and the other for
due date. What would be the formula to compare if one date is greater than
the other date by 90 days? I have tried cell is and formula is between the
two dates in the columns but it does not come out.... ...

I'm attempting to place images on a Form with the command
frmLabel.Picture = "E:\Images\" & Cells(C, 3) & ".jpg"
Hower I'm getting Run-time error '424':
Object required and can't figure out what it wants.

is there a way to get the file name only? Using this
fileToOpen = Application.GetOpenFilename("DBF Files (*.dbf), *.dbf")
i got complete path. i want the path  as well as file name. So, for
path this is ok to me but not for the file name. Please help me or

I have the following code:
Private Sub Workbook_Open()
   Worksheets(1).Range("A1").Value = Now()
End Sub

what's the best way to test a row, columns c through k to see if all the values
are zeroes?

I have this excel worksheet I use for years now...
Ith has some pushbuutons to execute some code. Now I want to change the
text on this pushbuttons, but I forgot how I can edit those buttons... I
tried the combination of CTRL or Alt- enter key but... no way.