


Сначала номер объекта вычислил:
Код: With Worksheets("TEMP").PivotTables(1)
For i = 1 To .PivotFields.Count
MsgBox .PivotFields(i).Name & " #: " & i
Next
End With
если я делаю одинаковую операцию для N листов, например эту:
Мне думается, что в этом случае надо вставить операцию над листами в отдельную процедуру, которая в качестве параметров принимает координаты в какой-нибудь форме.
запустить процедуру на конкретных листах а не во всей книге
Если листы, для которых это нужно проделать известны, то можно, например создать массив либо с именами листов, либо с их номерами и в цикле перебирать элементы этого массива.
Sheets("Period").Select
Columns("K:AC").Select
Selection.Copy
Sheets("SI").Select
Columns("B:B").Select
К сожалению я так и не понял как сделать отдельную процедуру-(А вообще вы знаете, что такое процедура и функция, как их создавать, как ими пользоваться, как передавать параметры?
можно, например создать массивили сделать какую-нибудь метку на самом листе, чтобы от других отличить. А по поводу массива, то можно завести специальный лист, назвать его "Настройки", и там перечислить все имена тех листов, с которыми надо что-то проделать. Сам так иногда делаю.
Операция Select потенциально медленная и лучше от неё избавиться, но для начала можно оставить, хотя изображение будет мерцать.
чем ее можно заменить?
Цитата: Операция Select потенциально медленная и лучше от неё избавиться, но для начала можно оставить, хотя изображение будет мерцать.
Как это можно сделать? имена листов известны.
необходимо, чтобы в ячеике в1 отображалось последнее число которое>0 из области а1-а30, в этои области может быть и пустые ячеики
Операция Select потенциально медленная и лучше от неё избавиться,
Выдает ошибку. Наверное я что-то на так сделал.
после выполнения макроса ДРОБНЫЕ числа форматируются как текст
эксель открывает другие файлы, извлекает из них данные и заносит в таблицу? Если работает макрос, то пусть он делает то, что Вам нужно (и не более того).
И еще, я не помню, откуда берется переменная (или константа) "Mes"? Это "Public"?
необходимо, чтобы в ячеике в1 отображалось последнее число которое>0 из области а1-а30, в этои области может быть и пустые ячеики
Страницы: 123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133
Предыдущая тема: Написание своего HyperTerminal для считывания данных