Добрый день !
В макросе формируется сводная таблица из dbf-файла командой:
Код |
---|
ActiveWorkbook.PivotCaches.Add(SourceType:=xlDatabase, _
SourceData:="[" & dbf & "]" & fname & "!База_данных") _
.CreatePivotTable TableDestination:=Range("A" & Trim(Str(nomstr))), TableName:="СводнаяТаблица"
Set pvt = ActiveSheet.PivotTables("СводнаяТаблица") |
так как до этого dbf-файл сформирован средствами Foxpro и может содержать различные данные, то иногда возникает проблема с превышением максимально допустимого количества столбцов. (256 для Excel ниже 2007). При этом Excel выдает сообщение о превышении этого количества и два варианта дальнейшей работы: показать таблицу обрезанную или отказаться от показа.
Так вот возникает вопрос: а как почувствовать в макросе, что пользователь отказался от показа сводной таблицы, чтобы не выполнять макрос дальше, а завершить работу ?
Или, может, как-то можно подавить это сообщение, чтобы сразу выдавать сводную таблицу в обрезанном варианте.
Спасибо.