|
|
| Другие темы раздела | |||||||||||||||||||||||
| VBA Копировать строку из цикла в новую книгу Добрый день, уважаемые коллеги :senor: Не подскажите в чем проблема? Пытаюсь скопировать из одной книги в другую подходящие под условия строки. Задача: Подошла под условия -> скопировал строку и вставил в новую книгу в последнюю свободную строку. При дебаге: выделяет, наверное копирует (не уверен), но не вставляет, ни каким из методов (перепробовал Paste, PasteSpecial, Insert). Dim... https://www.cyberforum.ru/ vba/ thread1786754.html |
VBA В который раз про xla Никогда не использовал xla, обходился, и вот решил попробовать. Сохранил xls в xla-виде, записал в xlstart, хотя лучше бы было, чтобы как-то прописать в Refererens и подключать по необходимости. В модуле запускающего файла xls написал обращение к функции из xla. Так она невидима, хотя проект xla виден в VBE вместе с основной программой. Что не так? | ||||||||||||||||||||||
|
VBA Комплексная замена ячеек
https://www.cyberforum.ru/ vba/ thread1786597.html С помощью кода указаннного ниже можно комплексно изменить ячейку в документах, помогите додумать код чтоб он не заменял а вырезал из указанной ячейки нужную инфу а остальное убирал например у меня в ячейке "Петров Василий Иванович #634788, заключил сделку" нужно чтоб заменялось везде во всех файлах и оставалось только "#634788" Sub Obrabotkafiles() 'On Error Resume Next Set Fso =... |
VBA Нахождение неточного совпадения ячейки в массиве ячеек Всем привет! На этом форуме совсем недавно. Надеюсь на вашу помощь. Передо мной встала диллема. Значит у нас есть два листа : на первом набор строк ("Запрос"), в которых будут искаться любые вхождения из массива строк 2-ого листа ("Города") . В случае, если вхождение есть - выводить в ячейке напротив, что мол "да, есть " , неважно на самом деле что будет выводиться. То есть, например, у нас... https://www.cyberforum.ru/ vba/ thread1786416.html | ||||||||||||||||||||||
|
VBA Как дождаться окончания процесса и продолжить выполнение Из VBA запускается в командной строке скрипт на распаковку, затем некоторые распакованные файлы переименовываются. Так вот оно распаковаться не успевает до появления файла и программа пишет либо ошибку (не найден файл) либо не переименовывает (если вставлена проверка на существование файла). Делаю так: Set ScrUnpack = CreateObject("WScript.Shell") z="c:\unzip.exe file.zip" CodeEndProcess =... |
VBA Сотавить матрицу значений
https://www.cyberforum.ru/ vba/ thread1786233.html Добрый день! Всю голову себе изломал, никак не получается такая задачка. 1. Необходимо составить матрицу всевозможных значений из "0" и "1". Т.е. если дана матрица на 3 столбца, должно получиться так: 0 0 0 1 0 0 0 1 0 | ||||||||||||||||||||||
| VBA Прайс-лист, с многоуровневым списком категорий vba Всем добрый день! Да, я уже изучал подобный вопрос в гугле и смотрел местные темы, но это не совсем то, что надо мне и есть наработки, хочется помощи в данном вопросе. Прилагаю скриншот того, как примерно должна выглядеть таблица, пример используемого кода на удаление пустых строк и группировку имеющихся. В идеале хотелось бы многоуровневый список, в зависимости от количества "_" вкладывался... https://www.cyberforum.ru/ vba/ thread1786130.html |
VBA Скрыть/отобразить строки в списке Здравствуйте! Пишу код для кнопочки (Access), которая должна будет скрывать/отображать строки, у которых значение в поле (по которому идет отбор)равно -1 (логическое). Подскажите пожалуйста, какие функции или процедуры использовать? И еще вопросик, как сделать чтобы кнопочка эта по умолчанию была нажата, а по клику на ней отжималась...(простите, за корявые выражения, не знаю как по-другому... | ||||||||||||||||||||||
| VBA Скопировать строку на новый лист, если ячейка содержит определенное СЛОВО в тексте - VBA Имеется код который копирует строки с определенным значением ячейки. Sub perenos() Dim i& Application.ScreenUpdating = False For i = 1 To Cells(Rows.Count, 6).End(xlUp).Row If Cells(i, 6) = "Процесор" Or Cells(i, 6) = "Монитор" Or Cells(i, 6) = "Жесткий диск" Then Rows(i).Copy Sheets("Лист2").Cells(Sheets("Лист2").Cells(Rows.Count, 6).End(xlUp).Row + 1, 1).PasteSpecial End If https://www.cyberforum.ru/ vba/ thread1786024.html |
VBA Vba-outlook NewMail
https://www.cyberforum.ru/ vba/ thread1785887.html Добрый день! У меня в Outlook подключено два ящика. Почему-то событие Application_NewMail() отрабатывает только при получении почты на основной ящик. Каким образом реализовать запуск NewMail() при поступлении писем на конкретный ящик (и конкретную папку)? Спасибо! | ||||||||||||||||||||||
|
Артикула со свойствами по строкам VBA Добрый день! Имеется excel файл ниже напечатанного формата: Столбец "A" - артикул (служит идентификатором); Столбцы "B" и до конца - свойства артикула; Пример файла во вложении, страница "Исходник". Пример структуры страницы печатаю ниже: 1. Артикул 1 | Свойство 1 | Свойство 2| Свойство 3 |
VBA Определить тип объекта
https://www.cyberforum.ru/ vba/ thread1785633.html Добрый день Необходимо в зависимости от типа объекта (Label, TextBox, Ch
Наверх
| ||||||||||||||||||||||
