Страницы: 1 2 3 4 5 6 След.
Поиск
Макрос для сохранения строки из таблицы в файл и рассылке по почте., Требуется макрос для сохранения строки из таблицы в файл и рассылке по почте.
Автор: R0mi1. Здравствуйте! Имеется таблица с данными в эксель. Нужно установить две кнопки 1) Сохранить в файлы, 2)Отправить адресату 1)Сохранять в файл необходимы следующие данные.       1.1 Первые 4 строки(Шапка) из таблицы(исходник)       1.2 Каждую последующую строку(с шапкой в отдельный файл(xlsx) образец  приложу.       1.3 Файл должен называться 1-й ячейкой  из строки       1.4  Если в 1-й ячейке строки пусто, тогда пропускаем. 2)Отправить адресату     2.1 Отправить по e-mail (список ...
Изменен: 28.08.2024
Читать сообщение на форуме или сайте.
VBA Word cохранение связанного файла в формате pdf используя данные из поля слияния MERGEFIELD в имени файла
Автор: afonason. Есть таблица с данными Excel "export (19)" и связанный файл Word "Ответ об отказе срок_"  который автоматически заполняется через поле слияния (MERGEFIELD) Задача с помощью макроса сохранить Word файл в формате .pdf с определённым именем (добавить к имени файла № претензии который подгружается в поле слияния { MERGEFIELD Номер_претензии }) Нашел макрос похожего действия, но он добавляет текст к названию из поля со списком. Как сделать ссылку на поле слияния ( ...
Изменен: 23.08.2024
Читать сообщение на форуме или сайте.
Подтягивание данных из нескольких таблиц (VBA), Нужно подтянуть данные на основе списка
Автор: Никита Митрофанов. Здравствуйте! У меня такая проблема: нужно с помощью макроса сделать подтягивание значений из двух таблиц в третью по уникальным значениям в одном столбце (все остальные пустые). Значения из других таблиц могут быть в случайном порядке. Знаю, что есть ВПР() в функциях, но он не подойдет, потому что таблиц больше, да и это нужно делать будет много раз. Тест - таблица в которую заливать 1 и 2 - таблицы со значениями безымянный рисунок - примерно что должно быть перенесено ...
Теги: VBA
Изменен: 21.08.2024
Читать сообщение на форуме или сайте.
Не работает макрос фильтрующий столбец при переходе с гиперссылки , При переходе с гиперссылки фильтрует не то значение
Автор: anna_bella_valentina. Добрый день! Есть отчет на 3 листа, один из них сводный. На первом и втором листе сделаны гиперссылки на итоговую таблицу и зашит простой макрос на фильрацию: Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)     ActiveSheet.Range("ФП").AutoFilter 16, Target.TextToDisplay End Sub Но макрос отрабатывает криво. При переходе с гиперссылки всегда фильтрует по первому значению с листа, а не по тому значению с которого переходим. Подскажите, ...
Изменен: 18.08.2024
Читать сообщение на форуме или сайте.
Как с помощью макроса протянуть формулу до конца таблицы на каждом листе
Автор: Ivaroms. Добрый день! Искал по Форуму, пробовал прописать самостоятельно, но как-то криво выходит... У нас есть книга, в которой может быть сотни листов, на каждом листе таблица, таблицы имеют разное количество строк, но одинаковую структуру. Нам необходимо прописать в столбце Q начиная с 9-ой строки на каждом листе формулу до конца таблицы( грубо говоря протянуть). Помогите, пожалуйста, с написанием кода! =IF(RC[-13]>0,IF(OR(AND(NOT(RC[-8]=0),RC[-8]'0'!R1C3),& ...
Теги: VBA
Изменен: 12.08.2024
Читать сообщение на форуме или сайте.
Суммирование с переборкой последовательности с функцией в зависимости от неё, Сумма всех вариантов ячеек с текстом в зависимости от количества "и"
Автор: Никита Митрофанов. Добрый вечер, формунчане! Такую закадычную задачу мне дали, никак не могу её решить. Дано: у нас есть результат и несколько персонажей, который к этому результату старались приблизиться (допустим, подкидывание кубика, а персонажи собирались угадать, что же там выпадет). Побеждали те, кто угадал или же те, кто был максимально близок с значению, при том как в положительную, так и в отрицательную сторону (например, если выпало 3, кот сказал что будет 5, а жук что будет 2, ...
Изменен: 01.08.2024
Читать сообщение на форуме или сайте.
Макрос. проверка работоспособности гиперссылки на файл, наличие файла по данной гиперссылке
Автор: fixboot. Необходимо создать макрос проверки работоспособности гиперссылки на файл (наличие файла по данной гиперссылке). файлы: pdf, doc, xls, jpeg таблица и файлы размещены на локальном сервере (если имеет значение) если можно вывод результата за область сводной таблицы
Изменен: 29.07.2024
Читать сообщение на форуме или сайте.
Сумма столбца в VBA
Автор: kare. Здравствуйте , подскажите пожалуйста как подсчитать сумму 7 столбца в vba? Dim s As Long s = Cells(Rows.Count, 7).End(xlUp).Row + 1пытаюсь определить последнюю запуленною ячейку и добавить строчку для итога но дальше дело не идет(
Теги: VBA
Изменен: 21.12.2017
Читать сообщение на форуме или сайте.
Зависимые списки в Combobox (VBA)
Автор: Dost1369. Добрый день, уважаемые форумчане! Суть проблемы: Есть сводный перечень, в котором наименования (столбец C) принадлежат разным объектам (столбец B), необходимо сделать так, чтобы в Combobox1 для выбора выдавался перечень объектов (сейчас я это сделал  при помощи AddItem), а в Combobox2 перечень наименований, соответсвующий выбранному объекту. Для понимания работы желаемого - сделал табличку в фиолетовой рамке на листе "Выбор". Для вызова формы - добавил ...
Теги: VBA
Изменен: 13.09.2017
Читать сообщение на форуме или сайте.
Обход ограничения \\ Каждое слово в отдельной СТРОКЕ
Автор: RazorBaze. Стандартная функция Excel "Заполнить" > "Выровнять" (она же в VBA: "Selection.Justify") работает только с первыми 255 символами в ячейке, как и множество других подлых функций (например, "СЧЁТЕСЛИ"). Возможно ли обойти это ограничение? Возможно ли написать пользовательскую функцию? Может есть вообще другой способ? Задача: преобразовать текст в ячейке таким образом, чтобы рядом с ним создалось ...
Теги: VBA
Изменен: 09.09.2017
Читать сообщение на форуме или сайте.
Формирование и вывод списка по значению в ячейке
Автор: BladzheR. Добрый день! Необходимо сделать выпадающий список с данными в одной ячейке, но этот список должен автоматически меняться в зависимости от значения в определенной ячейке. Пример в файле прилагаю...
Изменен: 28.08.2017
Читать сообщение на форуме или сайте.
Создание Кнопки в экселе, которая тянет даты из SQL-соедининия, Создание Кнопки в экселе, которая тянет даты из SQL-соедининя
Автор: Mansso. Добрый день, знатоки. Просьба подсказать,т.к. я плохо разбираюсь в макросах. Суть такая. Есть запрос. Сделал из него обновляемый файл.Подключение--Источник SQL. Появилось желание вывести параметры запроса в виде дат set @datestart='2017-07-19 15:36:46.947',set @dateend='2017-07-20 15:36:46.947' в сам файл эксель посредством кнопки. Подскажите, будьте добры, как это сделать?
Теги: SQL, Кнопка
Изменен: 01.08.2017
Читать сообщение на форуме или сайте.
Выпадающий список во время редактирования ячейки
Автор: RazorBaze. Все знают, что если начать ячейку с "=", а следом ввести букву (например, "Е") - появится список функций, начинающихся на эту букву: - ЕОШИБКА - ЕСЛИ - ЕСЛИПУСТО - ЕССЫЛКА - ЕТЕКСТ - ЕЧИСЛО, и т.д. При этом, если после "Е" поставить букву "С" - все несовпадения отсеются, и останутся только: - ЕСЛИ - ЕСЛИПУСТО - ЕССЫЛКА, и т.д. Такой же список, только с другими вариантами выбора, выпадает в ...
Изменен: 15.07.2017
Читать сообщение на форуме или сайте.
Макрос для замены нескольких значений в стобце на одно.
Автор: G_110036246309433414584. Добрый день. Есть столбец в таблице. В этом столбце 1000 ячеек с различными номерами. Мне надо заменить в этом столбце некоторые из них (313, 216, 237, 391, 127, 190, 127, 402, 407) на текст Д/Р. Подскажите пожалуйста макрос для реализации этой задачи. З.Ы. Одно и тоже значение в столбце в таблице может повторяться более 30 раз
Изменен: 05.07.2017
Читать сообщение на форуме или сайте.
Макрос для сдвига всех рядов диаграммы на заданное число строк/столбцов
Автор: tioko. Добрый день, товарищи! Есть отчет в таком виде: http://joxi.ru/BA0vvNghJ7edMm Есть много красивых графиков к этому отчету, примерно десяток (подписи данных удалила): http://joxi.ru/EA4vvjEhwNennm  И этот десяток диаграмм надо скопировать и перестроить для 21 региона. Можете, плиз, написать мне макрос, который бы сдвигал все ряды диаграммы (а лучше - всех выделенных диаграмм) на определенное число строк или столбцов? Если можно, со скриншотами, что куда вставлять и ...
Изменен: 29.06.2017
Читать сообщение на форуме или сайте.
Макрос для добавление тени для всех картинок в Power Point
Автор: esk_. Здравствуйте!  Подскажите, пожалуйста, как изменить следующий макрос, чтобы можно были добавлять тень не  для исключительно выделенных картинок, но для всех картинок в презентации:  Sub MakeShadow()     Dim i As Integer     With ActiveWindow.Selection.ShapeRange.shadow         For i = 1 To 2             .ForeColor.RGB = RGB(220, 220, 220)             .Transparency = 0.35             .Visible = True             .Blur = 10             .OffsetX = 5             .OffsetY = ...
Теги: Макрос
Изменен: 23.06.2017
Читать сообщение на форуме или сайте.
Один массив из двух, Нужен код VВA собирающий новый массив из этих двух.
Автор: tmash. Внезапно появляются два заполненных массива м01 и м02.Чтобы не упутать, попробую объяснить на примере диапазонов.Количество столбцов (измерения) в массивах обычно разное. Нужен код VВA собирающий новый массив из этих двух. По рабоче-крестьянски: Если название столбца из м02 есть в м01, то добавить содержимое этого столбца под столбец тёзку. Если названия столбца из м02 нет в м01, то добавить название столбца к названиям столбцов, а данные добавить в новый столбец, ниже ...
Теги: массив, VBA
Изменен: 17.06.2017
Читать сообщение на форуме или сайте.
VBA Количество дней между двумя датами в Excel без учета празников, VBA Количество дней между двумя датами в Excel без учета празников
Автор: Леонид Коршак. Добрый вечер всем! Наверное глупый вопрос, но как посчитать количество календарных дней между двумя датами в коде VBA без учета празничных? Пример между датами 01.06.2017 и 30.06.2017 - должно быть не 30, а 29 дней (так как 12.06.2017 - праздник)
Теги: VBA
Изменен: 16.06.2017
Читать сообщение на форуме или сайте.
Макрос копирования диапазона только со значениями
Автор: dvolkov80. Необходимо создать макрос который бы копировал данные из формы B2:F19 на Листе 1 и вставлял в таблицу на Листе 2. Необходимое условия:1. Вставлялись только значения, а не формулы, форматы и т.д. 2. Вставка на Лист 2 только в пустые строки таблицы накопительно. 3. Пустые строки из формы B2:F19  не вставлялись в таблицу на Листе 2. После вставки форма B2:F19 очищалась.
Теги: Макрос
Изменен: 08.06.2017
Читать сообщение на форуме или сайте.
Перемещение текста с одной книги в другую с помощью кнопки, Нужно переместить текст в ячейке в другую книгу с помощью кнопки, поиск в интернете нечего не дал
Автор: 000000000. Нужно переместить текст в ячейке  в другую книгу с помощью кнопки, поиск в интернете нечего не дал. Находила только перемещение с одного листа на другой, после чего пыталась редактировать, но из-за незнания макросов получался всякий бред.  Код макроса для кнопки на перемещение с одного листа на другой, который я находила, плюс он немного изменен, так как нужно было, чтобы каждая новая информация перемещалась на строчку ниже, а так же работали формулы. Sub Кнопка2_Щелчок()  ...
Изменен: 06.06.2017
Читать сообщение на форуме или сайте.
Добавление информации через VBA в таблицу Exel, Добавление информации из UserForm в ячейки Exel
Автор: Paul_Pavel. Доброго времени суток, уважаемые знатоки VBA и Exel! В ходе работы столкнулся с непростой (для меня - но,уверен, не для вас ;) ) задачей. Имеется таблица Exel со списком записей. В конце списка - строка "Проверил". Необходимо создать кнопку которая добавляла бы новую запись с автоматическим присваиванием номера при этом сохраняя строку "Проверил". Далее эта же кнопка вызывает UserForm с TextBox-ами в которые вручную вводятся данные, после ...
Теги: VBA
Изменен: 29.05.2017
Читать сообщение на форуме или сайте.
Автоматизация Макроса с условием, Нужно настроить автоматизацию макроса, при изменении ячеек
Автор: kek. Добрый день!  Имеется макрос:  Sub info1()  Dim info1 As String  If Application.ThisWorkbook.Sheets(1).Cells(29, 16) > Application.ThisWorkbook.Sheets(1).Cells(28, 16) Then  Sheets(8).Cells(73, 82) = "Используется первый вид транспорта до пункта назначения"  Else  Sheets(8).Cells(73, 82) = "Первый вид транспорта до пункта назначения не используется"  End If  End Sub  Нужно сделать так, чтобы он срабатывал каждый раз, когда ...
Теги: VBA
Изменен: 21.05.2017
Читать сообщение на форуме или сайте.
сводная таблица (PivotTable) - VBA, Программно разбить на несколько таблиц
Автор: Maniac Rabbit. Подскажите пожалуйста как в сводной таблице можно программно скопировать отдельно каждое поле и все элементы в нем? разбить на несколько таблиц... Вот пример самой сводной таблицы: http://i11.pixs.ru/storage/6/6/2/Skrinshot1_3414632_26214662.png То есть мне нужно скопировать отдельно в данном примере по полю квартал : 266 и выдел: 21 31 38. Вот мой код, понимаю что нужно как-то циклом сделать, но как лучше?Sub TestPivotTable() Dim shName$ Dim wbname$ Dim pt As ...
Изменен: 18.05.2017
Читать сообщение на форуме или сайте.
VBA два массива в автофильтр умной таблицы, задаю 2 критерия, массивами, получаю ошибку 1004
Автор: Chimichangi. Привет всем кодоводам! Есть умная таблица (не однородная) с заголовками внутри. Создаю форму с 2 Mountview в которых выбираю даты и записываю их в ячейки К2,К3Private Sub MonthView1_DateClick(ByVal DateClicked As Date) Range("k2").Select Selection.NumberFormat = "mm\/dd\/yyyy" ActiveCell.FormulaR1C1 = MonthView1.Value End Sub, а в ячейке К4 вычисляю интервал между ними. (K3-K2) В ячейки L1:L100 записываются все даты в выбранном ранее ...
Теги: VBA, #Excel2010
Изменен: 03.05.2017
Читать сообщение на форуме или сайте.
Сбор данных в Excel ячейку через SNMP
Автор: FiataliS. Привет вам всем. Помогите!!,  кто может разбирается. Требуется получать показания с устройства по SNMP в ячейку Excel.   Немного порыв, наткнулся на такой код, но не понимаю как его применить.  Интересует что значит эта строка  :sceptic:  Set S = S.Exec("C:\usr\bin\snmpwalk -mALL -v1 -cpublic 10.68.110.05 .1.3.6.1.4.1.3") Текст на странице кода был такой: "Has anyone ever collected data using SNMPWALK on excel? Have a little bit of trouble trying to find a ...
Изменен: 28.04.2017
Читать сообщение на форуме или сайте.
Макрос на максимальное значение из выделения
Автор: Mit Boy. Подскажите, как сделать так, чтобы Leader равнялось не трем, а максимальному числу в выделенном столбце (которое выделяется перед выполнением макроса) Сам алгоритм создает соседний столбец, где пересчитывает все значения выделения как доли от самого большого значения в выделении (которое, соответственно, становится равно единице). Другая проблема заключается в том, что если выделять снизу вверх, столбец неправильно располагается, но это не так важно. Sub Макрос() ' ' ...
Теги: Макрос
Изменен: 26.04.2017
Читать сообщение на форуме или сайте.
Создание надстроек, ф-ций, Необходимость разобраться в создании надстроек для екселя
Автор: Vovchik22. Добрый день, Для работы необходимо научиться создавать надстройки для екселя.  Подскажите с чего начать ? Нужны практические советы. на данный момент, надстройка нужна , чтобы возвращать данные в ексель через ф-ции. Данные забирать буду через API Спасибо 
Изменен: 14.04.2017
Читать сообщение на форуме или сайте.
Создание условного форматирования, Через VBA
Автор: Kuvon. Доброго всем дня! Возник такой вопрос. Как с помощью VBA создавать свои правила "условного форматирования". Авторекодер молчит.
Теги: VBA
Изменен: 03.04.2017
Читать сообщение на форуме или сайте.
Как узнать номер первой и последней строки для несмежных диапазонов?
Автор: deesa. В Range.Address диапазоны хранятся в порядке их выделения пользователем (например, $F$11:$H$14,$J$7:$L$11,$B$16:$D$20,$H$24:$I$29,$C$4:$D$7), поэтому просто взять первую и последнюю цифру не сработает. Пока есть идея разобрать содержимое Range.Address на отдельные адреса, сохранить в массиве и дальше найти Min и Max. Но этот способ кажется несколько трудоёмким. Возможно я изобретаю велосипед и есть более простой способ узнать первую и последнюю строчку?
Теги: VBA
Изменен: 22.03.2017
Читать сообщение на форуме или сайте.
Выполнить макрос на всех листах
Автор: SHARP. Доброго времени суток Как сделать так, чтобы При сохранении книги макрос работал на всех листах где это нужно, а не только на активном? Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean) Call ЗАКРЫТЬ End Sub Sub ЗАКРЫТЬ() ActiveSheet.КнопкаЗОР.Caption = "ЗАКРЫТО" ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True End Sub
Изменен: 10.03.2017
Читать сообщение на форуме или сайте.
Страницы: 1 2 3 4 5 6 След.
Наверх