Hello, I´m new in this forum, I´m programing with visual basic 6 and
make some reports, when I have a lot of registres, I have a proble
with the pivot tables, the error says that can´t make the change
because there are so many rows and columns, drag one or more files o
rows out the pivot table.
That how I do it:

Set Tabla = Nothing
Set Tabla = Hoja.PivotTables(1)

If File 1 Then
Tabla.SourceData = "Usuarios!L1C1:L" & File & "C9"
Else
Tabla.SourceData = "Usuarios!L1C1:L2C9"
End If

Tabla.SaveData = True 'save changes

Thanks for all and excuse my english (I´m from Spain

--
Eddie515
-----------------------------------------------------------------------
Eddie5150's Profile: http://www.excelforum.com/member.php...fo&userid=1665
View this thread: http://www.excelforum.com/showthread.php?threadid=31868