Форум программистов, компьютерный форум, киберфорум
VBA
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.77/13: Рейтинг темы: голосов - 13, средняя оценка - 4.77
0 / 0 / 0
Регистрация: 30.05.2020
Сообщений: 29

Сгенерировать числа и закрасить красным цветом значение

31.05.2020, 09:33. Показов 2782. Ответов 3
Метки vba (Все метки)

Студворк — интернет-сервис помощи студентам
Сгенерировать в выделенном столбце диапазоне числа от -100 до 100. Закрасить красным цветом значение, которое максимально отличается от среднего арифметического значения в этом диапазоне.
0
Лучшие ответы (1)
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
31.05.2020, 09:33
Ответы с готовыми решениями:

RecyclerView закрасить красным цветом пространство удаленного элемента
Здравствуйте! Пытаюсь создать свой аниматор для RecyclerView... Для этого спер написал базовый класс (дубликат DefaultItemAnimator) И...

Закрасить ячейки, лежащие выше главной и дополнительной диагоналей красным цветом
Помогите пжл на VB.Net Дана матрица NxN (4<N<10). Закрасить ячейки, лежащие выше главной и дополнительной диагоналей красным цветом. ...

В NetBeans в JTable1 закрасить одну ячейку красным цветом по нажатию кнопки
Срочно надо!!!! Помогите кто может... Надо в NetBeans в JTable1 закрасить одну ячейку красным цветом, по нажатию кнопки. ячейка...

3
Заблокирован
31.05.2020, 11:18
Ксеша2019, Здравствуйте!
вас не учили общению?
Кто и кому должен закрасить?
0
 Аватар для Narimanych
2751 / 1725 / 779
Регистрация: 23.03.2015
Сообщений: 5,449
31.05.2020, 13:07
Лучший ответ Сообщение было отмечено Ksesha2019 как решение

Решение

Ksesha2019,
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Sub MMM()
MaxM = 0
i = 1
For Each Cell In Selection
    Cell.Value = Int((201) * Rnd - 100)
    AV = (AV + Cell.Value) / i
        If Abs(AV - Cell.Value) >= MaxM Then
            MaxM = Cell.Value
            i = i + 1
        End If
Next
Selection.Font.Color = vbBlack
 
For Each Cell In Selection
If Cell.Value = MaxM Then Cell.Font.Color = vbRed
Next
End Sub
0
0 / 0 / 0
Регистрация: 30.05.2020
Сообщений: 29
31.05.2020, 14:49  [ТС]
Огромное спасибо!!!!!!
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
31.05.2020, 14:49
Помогаю со студенческими работами здесь

Как закрасить красным цветом строки DbGrid, которые совпадают с системной датой
Всем привет, не подскажите как закраситть красным цветом строки, которые совпадают с системной датой

Вывести на экран монитора эллипс и закрасить его красным цветом с заполнением плотными точками
Вывести на экран монитора эллипс и закрасить его красным (Red) цветом с заполнением плотными точками (CloseDotFill), цвет фона экрана...

Вывести на экран все элементы массива в строчку и закрасить последний отрицательный элемент красным цветом
Мой массив: Program P9_1_2_3; Uses Crt; Type Mas = array of integer; Var B : Mas; i,p,Min,iMin: integer; S,d:real; Begin...

Вывести на экран монитора квадрат и закрасить его светло-красным цветом с обратной наклонной заполнением
Вывести на экран монитора квадрат и закрасить его светло-красным (LightRed) цветом с обратной наклонной заполнением (LtBkSlashFill), цвет...

Клетки StringGrid, в которых четные числа закрасить красным, нечетные - синим цветами.
помогите решить) Заполнить StringGrid случайными натуральными числами. Клетки, в которых четные числа закрасить красным, нечетные синим...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Новые блоги и статьи
делаю науч статью по влиянию грибов на сукцессию
anaschu 13.03.2026
прикрепляю статью
SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++
8Observer8 10.03.2026
Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:
Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE
8Observer8 10.03.2026
Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .
Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки
Neotwalker 08.03.2026
Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .
Модульная разработка через nuget packages
DevAlt 07.03.2026
Сложившийся в . Net-среде способ разработки чаще всего предполагает монорепозиторий в котором находятся все исходники. При создании нового решения, мы просто добавляем нужные проекты и имеем. . .
Модульный подход на примере F#
DevAlt 06.03.2026
В блоге дяди Боба наткнулся на такое определение: В этой книге («Подход, основанный на вариантах использования») Ивар утверждает, что архитектура программного обеспечения — это структуры,. . .
Управление камерой с помощью скрипта OrbitControls.js на Three.js: Вращение, зум и панорамирование
8Observer8 05.03.2026
Содержание блога Финальная демка в браузере работает на Desktop и мобильных браузерах. Итоговый код: orbit-controls-threejs-js. zip. Сканируйте QR-код на мобильном. Вращайте камеру одним пальцем,. . .
SDL3 для Web (WebAssembly): Синхронизация спрайтов SDL3 и тел Box2D
8Observer8 04.03.2026
Содержание блога Финальная демка в браузере. Итоговый код: finish-sync-physics-sprites-sdl3-c. zip На первой гифке отладочные линии отключены, а на второй включены:. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru