Referencia a Celdas

Holas Kl, tengo excel 2k en español, me fui por la segunda opcion y me
arroja un mensaje de error: "1004, se ha definido por la aplicación del
objeto" creo que es un error no definido por VBA y por tanto no demuestra
mas detalle del error, pero como hacer para detectarlo, te muestro el
codigo:

Sub Macro1()

With me.PivotTables(1) ''Código en la misma hoja donde se encuntra la
tabla.. MsgBox .GetData("Total General")
End With
End Sub

Muchas Gracias..

Saludos..




"KL" escribió en el mensaje
news:

Hola Carlos,

1) Si usas Excel en ingles, podras usar la funcion GETPIVOTDATA()
2) De lo contrario, el siguiente codigo me devuelve el total de mi tabla
dinamica [tendras que cambiar el indice (o el nombre) de la TD y del
campo del Total a los que tienes tu]:

Sub Macro1()
With ActiveSheet.PivotTables(1)
MsgBox .GetData("Grand Total")
End With
End Sub

Saludos,
KL


"Carlos Rey" wrote in message
news:%

Buenas Tardes,

Soy nuevo en este foro de excel, y quisiera antes que todo saludar al
grupo... Ahora una pregunta.

Tengo una tabla dinamica que se conecta a una base de datos de sql
Server y refleja resultados de ventas, lo que quiero es colocar en un
area de la hoja el Valor de la celda total sin que al actualizar la hoja
se pierda la referencia, ya que si hago referencia manual (por ejm:
=H65 ) con el moviemiento de las celdas al actualizar pierdo la
referencia a la celda..

Será posible hacer esto mediante una Macro o algo por el estilo?

Cordiales Saludos!

Carlos Rey

("Grand Total") me arroja el resultado deseado...

He programado mucho tiempo en vb 6 y ahora me ha tocado hacer aplicaciones
sencillas, a bajo costo y en corto tiempo, la verdad? estoy fascinado..

Hola Carlos,

"> He logrado resover el inconveniente, al cambiar ("Total General") por

("Grand Total") me arroja el resultado deseado...

Me alegro de que hayas resulto el problema y, de paso, contigo he
aprendido que el campo Grand Total de las TDs no se traduce en VBA :-)

He programado mucho tiempo en vb 6 y ahora me ha tocado hacer
aplicaciones sencillas, a bajo costo y en corto tiempo, la verdad? estoy
fascinado..

Pues bienvenido al mundo de VBA.

Saludos,
KL