Подскажите возможные варианты решения вопроса! Пожалуйста. Макрос выдает ошибку http://clip2net.com/s/3qaeaRk при работе с большим количеством данных. Файл представляет собой 30 различных услуг с ценами и временем работ http://clip2net.com/s/3qauYqX - Лист1. Лист2 - после обработке макросом http://clip2net.com/s/3qavXgz. Пока в файле 544 строки - 548 КБ. Будет больше. При малом количестве - макрос отрабатывает. Приложил файл только с одной строкой.
Sub Del_Empty_Rows()
Const lCol As Long = 6
Const lFirstRow As Long = 2
Dim li As Long, lLastRow As Long, lCalc As Long
With Application
.ScreenUpdating = 0: lCalc = .Calculation: .Calculation = xlManual
For li = ActiveSheet.UsedRange.Row + ActiveSheet.UsedRange.Rows.Count - 1 To lFirstRow Step -1
If Cells(li, lCol) = "" Then Rows(li).Delete
Next li
.ScreenUpdating = 1: .Calculation = lCalc
End With
End Sub
Удаляет строки, когда в 6 столбце ячейка пустая. Подскажите пожалуйста, как изменить условие, чтоб строки удалялись, если в строке ячейки пустые в 6,7,8 столбцах. Спасибо.
Здравствуйте. Буду рад помощи! Стояла задача по наполнению одной таблицы на Лист1, формировать таблицу на Лист2, цены: Стоимость работ, Работы + ориг.запчасти, Работы+неоригин. запчасти - выводить для услуг в отдельную строчку, что было и реализовано. Сейчас задача видоизменена - для услуг, цены: Стоимость работ, Работы + ориг.запчасти, Работы+неоригин. запчасти - выводить в одну строку по столбцам, т.е., например, строка должна иметь вид: Toyota; Camry; 2.0 AT (148 л.с.) бензин; Плановое ТО 15000 км; 3000; 3500; 3200; 120.
Добрый день, уважаемые специалисты. Помогите, пожалуйста, со следующей задачей: Если на Листе1 в ячейках столбцов Е, F, G есть числовое значение, допустим в ячейках: Е8 (равна 3000), F8 (равна 6000), G8 (равна 4000), Е16 (равна 3500), F16 (равна 7000), G16 (равна 4800), то на Листе2, необходимо, например для E8, вывести в строку значения ячеек А8, B8, C8, E1, E2, H2 в указанном порядке, т.е.: Toyota, Camry, 2.4 AT (167 л.с.) бензин, Плановое ТО 15000 км, Стоимость работ, 3000, 120. И так выводить строки с соответствующими значениями для всех имеющихся числовых значений в столбцах Е, F, G.
Помогите пожалуйста... Есть макросы для вставки и удаления строк, которые почему-то не работают, помогите разобраться. (лист "ЭОС" защищен - 123) Большое спасибо заранее.
Невозможно внести изменения в ячейке Microsoft Excel 2007. при выборе ячейки и ее редактировании всплывает окно с текстом: ячейка или диаграмма защищена от изменения. чтобы изменить защищенную ячейку или диаграмму, снимите защиту при помощи "Снять защиту листа" и т.д.... А сама кнопка "снять защиту листа " не активна.