The last Cell of A pivot

[grifter]

Hi

I am creating two pivots from VBA dynamically on one sheet. On some occasions the last pivot is placed over the end of the first pivot. So I want to be able to determine dynamically what is the end of the first pivot, then start the next pivot 4 or 5 cells down so they never overlap.

Grifter

 

[HaHoBe]

Hi, Grifter,

this line should deliver the last row for any pivot (please alter Range("A4") if it should not be included in the pivot area):

Range("A4").SpecialCells(xlCellTypeLastCell).Row

Ciao,
Holger