О'кейо, препятствовало нам попытаться это временное решение, захватывающ работая шнур и сделаться заменя ть на ем
Sub myName ()
Тусклое pvtTable как PivotTable
Тусклое SQLString как шнур
Установленное pvtTable = ActiveSheet.PivotTables (1)
С pvtTable.PivotCache
SQLString = .CommandText 'вопрос SQL
SQLString = заменяет ть (SQLString, «2008-01-01», «2010-01-01»)
.CommandText = SQLString
Конец с
Подводная лодка конца