Replies

I had the same problem several months ago. I posted it in the Excel group. What I found was that I had the column width set to narrow and was getting “####” in some cells. For Find to work it must be able to “see” the entire string. Try to adjust your column width. Another option would be to use the Match function.

HTH
Thom

Oooops! Sorry didn’t notice you found the problem.

Use Bin2Dec and Dec2Bin functions. You will have to have the Analysis Toolpack Add-In loaded.

HTH
Thom

I have made watermarks in Excel. It is very difficult to control due to changing ranges to print, etc. You will find it difficult to center. What I do is create the watermark in Word (much easier) and then print it and reuse the printed sheet in Excel. Some printers don’t like to reuse paper but with me it is not a problem.

HTH
Thom

You have periods instead of commas and you need to use formula. Try this:

strformula = “=If(” & CStr(ActiveCell.Offset(0, 15).Address) & “=””””,” & CStr(ActiveCell.Offset(0, 14).Address) & “,” & CStr(ActiveCell.Offset(0, 15).Address) & “)”
ActiveCell.Offset(0, 16).Formula = strformula

Works for me in Excel2000 SP-3. Do you have another workbook open? If so you might want to change ActiveWorkbook to ThisWorkbook.Save. Do you have the code behind the Workbook module? That is where you want it.

Format the column with Marlett font. Then add an “a” in you if statement. This will produce a check mark.

Jan,

Yes it selects the range as expected. The dynamic range is defined by =OFFSET(Electrical!$B$6,0,0,COUNTA(Electrical!$B:$,7).

Jan and Andrew,

The workbook being opened contains NO code. The error occurs in a cell Lookup formula in the “Electrical Estimate.xls” that references the “Standard Costs.xls”. Obviously this is being evaluated prior to the Workbook)Opem event. The “ElectricalLookup” was a typo it actually is “ElectricalLook”.

Jan,

My brain went plaid again. Just moments after posting I realized that I was using the same Timer Process for both timers. After I made a new Timer Process sub I was able to run both timers independently. Probably a perfect situation to develop a class module. I will play with that today.

I also apologize that I didn’t notice that I didn’t include the sub header when posting the original. The timers will time event updates to the spreadsheet and raise a flag (interior.colorindex) if a process has not been updated for a period of time. The code I am posting is just experimental use with forms for the timers. As you probably know SetTimer API can crash Excel in a heartbeat if not coded carefully.

Sub TimerProc(ByVal hwnd As Long, ByVal uMsg As Long, ByVal nIDEvent As Long, ByVal dwTimer As Long)

If bTimer = True Then
iCounter = iCounter + 1
UserForm1.TextBox1.Text = CStr(iCounter)
End If

End Sub

This will be changed to something like the following instead of the user form.

If iCounter < 15 Then
Else
Sheet2.Range("C2").Interior.ColorIndex = 36
EndTimer
End If

Since your named ranges contain multiple cells:

=SUM(SUM(Year1)-SUM(Year2))

HTH
Thom

Yup! That’s what I’m thinking also. Sure adds to the confusion when you try to find something.

I guess I’m not clearly stating what I did. Do the following:

Explore > View > Explorer Bar > Search > Contains text: (enter Auto_Open), pick a directory with Excel files in it. Do the search.

It returns to me some files that do not contain “Auto_Open”

It dosen’t matter if there was a Workbook_Open macro or not. I wasn’t searching for that text, just “Auto_Open” text.

No. I was just using the search tool search for “Containing text” and entering “Auto_Open”. It found files that did have that text as well as the ones I described where there was no “Auto_Open” anywhere.

Well I found the problem at last. Rory’s function was using GetFile(strFileName). This works if you are referring to the default directory. My VBA stuff is in C:XlsVBA. I changed it to GetFile(strFileFullName) at it works just fine. I guess it would work sometimes because it must see the directory while it is created but then looses it after starting back up.