Excel Custom Lists?

[gmooney]

I just created a custom list in an Excel file that I am using for a Slicer and pivot table filter.

I emailed the file to another person and the custom list did not transfer with the file?

How can I make sure that the custom list stays in the file?

 

[lrobbo314]

Yes, you just need to specify the sheet when referencing the range.

Application.AddCustomList ListArray:=Sheets("HiddenSheet").Range("A1:A5")

 

[gmooney]

Irobbo314 when I compile I get an error on the i with the For 1 =

 

[gmooney]

I mean the i with the For i =

 

[lrobbo314]

What does the error say?

 

[gmooney]

Complie error. Variable Not defined!

 

[lrobbo314]

That means that you have 'Option Explicit' at the top of your code. It means that you need to declare all of your variables. You can either get rid of the option explicit or declare the i variable.

Sub Example()
Dim i as Long

For i = 1 To Application.CustomListCount 'Get rid of other custom lists, catch errors for system lists
   Application.DeleteCustomList (i)
Next i

End Sub

 

[gmooney]

That solved it. Thank you!