Replies

Not a problem. Its the code in Andrew C’s post …

Sub MultiSheetsSelect()
Dim SheetArray() As Variant
Dim ws As Worksheet
Dim indx As Integer
For Each ws In ThisWorkbook.Sheets
If ws.Range(“A1”) = “x” Then
ReDim Preserve SheetArray(indx)
SheetArray(indx) = ws.Index
indx = indx + 1
End If
Next
If indx > 0 Then
Sheets(SheetArray()).Select
End If
End Sub

Andrew,
Thanks for the code but I am unable to get it to work. I have modified the code to include a worksheet that does not have X in the range so I would not have to modify ny worksheet and I get the “Run-time error 1004” when I try ti use the code. Any thoughts?

Ed

I like the idea of using the developers edition and distributing the runtime but I do not own a copy of it and the pricing on the 2000 developers edition is still close to $1k. I am doing this as a favor and not getting paid so I’m not willing to spend any money on this. The transition to VB has been fairly easy so far. I know the report part will be a pain but with the exception of the question regarding which DB connection method to use the project has gone well.
If anyone has any good recomendations on how I might get a copy of the Office Developers edition for a lot less than $1000 I would look at that.

Thanks again

Ahhhh. That makes sense. DO you have any suggestions as to an alternative to my sutuation?

Thanks!

What if you do not know the path to the Add-in? Is there some way to retrieve this info from Excel? When you add the Add-in via Tools – Add-ins you can link to and add-in anywhere and Excel still keeps track of that location and finds the Add-in when you open Excel. Anyway to do the same manually?

Thanks for the info. I searched all over the MS website and Excel/VBA help and could not find that info anywhere. There was one reference about this but it did not list Excel 2000 along with the other Excel versions.
Could you provide an example of how to load the Add-in manually?

So when displaying a UserForm within a Class you would not create a new instance of the form such as:
Dim fmrNew as frmUserForm
Set frmNew = New frmUserForm
…And instead do the following:
frmUserFrom.Show

Thanks
Ed

You are right! I was looking at it from the opposite direction. So what you are saying is to have the UserForm call and use the Class object instead of the Class calling and using the UserForm. That would definately resolve this problem. However, how would you handle a similiar scenario where a Class uses several UserForms?

Thanks Again!
Ed