Home | Contact Us | FAQ | Search & Site Map | Link to Us
Sign In | Join | Other 45 Sites in Network
Home
DiscussionsAccessExcelInfoPathOutlookPowerPointPublisherWord
DirectoryUser Groups
Related Topics
Outlook ExpressInternet ExplorerWindowsMS Server ProductsMore Topics ...

MS Office Forum / Excel / New Users / June 2004

Tip: Looking for answers? Try searching our database.

Detecting Excel 97 using VBA

Thread view: 
Enable EMail Alerts  Start New Thread
Thread rating: 
Casper Hornstrup - 23 Jun 2004 14:52 GMT
Hi. I need to detect, in a VBA script, if it is executed by Excel 97. How do
I do that?

Casper
Mark Rosenkrantz - 23 Jun 2004 15:01 GMT
Casper;
MsgBox "Welcome to Microsoft Excel version " & _
   Application.Version & " running on " & _
   Application.OperatingSystem & "!"Shows the version number in a
messagebox Mark.-- Meer Excel ?   www.rosenkrantz.nl   of
contact@rosenkrantz.nl------------------------------------------------------
-------------Rosenkrantz Spreadsheet SolutionsWitkopeend 241423 SN
UithoornNederlandTel :
0297-527511-----------------------------------------------------------------
> Hi. I need to detect, in a VBA script, if it is executed by Excel 97. How do
> I do that?
>
> Casper
Earl Kiosterud - 23 Jun 2004 15:02 GMT
Casper,

Application.version in VBA.
=INFO("release") in a cell.

Signature

Earl Kiosterud
mvpearl omitthisword at verizon period net
-------------------------------------------

> Hi. I need to detect, in a VBA script, if it is executed by Excel 97. How do
> I do that?
>
> Casper
papou - 23 Jun 2004 15:03 GMT
See answer in excel.programming

> Hi. I need to detect, in a VBA script, if it is executed by Excel 97. How do
> I do that?
>
> Casper
OZ - 23 Jun 2004 19:36 GMT
> Hi. I need to detect, in a VBA script, if it is executed by Excel 97. How do
> I do that?
>
> Casper

Try this:

Sub WhatVersion()
       Dim Isit97 As String
   Isit97 = Application.Version
   'MsgBox Isit97
   If Val(Isit97) < 9 Then
       ' Put in code for Excel 97 here...
   Else
       ' this is for Excel 2000 and above....
   End If
End Sub
 
Sign In
Join
My Latest Posts
My Monitored Threads
My Blog
My Photo Gallery
My Profile
My Homepage

Start New Thread
Enable EMail Alerts
Rate this Thread



©2008 Advenet LLC   Privacy Policy - Terms of Use
This website includes both content owned or controlled by Advenet as well as content owned or controlled by third parties.