How to Run the Correct Macro in Windows or on Mac

[Story11]

Hello everyone!
Please I'm looking for the code that can search out the operating system of a machine. I wrote a code with MS Excel 2013, but the person who wants to use the code uses Excel 2011 for MAC. While the program ran perfectly on my Windows, the MAC user said it generated error. i think the problem is with the GetOpenFilename instruction. Please help me out if you can, as I need to submit the job urgently.
Thank you in advance.

[romperstomper]

You can use conditional compilation :

Please Login or Register  to view this content.

[Story11]

Thank you @romperstomper for your reply.
But can you please give me a full code? because I've tried virtually all the codes I know but none worked.

[romperstomper]

Have a look at Ron de Bruin's site - he has several Mac code samples.

[Story11]

I've used his codes, still didn't work.

[romperstomper]

Please be more specific than that. What did you use and what happened?

[Story11]

I used these lines of code below...




Sub WINorMAC()
' Test for the operating system.
If Not Application.OperatingSystem Like "*Mac*" Then
' Is Windows.
Call Select_File_Or_Files_Windows
Else
' Is a Mac and will test if running Excel 2011 or higher.
If Val(Application.Version) > 14 Then
Call Select_File_Or_Files_Mac
End If
End If
End Sub

***...and I received the error message in the screenshot attached to this reply***
Error screen.jpg

[romperstomper]

You forgot to copy the routines that are being called from Ron's website.

[Story11]

Okay. But how do I do that please? Can you give me a complete code?
Thank you in advance.

[romperstomper]

The codes are here: http://www.rondebruin.nl/mac/mac015.htm

[Story11]

Thank you. I'll try them and get back to you.

[Story11]

@romperstomper: Could you please copy the codes for me and fix the routine where it's suppose to be? I still tried the link you gave me but it still didn't work. please complete the code for me and paste it here to copy. Thank you.

[romperstomper]

You need:

Please Login or Register  to view this content.

and:

Please Login or Register  to view this content.

I am a little concerned that you say this is a job you need to submit; do you mean assignment?

[Story11]

The thing is I'm just learning VBA. My friend gave me a task to write Excel macros to import some tables from MS word, which I did and which worked fine. But the issue is my friend uses MAC, so the program didn't work for him.
Thank you for the codes. I'll run them and see if they'll work. I just hope that if they work, I can incorporate them in my already working codes, right?

[Story11]

It still says that 'Sub of Function not defined'

[Story11]

@romperstomper: I've gotten a way round the codes, thank you very much.

[mc84excel]

Is this thread solved? If it is, please mark it as SOLVED using the thread tools (menu at top right hand corner of thread). If it isn't, does below work for you?

Please Login or Register  to view this content.