Campos en tabla pivote

hola, Alex !

... a traves de macros ... accesar a los campos en las tablas dinamicas. Por ejemplo:
ActiveSheet.PivotTables("Tabla dinámica1").PivotFields("[edocivil]")
... que el campo "edocivil" sea una variable, que el usuario seleccione ... a traves de un list box

dependiendo de 'como' hayan sido 'cargados' [los campos] al control listbox... p.e.
1) si los campos de la tabla se cargan ->todos<- [y... 'en orden']...
-> usando la propiedad listindex, que devuelve el # del elemento seleccionado en el listbox [de 0 a n-1]
[p.e.] si agregaste algun elemento 'inicial-descriptivo', como... "Selecciona de la lista."
-> ActiveSheet.PivotTables("Tabla dinámica1").PivotFields(ListBox1.ListIndex)
[si no] - ActiveSheet.PivotTables("Tabla dinámica1").PivotFields(ListBox1.ListIndex + 1)
2) si los campos son agregados de una manera 'selectiva'...
-> usando el texto del elemento seleccionado en el listbox
[p.e.] ActiveSheet.PivotTables("Tabla dinámica1").PivotFields(ListBox1.List(ListBox1.ListIndex))

=> solo 'recuerda' que... NO 'todos' los campos... 'aceptan' ->las mismas propiedades [y metodos]<- ;)

¿comentas?
saludos,
hector.