I got this much so far from doing hours of searching, but now i get a error saying to set object varible.
Private Sub Command13_Click()
DoCmd.OpenForm "qds actions taken", acFormPivotTable, , , acFormPropertySettings, acWindowNormal
DoCmd.RunCommand acCmdPivotTableExportToExcel...