Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/ОшЫбка? свойства End(xlUp), или что в ячейках файла - Мир MS Excel

Регистрация · Логин: · Пароль: · · Забыли пароль?
Страница 1 из 11
Модератор форума: _Boroda_, Pelena, Manyasha, SLAVICK 
Мир MS Excel » Вопросы и решения » Вопросы по VBA » ОшЫбка? свойства End(xlUp), или что в ячейках файла (Макросы/Sub)
ОшЫбка? свойства End(xlUp), или что в ячейках файла
RAN Дата: Воскресенье, 18.06.2017, 11:08 | Сообщение № 1
Группа: Друзья
Ранг: Участник клуба
Сообщений: 4478
Репутация: 905 ±
Замечаний: 0% ±

2010
Мяв!
Получил файл выгрузки, в котором свойство End(xlUp) не правильно находит последнюю ячейку.
Это не один сломанный файл, а все файлы, полученные данной выгрузкой.
Воссоздать подобное вручную не получается.
В XML строка выглядит так
<row r="17" spans="1:2" x14ac:dyDescent="0.2"><c r="A17" s="1" t="s"><v>0</v></c><c r="B17" s="1" t="s"><v>0</v></c></row>
Вопрос, что-же в этих ячейках, и как оно получается?
И тут тоже
[p.s.]Ошибка, ему, виш-ли не ндравится![/p.s.]
К сообщению приложен файл: TEST1.xlsm(18Kb)


Быть или не быть, вот в чем загвоздка!
 
Ответить
СообщениеМяв!
Получил файл выгрузки, в котором свойство End(xlUp) не правильно находит последнюю ячейку.
Это не один сломанный файл, а все файлы, полученные данной выгрузкой.
Воссоздать подобное вручную не получается.
В XML строка выглядит так
<row r="17" spans="1:2" x14ac:dyDescent="0.2"><c r="A17" s="1" t="s"><v>0</v></c><c r="B17" s="1" t="s"><v>0</v></c></row>
Вопрос, что-же в этих ячейках, и как оно получается?
И тут тоже
[p.s.]Ошибка, ему, виш-ли не ндравится![/p.s.]

Автор - RAN
Дата добавления - 18.06.2017 в 11:08
KuklP Дата: Воскресенье, 18.06.2017, 11:15 | Сообщение № 2
Группа: Проверенные
Ранг: Старожил
Сообщений: 2188
Репутация: 466 ±
Замечаний: 0% ±

2003-2010
Андрей, попробуй так:
[vba]
Код
Sub lsR()
    Dim lr&
    Columns(2) = Application.Trim(Columns(2))
    lr = Sheets(1).Cells(Sheets(1).Rows.Count, "B").End(xlUp).Row
    MsgBox lr
End Sub
[/vba]


Ну с НДС и мы чего-то стoим! kuklp60@gmail.com
WM Z206653985942, R334086032478, U238399322728
 
Ответить
СообщениеАндрей, попробуй так:
[vba]
Код
Sub lsR()
    Dim lr&
    Columns(2) = Application.Trim(Columns(2))
    lr = Sheets(1).Cells(Sheets(1).Rows.Count, "B").End(xlUp).Row
    MsgBox lr
End Sub
[/vba]

Автор - KuklP
Дата добавления - 18.06.2017 в 11:15
KuklP Дата: Воскресенье, 18.06.2017, 11:20 | Сообщение № 3
Группа: Проверенные
Ранг: Старожил
Сообщений: 2188
Репутация: 466 ±
Замечаний: 0% ±

2003-2010
И
[vba]
Код
Application.clean(Columns(2))
[/vba]тоже работает.


Ну с НДС и мы чего-то стoим! kuklp60@gmail.com
WM Z206653985942, R334086032478, U238399322728
 
Ответить
СообщениеИ
[vba]
Код
Application.clean(Columns(2))
[/vba]тоже работает.

Автор - KuklP
Дата добавления - 18.06.2017 в 11:20
RAN Дата: Воскресенье, 18.06.2017, 11:26 | Сообщение № 4
Группа: Друзья
Ранг: Участник клуба
Сообщений: 4478
Репутация: 905 ±
Замечаний: 0% ±

2010
В файле ДВА правильно работающих макроса


Быть или не быть, вот в чем загвоздка!
 
Ответить
СообщениеВ файле ДВА правильно работающих макроса

Автор - RAN
Дата добавления - 18.06.2017 в 11:26
KuklP Дата: Воскресенье, 18.06.2017, 11:28 | Сообщение № 5
Группа: Проверенные
Ранг: Старожил
Сообщений: 2188
Репутация: 466 ±
Замечаний: 0% ±

2003-2010
Гы) Я дальше первого не ходил.


Ну с НДС и мы чего-то стoим! kuklp60@gmail.com
WM Z206653985942, R334086032478, U238399322728
 
Ответить
СообщениеГы) Я дальше первого не ходил.

Автор - KuklP
Дата добавления - 18.06.2017 в 11:28
Мир MS Excel » Вопросы и решения » Вопросы по VBA » ОшЫбка? свойства End(xlUp), или что в ячейках файла (Макросы/Sub)
Страница 1 из 11
Поиск:

Яндекс цитирования
© 2010-2017 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!