Pivottabel via vba

Hej!
Jeg har fået hjælp til nedenstående makro som markerer et område på regnarket. Nu vil jeg gerne lave en pivottabel ud fra markering. Er der nogen der kan hjælpe?

SidsteRækkeKolonneF = Range("F" & Rows.Count).End(xlUp).Offset(0, -5).Address

SidsteKolonne = ActiveCell.SpecialCells(xlLastCell).Column
SidsteKolonneBogstav = Left(Cells(1, SidsteKolonne).Address(1, 0), _
InStr(1, Cells(1, SidsteKolonne).Address(1, 0), "$") - 1)

Range(SidsteRækkeKolonneF & ":" & SidsteKolonneBogstav & "1").Select