v7: Отключить фильтрацию в excel
☑
0
userMR3
25.10.11
✎
00:07
Выгружаю в 1с данные из excel, кол-во строк = 1, после того как стали делать фильтрацию.
Написал так:
Excel.ActiveSheet.ShowAllData();
получил ошибку:
Значение не является значением объектного типа (ShowAllData)
1
SnarkHunter
25.10.11
✎
00:11
Внимание, вопрос...
2
userMR3
25.10.11
✎
00:27
Как отключить фильтрацию в excel программно через 1с?
3
mikecool
25.10.11
✎
00:36
открой же для себя запись макроса...
4
КонецЦикла
25.10.11
✎
01:45
(1) :)
5
userMR3
25.10.11
✎
14:24
up
6
marty0701
25.10.11
✎
14:26
(5)Макрос в Екселе запиши и посмотри, тебе же уже помогли.
7
userMR3
25.10.11
✎
14:41
Нужно делать через внешнюю обработку 1с, каждый раз поступают файлы с фильтрацией. А макрос я так понимаю через сам эксель надо запускать?
8
Lepochkin
25.10.11
✎
15:48
наверняка поможет
9
userMR3
25.10.11
✎
15:52
(8) спс, посмотрю.
Хмм, че то думал, что фильтрацию просто будет убрать.
10
FN
25.10.11
✎
15:58
лентяй!
ф=Ексель.Cells.Select; //выделяем все ячейки
ф=Ексель.Selection.AutoFilter; //ставим автофильтр
ф=Ексель.Selection.AutoFilter; //снимаем автофильтр
ф=Ексель.Selection.AutoFilter; //ставим автофильтр
ф=Ексель.Selection.AutoFilter; //снимаем автофильтр
ф=Ексель.Selection.AutoFilter; //ставим автофильтр
ф=Ексель.Selection.AutoFilter; //снимаем автофильтр
ф=Ексель.Selection.AutoFilter; //ставим автофильтр
ф=Ексель.Selection.AutoFilter; //снимаем автофильтр
ф=Ексель.Selection.AutoFilter; //ставим автофильтр
ф=Ексель.Selection.AutoFilter; //снимаем автофильтр
ф=Ексель.Selection.AutoFilter; //ставим автофильтр
ф=Ексель.Selection.AutoFilter; //снимаем автофильтр
ф=Ексель.Selection.AutoFilter; //ставим автофильтр
ф=Ексель.Selection.AutoFilter; //снимаем автофильтр
ф=Ексель.Selection.AutoFilter; //ставим автофильтр
ф=Ексель.Selection.AutoFilter; //снимаем автофильтр
и так пока не надоест
11
Tatitutu
25.10.11
✎
15:59
(0) а откуда ты вообще взял ShowAllData() ?
если даже в справке VBA
Worksheets("Sheet1").ShowAllData
и что ты называешь фильтрацией
Selection.AutoFilter
Чтобы обнаруживать ошибки, программист должен иметь ум, которому доставляет удовольствие находить изъяны там, где, казалось, царят красота и совершенство. Фредерик Брукс-младший