Как покрасить в Excel столбец по условию ??? / Visual Basic

ReSQL.ru

Мобильная версия Контакт Правила FAQ Помощь

Гость

Войти | Регистрация | Профиль | Очистить

Новые сообщения | Избранное

Форумы | Пользователи | Статистика | Мод. лог | Поиск

Цитировать

Написать

Автор*:

Ввести пароль для входа

Тема*:

Сообщение

Данное сообщение тематическое

Сообщение содержит картинки или видео 18+

Автор:

ВНИМАНИЕ! На данном подфоруме действуют строгие правила. Удостоверьтесь, что ваше сообщение соответствует им!

Форум или тема закрыты для гостей. Необходима авторизация!

Загрузить последнюю сохраненную версию

Вложение:

Вставить как галерею

Максимальный размер вложений: 4,0 МБ, аудио/видео: 8,0 МБ. Картинки большего размера ужимаются, если возможно.

Введите код, изображенный на картинке. Если код нечитаемый, кликните картинку, чтобы загрузить другой вариант.

Отправляя сообщение, я выражаю свое согласие с правилами форума и принимаю пользовательское соглашение.

Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр

Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Как покрасить в Excel столбец по условию ???

6 сообщений из 6, страница 1 из 1

Как покрасить в Excel столбец по условию ???

#35892856

Valeriu

Участник

Откуда: Chisinau

Сообщения: 2 212

Рейтинг: 0 / 0

Здравствуйте !!!
Собственно сабж...
В Excel експортирую какие-то данные :

Код: plaintext

1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.

Private Sub exc_Click()
Dim n As Integer, n1 As Integer
Dim i As Integer
Dim Dat  As String, Ret As String, Er As String
Dim Rut As Integer
Dim objExcel As Excel.Application

On Error GoTo Error

Set objExcel = New Excel.Application
objExcel.Workbooks.Add ("D:\Raport\BN.xls")
.
.
.
 If InStr("Строка","L") Then
 objExcel.Cells(n, n1).Value = "L"  ' Столбик n1 покрасить цветом ???
 End If

Спасибо.

...

Рейтинг:

0 / 0

26.03.2009, 10:46

| Ответить | Цитировать | Написать

Как покрасить в Excel столбец по условию ???

#35893248

Krasnaja Shapka

Гость

пользуйся меню / макросы / запись нового макроса

...

Рейтинг:

0 / 0

26.03.2009, 12:15

| Ответить | Цитировать | Написать

Как покрасить в Excel столбец по условию ???

#35895001

big-duke

Участник

Сообщения: 6 245

Рейтинг: 0 / 0

Krasnaja Shapka,
не говорите ерунды.

Valeriu , используйте условное форматирование.

...

Рейтинг:

0 / 0

26.03.2009, 20:51

| Ответить | Цитировать | Написать

Как покрасить в Excel столбец по условию ???

#35903021

Krasnaja Shapka

Гость

какая ерунда если требуется VBA решение и условие уже есть???

...

Рейтинг:

0 / 0

31.03.2009, 13:25

| Ответить | Цитировать | Написать

Как покрасить в Excel столбец по условию ???

#35905543

PlanB

Участник

Откуда: Moscow

Сообщения: 2 731

Рейтинг: 0 / 0

Valeriu,

Код: plaintext

Columns(n1).Interior.ColorIndex =  6

...

Рейтинг:

0 / 0

01.04.2009, 13:12

| Ответить | Цитировать | Написать

Как покрасить в Excel столбец по условию ???

#35914747

Skiffspb

Участник

Откуда: Спб

Сообщения: 86

Рейтинг: 0 / 0

PlanBValeriu,

Код: plaintext

Columns(n1).Interior.ColorIndex =  6

или просто .Interior.Color - тогда можно не просто индекс из стандартной палитры, а полноценный RGB подсовывать (если стандартных цветов недостаточно, или делается экспорт цвета из сторонней программы, ничего про эекселевсие "индексы" и понятия не имеющей).

...

Рейтинг:

0 / 0

06.04.2009, 15:28

| Ответить | Цитировать | Написать

6 сообщений из 6, страница 1 из 1

Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Как покрасить в Excel столбец по условию ???

Читали тему (0):

Читали форум (0):

Пользователи онлайн (0):

start [/forum/topic.php?fid=60&gotonew=1&tid=2161171]:	0ms
get settings:	11ms
get forum list:	20ms
check forum access:	5ms
check topic access:	5ms
track hit:	72ms
get topic data:	11ms
get first new msg:	6ms
get forum data:	2ms
get page messages:	52ms
get tp. blocked users:	1ms
others:	230ms

total:	415ms

	Необходимые cookie
	Cookie для сбора статистики
	Cookie для маркетинга и рекламы