Поиск  Пользователи  Правила 
Закрыть
Логин:
Пароль:
Забыли свой пароль?
Регистрация
Войти
 

Страницы: 1
Поиск
Копирование диапазона до последней заполненной строки учитывая пустоты
Автор: BUVS. Коллеги, прошу извинить за возможный повтор. В данный момент макрос учитывает пустоты и стопориться на них(копирует данные до пустот), что логично)). Что нужно вписать, чтобы диапазон копировался до конца вместе с пустотами? For i = 1 To 50 If Cells(1, i).Value = "Dest. Storage Type" Then Range(Cells(1, i), Cells(1, i).End(xlDown)).Copy Worksheets("LT23").Range("V1") Exit For End If Next i Или не замарачиваться и вписать?Range(Cells(1, i)...
Изменен: 27 Янв 2017
Читать сообщение на форуме или сайте.
Макрос по поиску последней заполненной ячейки в столбце постоянно ошибвается.
Автор: Fleshsam. Добрый день! файл очень большой с кучей макросов но вот в чем проблема!  при запуске формы выполняется такая часть макроса по заполнению LISTBOXаV = Cells(Rows.Count, 1).End(xlUp).Row RKES_data = Sheets("РКЭС").Range("A1:A" & V) RKES.List = RKES_data в этой строке 24 значения! Но почему то V=279  279 строка пустая  Удаляю строку 279 и все ок, проходит время и опять 279.  Другие макросы на этом листе отсутствую  Как понять в чем проблема и выловит косяк?? ...
Изменен: 16 Дек 2016
Читать сообщение на форуме или сайте.
Добавление данных в конец таблицы на VBA
Автор: guri. Помогите, пожалуйста, найти ошибку. Написала макрос на заполнение таблицы данными из другого файла. Проблема в том, что при следующем заполнении происходит замена уже имеющихся данных. А надо что б новые данные добавились ниже. Sub zzzzz() Dim Arr(1000, 40)     MsgBox "Укажите путь к сбыту"     FilePath1 = Application.GetOpenFilename()     MsgBox "Укажите путь к заполняемому файлу"     FilePath2 = Application.GetOpenFilename() Workbooks.Open Filename:=FilePath1...
Изменен: 26 Янв 2016
Читать сообщение на форуме или сайте.
Страницы: 1
Наверх