L'approvazione, li ha lasciati provare questa azione alternativa, bloccando la stringa di funzionamento e farle una sostituzione
myName secondario ()
pvtTable fioco come PivotTable
SQLString fioco come stringa
pvtTable stabilito = ActiveSheet.PivotTables (1)
Con pvtTable.PivotCache
SQLString = .CommandText 'la domanda di SQL
SQLString = sostituisce (SQLString, “2008-01-01„, “2010-01-01„)
.CommandText = SQLString
Estremità con
Sommergibile dell'estremità