Hi Bob
Except for the brilliant conditional compilation, I think isolating it is the only way
around it. This was one of the colorful debates back in the Hawley days, that's why I
remember it so well:
http://makeashorterlink.com/?M2C4167F5
quote: "I have not tested this but if the UserForm ShowModal Property is set to False, it
will simply show as Modal in pre 2000 versions and show as not Modal in 97 versions. So
is there any need to test?"
:-)
HTH. Best wishes Harald
Excel MVP
Followup to newsgroup only please.
"Bob Phillips" wrote in message
...
Harald,
Had a wonderful bright idea after my last response, don't use the vbModeless
constant but it's value instead.
Great idea, yes? But thinking some more I guess it's not such a good idea.
Presumably, as modeless forms were only introduced in 2000, the 97 version
would not even support the arguments to the Show method, so it would still
err on that line if not isolated as you suggest. I don't have 97 to hand, so
can you confirm that?
Regards
Bob
"Harald Staff" wrote in message
...
Hi Bob
It errs on 97 because vbModeless is unknown. The trick is to place that
into an isolated
sub that won't be called in 97:
Sub Main()
Select Case Val(Application.Version)
Case 8
UserForm1.Show
Case 9 To 99
Call Modeles
Case Else
End Select
End Sub
Private Sub Modeles()
UserForm1.Show vbModeless
End Sub
--
HTH. Best wishes Harald
Excel MVP
Followup to newsgroup only please.
"Bob Phillips" wrote in message
...
ExcelMan,
Have you tried
If Application.Version 8 Then
UserForm1.Show vbModeless
Else
UserForm1.Show
End If
--
HTH
Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)
"ExcelMan" wrote in message
...
Is there a way to use a VBA feature in Excel 2000 when running in
Excel
2000, but have the system not us it when running in Excel 97?
I've created a modeless dialog box for my application. I want it to
run
in
Excel 2000 (and it does) but when I try to run the app in Excel 97 I
get a
compile error because Excel 97 does not accept the vbModeless
parameter
after the Form.Show command.
I've tried containing it in a If statment, but that doesn't solve the
problem.
Is there anything equivalent to the precompiler statements in C that I
can
use here?
Thanks.