Group data in pivot using VBA

[Nick]

In Excel, we can group data in a field, for example:

We can group A1, A2, A2 as List_of_1.

Is there a way to do this via VBA? I have a lot data points to group
and I want to automate the process.

Thanks in advance.

Nick.

 

[WhytheQ]

Range("A1:A3").name = "List_of_1"

Rgds
J