|
|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail | |||||||
| Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
||||
 |
|
|
Опции темы | Поиск в этой теме |
19.02.2011, 10:07
|
#1 |
|
Форумчанин
Регистрация: 31.12.2010
Сообщений: 113
|
заливка
скажите, пожалуйста, как сделать так, чтобы заливка была не до конца страницы, а до последней строки. в которую внесены данные, при условии что номер последней строки всегда разный.
Columns("A:Q").EntireColumn.Interio r.ColorIndex = 41 |
|
|
|
19.02.2011, 10:37
|
#2 |
|
Старожил
Регистрация: 15.05.2008
Сообщений: 2,058
|
Определяем номер последней заполненной строки iRow и
Range("A1:Q" & iRow).EntireColumn.Interior.ColorIn dex = 41
"Дайте людям рыбы, и вы накормите их на весь день; научите их ловить рыбу - и вы накормите их на всю жизнь"
"Большое спасибо" - Z261597841314, R208907249777, U447361470499 |
|
|
|
|
19.02.2011, 11:09
|
#3 |
|
Новичок
СтарожилДжуниор
Регистрация: 05.02.2008
Сообщений: 9,487
|
Columns("A1:Q" & UsedRange.SpecialCells(xlCellTypeLa stCell).Row).Interior.ColorIndex = 41
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
|
|
|
|
|
19.02.2011, 11:22
|
#4 |
|
Форумчанин
Регистрация: 31.12.2010
Сообщений: 113
|
IgorGO,
usedrange в моем макросе распознается как просто переменная, то есть выходит ошибка о том что не объявлена переменная |
|
|
|
|
19.02.2011, 11:44
|
#5 |
|
Старожил
Регистрация: 15.05.2008
Сообщений: 2,058
|
а так если?
Range("A1:Q" & Cells.SpecialCells(xlLastCell).Row) .Interior.ColorIndex = 41 у меня работает
"Дайте людям рыбы, и вы накормите их на весь день; научите их ловить рыбу - и вы накормите их на всю жизнь"
"Большое спасибо" - Z261597841314, R208907249777, U447361470499 |
|
|
|
|
19.02.2011, 11:49
|
#6 |
|
Форумчанин
Регистрация: 31.12.2010
Сообщений: 113
|
VictorM,
да, так получилось. спасибо! |
|
|
|
|
| Опции темы | Поиск в этой теме |
Похожие темы
|
||||
| Тема | Автор | Раздел | Ответов | Последнее сообщение |
| Заливка таблиц | CyberMen | Microsoft Office Word | 6 | 18.08.2010 20:13 |
| заливка изображений | kirosin | PHP | 5 | 27.06.2010 18:46 |
| Заливка Гуро | Alenkakiss | C++ Builder | 1 | 07.03.2010 12:48 |
