Раскрасить ячейки по диапазону значений после их рандомного заполнения - VBA

  1. Заполнить любые 10 ячеек случайными числами в диапазоне от 1 до 90 и раскрасить их разными цветами в следующем порядке: от 1 до 30 - желтый; от 31 до 60 - синий; от 61 до 90 - зеленый.


textual

Код к задаче: «Раскрасить ячейки по диапазону значений после их рандомного заполнения - VBA»

Cells(i, 1).Interior.Color = vbYellow

СДЕЛАЙТЕ РЕПОСТ

15   голосов, оценка 4.133 из 5



Похожие ответы
  1. Пытаюсь скопировать часть текста из ячейки ворда. все содержимое копируется. не получается скопировать часть текста. "1. Руководитель Департамента АА - Иванов 2. Руководитель Управления ВВ - Петров". Нужно в ячейку поставить "Департамента АА", в лучшем случае на следующую строку еще "Управления ВВ".

  1. Здравствуйте. Надо извлечь несколько данных находящихся в одной ячейке на разных позициях, не знаю как лучше объяснить:Арктикул: 5177 Цвет:белый DEWSPO FOIL, PRIN тиси Рост: 134-164 Наличие: в наличии 950.00 рублей Арктикул: 5177 Цвет:серебро DEWSPO FOIL, PRIN тиси Рост: 134-164 Наличие: в наличии 950.00 рублей Арктикул: 5177 Цвет: голубой Мне нужно, только названия цветов (белый, серебро, голубой)перенести в другую ячейку, желательно что бы они, были сразу через запятую или точку с запятой.

  1. Доброго времени суток! Не силен в VBA, поэтому прошу помощи. Имеется файл, в котором есть чередующиеся столбцы: время, значение. Необходимо находить время (с погрешностью в минуту и с шагом в 10 минут, допустим 00:00:, следующее 00:10: и т.д. до 23:50, а соответствующее ему значение в соседнем справа столбце копировать на лист 2. Так с каждым столбцом со временем (A,C,E,G,I,K,M,O,Q,S,U,W,Y), значения копировать в строку на лист 2. Буду очень признателен за помощь

  1. Суть такова: Есть два листа в Excel ("Данные" и "Таблица") необходимо перенести данные из столбца "N3:N7" листа "данные" сначала в столбец "В3:B7" затем в столбец "С3: C7" затем в столбец "D3: D7" и т.д. листа "таблица" так как значения в ячейках "N3:N7" будут меняться. Пробовал написать макрос, я честно говоря чайник в этом, излазил кучу форумов и ссылок и так и не нашел как же можно скопировать данные в первую пустую ячейку строки 3 например, в моем случае. Заранее огромное спасибо! P.S. файлик пользуется динамическим обменом данных (ДРВ)

  1. Добрый день! Чтобы присвоить ячейке значение из макроса пишу так: Cells(1,1).Value="АБВГД" или Range("A1").value="АБВГД" Есть ли способ сделать, чтобы когда пользователь вставил перед нужной нам ячейкой из макроса произвольное количество строк или столбцов, то в макросе автоматически изменялся этот адрес "А1" ?

  1. Пожалуйста, помогите с этой проблемой. Суть вот в чем: у меня получилось записать макрос который бы делал картинку меньше в заданное кол-во раз, но мне нужно заменить это число на переменную(изначально в макросе вместо переменной hight стояло значение 0.99). Но всякий раз когда я пытаюсь запустить макрос выводится следующее: "Compile error: invalid outside procedure". Вот код макроса:

  1. подскажи пожалуйста, как вытащить символы (буквы и пр.) после цифр из ячейки? т.е. предполагаю что надо сначала определить последнюю (слева на право) цифру, а затем вытащить все что есть после нее массивправильный ответпро 123456789 прот прот"12345678, 321 ,ййй ,ййй8777лл "п"ролл "п"ро456 ро 123458 ццц 444 длдлддлдлд

  1. Подскажите пожалуйста, как вытащить из ячейки все символы кроме цифр в ответе где два пробело д.б. подряд неотобразились в таблице, но логика понятна (все кроме цифр) правильный ответ123456789, 123 лесоповал лес, лесоповал лес1234567812345678 3241, "ййй" , "ййй"8777лл про лес лл про лес4586 ро 123458 ро ццц 444 5556; длдлдццц ; длдлд

  1. Подскажите пожалуйста, как вытащить из ячейки только значение из 3 знаков (значение из 3 числовых знаков в массиве неповторяется) примермассивправильный ответ123456789, 12312312345678 321 ййй3218777лл про 056 ро 123458056ццц 444 длдлд444