Страницы: 1
Поиск
Не распознается переменная в цикле
Автор: Жан Коштоян. Добрый день! Прошу помочь с Excel VBA. У меня excel 2010. На листе "Лист1" в ячейке R7C53 записана формула массива: {=НАИМЕНЬШИЙ(ЕСЛИ(ДВССЫЛ($AZ$7 )>=$AX$7;ДВССЫЛ($AZ$7));1)} Она вычисляет минимальное значение из диапазона записанного в R7C52 превышающее расчетное значение в ячейке R7C50. Алгоритм действий: 1. Вычисляем сечение клапана (Высота*ширину). Записываем в ячейку R7C50; 2. В диапазоне $AW$6:$AW$36 (в макросе записано в стиле R1C1) записаны максимальные ...
Изменен: 31.08.2022
Читать сообщение на форуме или сайте.
Excel VBA Макрос автозаполнения по правилам, Копирование значения активной ячейки и вставка в несколько ячеек с отсчётом от активной ячейки и последующих по столбцам
Автор: Oleg K. Здравствуйте! Новичок, и не могу разобраться как написать код. Необходимо написать макрос VBA для Excel таблицы состоящей из перечня оборудования и календарного графика, где в календарном графике надо проставлять текстовые значения с определённым шагом в зависимости от исходного значения. Задача: 1. Поиск в диапазоне строки (пример С5:AG5) текстового значения "то2" "то3" "то4" "то5" (далее по тексту "Значение") 2. При обнаружении ...
Изменен: 22.10.2021
Читать сообщение на форуме или сайте.
Из строк с одинаковым значение - сделать одну, и сложить сумму с определенного столбца
Автор: aroz. Добрый день, искал в интернете подобное, но всё не то, возможно даже не знаю как правильно формулировать вопрос Есть папка с файлами excel, ~10.000 файлов, в каждом по 150 строк, в строках повторяются названия - для каждого своя сумма, нужно сделать, чтобы повторений не было и каждую сумму сложить в единую, на словах ничего не понятно, поэтому делаю пример и прикладываю файл с примером (1 лист - исходная база, 2 лист - то, что должно получится) Исходная база:ДатаДокДатаСостНаим№ ...
Изменен: 20.07.2021
Читать сообщение на форуме или сайте.
Обход ошибок в VBA при вызове функции
Автор: Алексей Краснов. Добрый вечер! Столкнулся с проблемой - имеются ячейки, из которых функцией извлекается предпоследнее вхождение текста после определенного делителя "Human". В том случае, если функция не находит подходящих значений, она возвращает #ЗНАЧ!, который мешает работе остальных функций, которые используют ссылки на эту. Необходимо результат #ЗНАЧ! при вызове функции заменить на пустое значение "" Долго гуглил информацию по поводу обхода ...
Изменен: 23.10.2020
Читать сообщение на форуме или сайте.
Перенос данных из таблицы EXCEL в Word Поля?
Автор: Maxim. Доброго времени суток эксперты, столкнулся с задачей необходимости создания множества типовых документов с различными данными в определенных местах, это проблема решается добавлением в ворд документ полей в которые будет вноситься информация из excel файла с помощью макроса. На форуме "cyberforum.ru" 10 лет назад было предложено решение которое соответствует моей задачи - https://www.cyberforum.ru/vba/thread1072655.html , но разобраться с кодом я так и не смог. 1 ...
Изменен: 23.09.2020
Читать сообщение на форуме или сайте.
Excel + wiki
Автор: Ranker Dark. На странице википедия есть несколько таблиц. И таких страниц несколько. Структура всех таблиц одинакова. Я могу и вручную скопировать все таблицы, но они постоянно обновляются и каждый раз копировать одни и теже таблицы, с новыми данными, немного запарно. Знаю, что есть способ парсить данный в Excel, но не знаю как. Не подскажете, пж.
Изменен: 17.09.2020
Читать сообщение на форуме или сайте.
Поиск отправителя в Outlook используя Excel
Автор: Walkish. Доброго времени суток, Есть ли возможность сделать макрос, который запускался бы из книги excel , открывал Outlook и фильтровался во всех входящих по адресату, которого я бы указал в определенной ячейке?  нашел такой кусок кода, но как адаптировать под свои хотелки не пойму, опыта работы с Outlook objects нет.  Sub getmail() Dim olApp As Outlook.Application Dim objNS As Outlook.Namespace Dim olFolder As Outlook.MAPIFolder 'Dim msg As Outlook.MailItem Dim ...
Изменен: 29.08.2020
Читать сообщение на форуме или сайте.
VBA Объединить каждые 25 строк из 80 тыс, Нужен правильный макрос
Автор: Pankiller. Всем привет! Такая задача: Есть файл excel таблица. В ней 80 тыс строк одной колонкой. Необходимо объединить каждые 25 ячеек в этой колонке в одну ячейку. В ячейках номера, пример 254251200025452001, они идут по порядку но с контрольной цифрой в конце. То есть например есть 80 тыс строк и после объединения будет 3200 ячеек в которых будет по 25 номеров. Так же необходимо чтобы была возможность количество менять в зависимости от задачи.
Изменен: 01.04.2020
Читать сообщение на форуме или сайте.
Связь с помощью макроса таблиц excel с таблицами в тексте word
Автор: mickeylikebeatle. Коллеги, приветствую.  Только начинаю путь к изучению макросов. Есть задача увязать таблицы и текст Word с Excel. Файлов excel много, в каждом из них таблицы и текст. Хочу связать word, чтобы по нажатию кнопки прогружались куски и таблицы из разных файлов excel, которые лежат на сетевом диске. Есть пару вопросов. Помогите прояснить, пожалуйста. 1. Если я делаю увязку через связь ячеек таблицы word с таблицей excel, как я могу посмотреть код своего каждого действия ...
Изменен: 23.05.2019
Читать сообщение на форуме или сайте.
Как изменить запрос Power Query таблицы с помощью VBA?
Автор: Fuad1992. Добрый день уважаемые профи. В документе TEST имеется код, который создает новый документ в необходимой папке (Cars). Потом, в этом новом документе, создается PQ таблица, которая привязана к документу TEST. Там действует фильтрация ("МАРКА") и убираются не нужные строки (Остается только "Ford"). В добавок переименовывается страница, заголовок и сам файл. Новое имя пишется в InputBox. Цель такая, чтобы в запросе, а точнее в фильтрации PQ таблицы было ...
Изменен: 21.06.2018
Читать сообщение на форуме или сайте.
Поиск в массиве по маске
Автор: Timofey0801. Добрый день, уважаемы форумчане! Возник следующий вопрос: есть одномерный массив в котором содержатся кодированные данные (их порядка 6500). Данные в себе содержит код товара (5 или 6 цифр) + код точки (и буквы и цифры) Задача следующая, нужно по заданным 5 цифрам (InputBox) найти все соответствия. Пробовал Mutch, Vlookup. Но как то не срослось. Пример данных: Yff56988don12 Vft83466zap2 Cva86322kiev19 Vft83466priluk1 Т.е. мне нужно при введении числа 83466 получить ...
Изменен: 05.06.2018
Читать сообщение на форуме или сайте.
Макрос. Удаление строк из таблицы в БД, Необходимо составить макрос для удаления строк из БД по ID строки
Автор: mogilevtsev. Доброго времени суток. Стоит задача, проставлять галочки напротив строк, которые необходимо удалять, нажимать кнопку для запуска макроса и отмеченные строки нужно удалить из таблицы в БД. Я в VBA не силен... Пожалуйста помогите... Взял по аналогии вот такой чужой код, попытался переделать под себя, но выдает ошибку на строке  arr(i) = sn.Cells(t, 9) Run-time error '6': Overflow Файл с таблицей приложил, код ниже и в самом файле Global sn Global PosStr As Integer ...
Изменен: 01.06.2018
Читать сообщение на форуме или сайте.
Подсчет вложений для отправки, Макрос для подсчета вложений
Автор: pluto21. Добрый день Требуется написать макрос, который подсчитывает число вложений. Алгоритм. Если количество листов 1 или 2, то конверт е65. От 3 до 10 (включительно) с4. Пример, если вложений 152 штуки. То будет 15 конвертов c4 по 10 вложений и один е65 с 1 вложением. Если 156, то 15 с4 (10 вложений) и 1 с4(6 вложений) Таблицу для примера прилагаю. По данным листа Таблица, нужно заполнять лист Результат Бюджет 500 рублей.
Изменен: 14.12.2017
Читать сообщение на форуме или сайте.
Excel функция сжимании цифр и убрать запятые лишние, исправить функцию сжатия цифр
Автор: next777pro. Нужно цифры, которые есть в столбце и считаются путем сжатия исправить в функции следующее 1) соединять в тире только если три и более, в количестве двух и одного не соединять через тире пример 1, 2, 4-7, 11, 12, 22-45 2) убрать в конце лишние пробелы и запятые Function Sgatie(диапазон As Range) As String Dim i&, j&, a() a = диапазон.Value j = 1: Sgatie = a(1, 1) For i = 2 To UBound(a, 1)   If a(i, 1) = a(i - 1, 1) + 1 Then     j = j + 1   ElseIf j = 1 Then       ...
Изменен: 27.05.2016
Читать сообщение на форуме или сайте.
Страницы: 1
Наверх