Страницы: 1
Поиск
Ввода данных в определенные ячейки через форму VBA
Автор: Ivan Timurov. Доброго времени суток! Уважаемые форумчане, создал две таблицы на 1 листе. Данные вводятся через две формы, по одной форме на таблицу, открывающиеся по нажатию кнопок. В первую таблицу данные вводятся по порядку, проверяю, если пустая ячейка – данные вводятся.  Во вторую таблицу данные должны вводится в определенные ячейки. Просто так вводить данные я не могу, поскольку лист защищен паролем (пароль снимается при вводе данных с формы). Подскажите, можно ли сделать так, чтобы ...
Изменен: 24.12.2022
Читать сообщение на форуме или сайте.
Макрос для Рандомного текста, Макрос
Автор: Вфьшфт Makarov. Здравствуйте, не знаю как правильно писать макросы. Задачка такая есть 7 столбцов с разным текстом. Нужно что бы в 8-ом столбце были случайные вариации текста колонок Есть такой вариант макроса но он не охватывает все столбцы Sub Random()   Dim r&, rn&, c&, s$   Randomize: rn = Cells(Rows.Count, 1).End(xlUp).Row   Columns(5).ClearContents   r = 100 + Rnd * 100   For r = 1 To r     s = ""     For c = 1 To 3       s = s & Cells(1 + Int(Rnd * rn), c) & " " ...
Изменен: 29.08.2022
Читать сообщение на форуме или сайте.
Макрос VBA который работает по предварительно установленному времени
Автор: Богдан Кох. Добрый день Нужен макрос, который будет запускаться в книге в 08:00 и 20:00 и будет содержать эти две команды. Thisworkbook.Save Thisworkbook.Close
Изменен: 09.02.2022
Читать сообщение на форуме или сайте.
Повторение (или зацикливание) макроса для каждого листа
Автор: Евгений Женькин. Здравствуйте, помогите упростить макрос. Нужно зациклить или повторить макрос, чтобы на каждом листе заменялись данные с определенной строки листа "данных". Выглядит макрос так: Sub Замена()     Sheets("99 (2)").Select     Cells.Replace What:="99", Replacement:="2", LookAt:=xlPart, SearchOrder _         :=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False     Sheets("99 (3)").Select     Cells.Replace ...
Изменен: 13.07.2021
Читать сообщение на форуме или сайте.
Копирование динамического диапозона данных формы и вставка в таблицу учета
Автор: Cappuccino. Добрый день форумчане...  Пытаюсь по маленьку осмыслить VBA в excel по методу практического применения  :D , но нужна помощь спецов, так как немного не понятны некоторые вещи. Файлик прикрепил, для примера (Необходимо чтобы было следующее): На листе "ФормаВвода", вводится требование, затем по нажатию кнопки "Ввод" копируем данные требования в таблицу на лист "Учет Приход_Расход". Лист "ФормаВвода", ...
Изменен: 18.09.2020
Читать сообщение на форуме или сайте.
Возможно ли ограничить количество срабатываний макроса для ячейки?
Автор: Ostraya. Здраствуйте.  Имеется таблица, в которой ведется учет клиентов детской комнаты. По сути - журнал посещений. Время прибытия ребенка, после заполнения ячейки "Имя" , автоматически ставится в ячейку напротив макросом: Private Sub Worksheet_Change(ByVal Target As Range)           For Each cell In Target        If Not Intersect(cell, Range("A:A")) Is Nothing Then             With cell.Offset(0, 3)                .Value = Now                .EntireColumn. ...
Изменен: 24.02.2020
Читать сообщение на форуме или сайте.
Получение расстояния из Yandex карт. от точки до точки., Нужно сделать авто-маршрутный лист.
Автор: drtugrik. Доброго дня. Требуется получать расстояния от сервера Yandex, на основании 2-х значений текстового поля. При этом значения вводятся зачастую некорректно. В связи с этим в дополнительные поля потребуется вернуть ещё и значения определившихся адресов. Пример во вложении.
Изменен: 04.08.2019
Читать сообщение на форуме или сайте.
Обьединение 2-х макросов в рамках одной процедуры "Worksheet_Change"
Автор: a.m.v.. Всем привет.  Прошу помощи. Только начал разбираться в макросами, поэтому не знаю как сделать. Задача: необходимо проставлять даты изменений в двух ячейках на одном листе. Есть одинаковые макросы (ниже), но с различными адресами ячеек. Понимаю что нужно сделать все в рамках одной процедуры "Worksheet_Change". Но как правильно объединить - так и не осилил. Макрос №1 Private Sub Worksheet_Change(ByVal Target As Range)'Update 20140722 Dim WorkRng As Range Dim ...
Изменен: 20.07.2019
Читать сообщение на форуме или сайте.
Включение макроса на одном листе, скрытие строки на другом
Автор: so-yuze. Добрый день, уважаемые эксперты. Есть макрос, который при активации открывает строку с определенным номером и открывает спрятанный в книге лист. Private Sub CheckBox1_Change() If CheckBox1.Value = True Then         Rows("5:5").Hidden = False         Sheets("План1").Visible = True     Else         Rows("5:5").Hidden = True         Sheets("План1").Visible = False     End If End Sub Как сделать так, чтобы сам макрос активировался на ...
Изменен: 12.06.2019
Читать сообщение на форуме или сайте.
Создание итоговых данных по заполненной таблице, Как реализовать добавление нужных строк в итоговую таблицу
Автор: Лямкин. Доброго времени суток, знатоки Excel! Может кто поможет объяснить, как реализовать одну задачу? А именно:  Есть книга, на первом листе "Данные" есть таблица выполненных работ рабочих. Данная таблица в течение месяца заполняется ответственным. По окончании периода необходимо формировать отдельные листы с итоговыми данными по каждому рабочему из данной таблицы. Но в итоговой таблице необходимо добавлять строчками те виды работ, которые были заполнены, как ...
Изменен: 13.08.2018
Читать сообщение на форуме или сайте.
Заполнение пустых строк, строкой расположенной выше. Макрос. Excel.
Автор: Klon. Доброго времени суток! Нужна помощь в создании макроса. На листе в первой строке и в последней, предполагаемого диапазона, есть данные. Нужно чтобы макрос заполнял пустые строки между первой и последней строкой, значениями что расположены выше , т.е. в первой. Поскольку заранее не известно где расположена последняя строка макрос должен заполнять строки с верху вниз пока не встретит уже занятую строку.
Изменен: 31.07.2018
Читать сообщение на форуме или сайте.
Страницы: 1
Наверх