|
|
| Другие темы раздела | |
|
VBA Вставить строки через цикл
https://www.cyberforum.ru/ vba/ thread2703951.html Приветствую! Нужно, чтоб макрос вставлял 11 строк через каждые 30 в таблице с неограниченным количество строк Пробовал так Sub vstavka() a = 0 Dim lastrow As Long lastrow = Cells(Rows.Count, 1).End(xlUp).Row i = lastrow / 30 For r = 1 To i |
Отбор уникальных значений VBA Доброго дня. Во вложенном файле 4 поля с данными. Из них нужно сделать одно поле, содержащее только уникальные данные из вышеуказанных полей. На малом кол-ве записей работает нормально. Но в реальности в каждом поле порядка 700 000 записей. Еще ни разу не дождался, чтобы код отработал, нервов не хватает. Может кто подскажет, как обработать большой массив данных? Спасибо Sub qqq() |
|
VBA Преобразование структуры столбца
https://www.cyberforum.ru/ vba/ thread2703887.html Добрый день! Необходимо преобразовать структуру листа к следующему порядку: ИЕ РМ КР Перечисленные данные выводятся в столбец D. На лист данные выводятся хаотично. Может вывестись только одно значение, например "ИЕ" или два и т.д. Если вывелось только одно значение, то необходимо вставить строки с другими значениями. Например, вывелось одно значение "РМ", значит необходимо вставить выше... |
VBA Кроссворд в PowerPoint c VBA
https://www.cyberforum.ru/ vba/ thread2703723.html Здравствуйте! Пытаюсь сделать кроссворд интерактивный, но не разобраться вот в чём:(2 слайд) не работает форма для вопросов 2-9, 1 еще виден в режиме просмотра, а остальные это как копия 1. Я написала код для нескольких форм вопросов, но всё-равно почему-то не получается. Может вообще что-то с кодом не так, посмотрите, пожалуйста. |
|
VBA Макрос, сравнивающий два файла Всем привет, может кто даст макрос сравнивающий два файла, нужно сопоставить два столбца, столбец K со столбцом T и если различия выделить цветом |
VBA Проверка ячейки что это число
https://www.cyberforum.ru/ vba/ thread2703563.html Здравствуйте ,дорогие форумчане ! Хотел проверить введено ли число в ячейке , но выдает ошибку . Не могли бы вы объяснить из-за чего она возникает . Спасибо ! Sub Test() For i = 2 To 7 If IsNumeric(Cells(i, "B")) Then MsgBox "Ячейка " & i & " неправильно введена" Else: End If Next i End Sub |
|
VBA Заполнение формы данными из строки
https://www.cyberforum.ru/ vba/ thread2703557.html Здравствуйте! Вопрос такой: Есть код в модуле листа, который, при двойном клике на ячейку в столбце А, запускает форму (Sales): Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) If Not Intersect(Target, Range("A1:A10000")) Is Nothing Then Call ShowSales Cancel = True End If End Sub |
VBA Preview письма для outlook 2013 на основании выпадающих списков Я вас категорически приветствую. Нужна помощь с написанием макроса для outlook 2013. Выпадающие списки сделал, нужно в module прописать обращение к combobox, чтобы при нажатии на кнопку и выборе элемента списка создавалось письмо с заполненной темой (соответствующей этому элементу). Всего 3 списка. В теле письма должна быть любая надпись зеленого цвета. Буду крайне признателен за помощь. |
| VBA Vba имеются данные VBA. Имеются данные о ценах на 10 видов товаров. Определить цену самого дорогого товаров, который может приобрести покупатель, имеющий заданную сумму денег https://www.cyberforum.ru/ vba/ thread2702338.html | VBA Массив VBA. Если можно с формой Массив заполнить числами 1,3,5,7,9,11,13,15,17,19. Вывести на экран два соседних элемента: первый и второй, второй и третий, третий и четвертый и т.д., а также их сумму или произведение, при чем при сумме больше 15 выводить сумму, в противном случае - произведение. https://www.cyberforum.ru/ vba/ thread2702328.html |
|
Создание документа Word по данным из Эксель по шаблону VBA всемдоброго времени суток. Подскажите, плиз, как сформировать Вордовский документ по шаблону с данными из эксель Имеется книга Эксель из которой выгружаем данные в вордовский шаблон В конечном варианте должен получится документ 1 в ворде. Желтым выделены данные которые грузились с экселя . по задумке меняю данные в эксель нажимаю кнопку и сохраняется файл ворд с данными, в котором желтым то... |
VBA Dlookup синтаксическая ошибка Me.Filter = "NM_bestellt Is Null" Me.FilterOn = True If Me.strAnz <> 0 Then I = 1 DoCmd.GoToRecord , , acFirst Do Until I = Me.strAnz + 1 I = I + 1 D = Nz(DLookup("", "1704_4_bestellen_", " =" & Me.ID), "") Me.Dat_bestellt = D https://www.cyberforum.ru/ vba/ thread2702088.html |
|
0 / 0 / 0
Регистрация: 29.09.2020
Сообщений: 1
|
|
| 0 | |
Excel Измение ключа ячейки при добавление строк выше - VBA - Ответ 1487369829.09.2020, 13:36. Показов 311. Ответов 3
Метки (Все метки)
Вернуться к обсуждению: Измение ключа ячейки при добавление строк выше VBA
0
|
|
| 29.09.2020, 13:36 | |
|
Готовые ответы и решения:
3
Проверка наличия определённого ключа реестра и добавление этого ключа в реестр при его отсутствии
Разделение данных из одной ячейки и добавление строк |
| 29.09.2020, 13:36 | |
| 29.09.2020, 13:36 | |
|
Помогаю со студенческими работами здесь
0
Нарушение уникальности ключа при выполнении запроса на добавление Добавление строк в определенные ячейки таблицы Word из Excel Добавление текста в ячейки DBGrid при выводе
Заполнение последующих строк при изменении ячейки |