Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 06.04.2011, 14:19   #41
19vitek
Пользователь
 
Регистрация: 13.03.2011
Сообщений: 21
По умолчанию

а если попробовать промежуточные итоги или сводную таблицу?
19vitek вне форума Ответить с цитированием
Старый 06.04.2011, 15:02   #42
Pecnekm
Пользователь
 
Регистрация: 04.03.2011
Сообщений: 35
По умолчанию

Цитата:
Сообщение от 19vitek Посмотреть сообщение
а если попробовать промежуточные итоги или сводную таблицу?
Неа, не подходит. К тому же макрос уже готов, в нем просто ошибка где-то небольшая и всё.
Pecnekm вне форума Ответить с цитированием
Старый 06.04.2011, 15:18   #43
Hugo121
Старожил
 
Регистрация: 11.05.2010
Сообщений: 5,166
По умолчанию

Там виновата эта строка:
Код:
Set Rng2 = Range(TopCellDest, Cells(Rows.Count, Left(TopCellDest, 1)).End(xlUp))
Это определение диапазона нужно переделать, тогда глючить перестанет.
Мне сейчас вникать не хочется и некогда...
Хотя глянул...
Код:
    Set Rng2 = Range(TopCellDest, Cells(Rows.Count, Left(TopCellDest, 1)).End(xlUp).Offset(1, 0))
Не идеально, строку ниже прихватывает, но хоть уже работает.
webmoney: E265281470651 Z422237915069 R418926282008

Последний раз редактировалось Hugo121; 06.04.2011 в 15:48.
Hugo121 вне форума Ответить с цитированием
Старый 06.04.2011, 15:50   #44
Nick-1984
Пользователь
 
Регистрация: 05.04.2011
Сообщений: 14
По умолчанию

А если просто дабавить столбец рядом с наименованием авто, писать туда нужную цифру (или ЕСЛИ использовать), задать формулу, а столбцы скрыть чтобы не мешали?
Nick-1984 вне форума Ответить с цитированием
Старый 06.04.2011, 16:03   #45
Pecnekm
Пользователь
 
Регистрация: 04.03.2011
Сообщений: 35
По умолчанию

Цитата:
Сообщение от Hugo121 Посмотреть сообщение
Хотя глянул...
Код:
    Set Rng2 = Range(TopCellDest, Cells(Rows.Count, Left(TopCellDest, 1)).End(xlUp).Offset(1, 0))
Не идеально, строку ниже прихватывает, но хоть уже работает.
Cпасибо, Вам, Hugo, ОГРОМНЕЙШЕЕ!!!
Всё работает!! Что бы я без Вас делал ....
Pecnekm вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Как присвоить одной ячейке несколько значений? Хорошая Девочка Microsoft Office Excel 2 10.10.2010 20:58
Присвоить ячейке StringGrid переменную DimOn4Ik Помощь студентам 6 19.01.2010 16:27
присвоить значение ячейки с курсором ячейке А1 Temnota Microsoft Office Excel 5 24.11.2009 21:10
Как присвоить ячейке имя? Maxx Microsoft Office Excel 2 01.11.2008 11:30
как присвоить значение ячейки R1C1 из 1.xls, допустим какой-нибудь любой ячейке из 2.xls ? diabloskrk Microsoft Office Excel 3 08.10.2007 12:27