Macros work on Windows, fail on Macs

[LisaF]

I call two small subroutines as part of a larger macro. They work perfectly in Windows (tested in Excel 2010 and 2013) but cause error messages on Macs (in Office 2011). I have very limited access to Macs - I had to use a computer in another department to debug the code - so I would appreciate any insight into the causes of the problems and how to fix them.

The first macro is meant to convert any existing table to a range, the second formats a range as a table with a specified name.

Sub UnlistListObjects()
  Do While ActiveSheet.ListObjects.Count > 0
  ActiveSheet.ListObjects(1).unlist
  Loop
End Sub

Sub formatAsTable_Vacancies()
  Dim tbl As ListObject
  Dim rng As Range
  Set rng = Range(Range("A2"), Range("a65536").End(xlUp).Offset(0, 11))
  Set tbl = ActiveSheet.ListObjects.Add(xlSrcRange, rng, , xlYes)
  tbl.TableStyle = "TableStyleLight9"
  tbl.Name = "VacanciesTable"
End Sub

Any help will be greatly appreciated!

Cheers,
Lisa

 

[NARAYANK991]

Hi Lisa ,

I can help you help yourself !

First , any normal Excel VBA keyword is Capitalized ; in the first macro that you have posted , the keyword unlist is not ; this is a sign that Excel cannot recognize it.

If you go through the following link , it will tell you what is the keyword to be used for this method in Excel for Mac.

http://answers.microsoft.com/en-us/...l-tables/e9a5b7ff-8a8e-4fb7-a6f8-911ab2aade24

Narayan

 

[LisaF]

Narayan,

Thank you for your reply. Unfortunately, when I tried to implement the code, it failed on Windows. Is there code that will work on both Windows and Macs, or do I have to write separate macros for each platform?

Cheers,
Lisa

 

[LisaF]

Never mind, I just went ahead and wrote separate macros for each. Thanks for pointing me in the right direction!