VBA to determine windows edition

[dgillz]

I am looking for a way to determine the windows edition in VBA, for example 2000, XP, Vista or Windows 7. Does anyone know how to do this?

Software Sales, Training, Implementation and Support for Macola, Synergy, and Crystal Reports. Check out our Macola tools:

http://www.gainfocus.biz/exceladdin.html

 

[PHV]

A starting point:
MsgBox CreateObject("WScript.Shell").Exec("CMD /C VER").StdOut.ReadAll

Hope This Helps, PH.
FAQ219-2884
FAQ181-2886

 

[combo]

With API: faq222-4599.
Version numbers:

http://msdn.microsoft.com/en-us/library/ms724832(v=vs.85).aspx

combo

 

[TonyJollans]

In Word:

[blue]System.OperatingSystem[/blue] will give you the base sytstem (e.g. Windows NT) and [blue]System.Version[/blue] will give the number (see combo's second link).

In Excel:

[blue]Application.OperatingSystem[/blue] needs a bit of unscrambling but gives the same information.

Enjoy,
Tony

------------------------------------------------------------------------------------
We want to help you; help us to do it by reading this: Before you ask a question.

I'm working (slowly) on my own website