Форум программистов, компьютерный форум, киберфорум
VBA
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
VBA Объектная модель: Range https://www.cyberforum.ru/ vba/ thread3078673.html
Добрый день. Подскажите, как записать обращение к Range("A:A") в нотации R1C1?
VBA Фильтрация Excel
Добрый день. Возник вопрос касательно установки фильтров в excel. Когда ставишь фильтры на определенные столбцы, то в маленьком окошке показываются все не повторяющиеся значения ячеек в столбце. Можно ли как-нибудь без использования циклов получить коллекцию или массив значений из этого маленького окошка? Или в любом случае придется делать обход всех ячеек в столбце и формировать коллекцию не...
VBA Макрос для копирования информации с одного листа на другие с отметкой о копировании https://www.cyberforum.ru/ vba/ thread3078621.html
Здравствуйте! Помогите пожалуйста составить макрос для копирования информации с одного листа в другой лист с обязательным потверждением (отметкой) на какой лист информация скопирована. 1. Заполняется общий Лист (колонки B,C,D,E.F). 2. После выделения необходимой строчки и нажав на соответствующую кнопку нужно чтоб содержимое в этой строчки в столбцах C,D,E,F скопировалось в другой Лист....
VBA Все тот же PowerPoint https://www.cyberforum.ru/ vba/ thread3078611.html
Прошло 2 дня, как я начал вникать в VBA, но не всегда досканальное чтение документации помогает. Я сделал эффект вращения вокруг своей оси у объекта вот так: Set support = ActivePresentation.Slides(2).Shapes(2) ActivePresentation.Slides(2).TimeLine.MainSequence.FindFirstAnimationFor(Shape:=support).Delete Set animesupport = ActivePresentation.Slides(2).TimeLine.MainSequence _ ...
VBA Простой макрос powerpoint
Сделал я макрос, чтобы вращалась картинка на рандомное число градусов по клику, этакое колесо фортуны. Но проблема в том, что как один раз генерится число, то каждый раз все равно картинка будет вращаться одинаково. А как сделать, чтобы после каждого вращения заново генерировалось это число градусов (ну или непосредственно при нажатии), чтобы все таки игра была интересная и выдавала рандомные...
VBA Функция Rnd возвращает всегда одно и то же число https://www.cyberforum.ru/ vba/ thread3078541.html
Функция Rnd возвращает всегда одно и то же число, сколько бы раз я функцию ни запускал, с различными параметрами. Это законно вообще?
VBA Создать форму для заполнения листов рабочей книги «Калькуляция тура» https://www.cyberforum.ru/ vba/ thread3078539.html
Помогите товарищи программисты) 1.Создать форму для заполнения листов рабочей книги «Калькуляция тура». Описание проекта формы. 1.1 Создается многостраничная форма (используется элемент управления MultiPage), каждая страница формы предназначена для заполнения одного из рабочих листов калькуляции. 1.2 Страницы для заполнения каждого рабочего листа содержат: − набор полей TextBox для ввода...
Колесо фортуны в Power Point VBA
Привет всем! Внезапно прилетело задание, времени разбираться с новым ЯП нет совершенно. Нужно сделать что-то вроде колеса фортуны в Повер поинте, чтобы оно вращалось какое то рандомное число секунд (или градусов) и останавливалось. Вот именно с генерацией рандомного числа траблы. В повер поинте это не сделать. Как я понял, это можно реализовать с помощью макросов, но как? Вроде не сложно должно...
VBA Изменение высоты строк Excel https://www.cyberforum.ru/ vba/ thread3078359.html
Здравствуйте! Если кто знает, как это сделать на VBA, подскажите, пожалуйста. Задача у меня такая: найти все фразы на листе "Объекты организации (установки, производственное оборудование)" и полностью выделить все строки, где встречается, после чего вывести сообщение, сколько раз встретилось
VBA Определить принадлежит ли точка N(x, y, z) сфере с центром в точке Z(a, b, c) и радиусу r https://www.cyberforum.ru/ vba/ thread3078297.html
Определить принадлежит ли точка N(x, y, z) сфере с центром в точке Z(a, b, c) и радиусу r (нужен код VBA)
VBA Выделение диапазона для поиска информации поочерёдно
Приветствую! Прошу помочь с выбором верного решения для следующей задачи. Есть данные в виде множества столбцов одной строки, условно - это текст из pdf-файла, полностью скопированный в одну ячейку и разбитый по столбцам - разделитель пробел. Единственным однообразием таких данных является уникальная сквозная нумерация разделов по которым необходимо осуществлять поиск нужной информации. То...
VBA Импорт определенной части данных из текстового файла в Excel https://www.cyberforum.ru/ vba/ thread3078095.html
Добрый день, Прошу помощи в создании макроса под импорт данных из текстового файла в Exel, переносимый текст должен начинаться с APM(остальное до APM и после последних значений строки не требуется к обработке), далее данные делятся запятыми по определенным столбцам, необходимо, чтобы данный макрос работал с файлом message_1.txt различного содержания. Строка APM имеет определенную...
2739 / 1714 / 778
Регистрация: 23.03.2015
Сообщений: 5,429
11.02.2023, 22:53 0
Excel

Макрос для xl - VBA - Ответ 16748131

11.02.2023, 22:53. Показов 403. Ответов 3
Метки (Все метки)

Ответ

pps14,
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Sub mmm()
Application.ScreenUpdating = False
lr = Cells(Rows.Count, 48).End(xlUp).Row
lc = Cells(7, Columns.Count).End(xlToLeft).Column
For i = 11 To lr
    For j = 50 To lc
        If Cells(i, j).DisplayFormat.Interior.Color = 5296274 Then
            Cells(i, j).Formula = "=" & Cells(i, 6).MergeArea.Cells(1, 1).Address & " / " & Cells(i, 16).Address
        End If
    Next
Next
Application.ScreenUpdating = True
 
MsgBox "OK"
 
End Sub
А это ваш файл...

Вернуться к обсуждению:
Макрос для xl VBA
Вложения
Тип файла: rar График посуточный11111111111 (3).rar (584.9 Кб, 12 просмотров)
0
Заказать работу у эксперта

Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
11.02.2023, 22:53
Готовые ответы и решения:

Определите макрос SQR с формальными параметрами для вычисления x2, макрос-константу SIZE для задания размера массива и протестируйте работу макроса
Определите макрос SQR с формальными параметрами для вычисления x2, макрос-константу SIZE для...

Макрос: Написать макрос по сравнению двух таблиц для нахождения несоответствий...
знатоки, прошу помощи в еще одном деле: есть два листа, --в одном список: яблоко, груша, слива, ...

Макрос который формирует макрос для универсальных масок ввода
Приветствую! Написал макрос, который формирует код в зависимости от придуманной вами маски ввода...

Сделать макрос в Word, вводишь строку и макрос произвольно меняет шрифт, цвет и размер для каждого слова из этого активного вордовского документа.
Началось VBA - лекций нет, только практика. Препод категоричеки отказывается что-нить объяснять,...

Макрос для вывода определенной выборки для выделенного диапазона
Доброе время суток. С vba мало имел дело, но для экономии времени хочу сделать макрос: 1. Выделяем...

3
11.02.2023, 22:53
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
11.02.2023, 22:53
Помогаю со студенческими работами здесь

Макрос для подсчета сумм для данных из разных книг
Итак, имеются исходные данные находящиеся в различных многостраничных книгах .xls (табличные...

Макрос для вызова окна выбора (цветных флажков) категорий для письма
Добрый день уважаемые специалисты! Я использую следующий макрос для быстрой кнопки выбора...

Нужен макрос для word, устанавливающий для всех точек в документе 40 размера шрифта
помогите пожалуста:(

Макрос для вызова окна выбора (цветных флажков) категорий для письма в Outlook
Добрый день уважаемые специалисты! Я использую следующий макрос для быстрой кнопки выбора...

Макрос для подсчета среднего балла для каждого студента и закрасить ячейки с фамилиями
срочно нужна помощь Дан файл с таблицей успеваемости. Написать макрос для подсчета среднего балла...

Нужен макрос для CorelDraw 11 для автоматизации процесса
Нужен макрос для CORELDRAW 11 для автоматизации процесса

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru