|
|
| Другие темы раздела | |||||||||||||||||||||||
|
VBA Макрос для снятия выделения текста
https://www.cyberforum.ru/ vba/ thread2000929.html Помогите написать макрос для того, чтобы убрать выделение текста. То есть когда выделяешь текст после использования другого макроса, то некоторые слова дополнительно выделяются цветом более темнее.. Пробовал использовать функцию ActiveWindow.View.FieldShading = wdFieldShadingNever Но тогда на моём компьютере выделение убирает,но если скидываешь документ кому-то другому, то там выделение... |
VBA Удаление совпадений в столбце и вывод в Combobox Всем привет! Извиняюсь за наглость, но подскажите какой-нибудь макрос, который будет перебирать ячейки в одном столбце моей таблицы(Столбец с названиями товаров) и будет убирать совпадающие названия товаров в этом столбце(К примеру: у меня в столбце 2 товара с названием "Кока-кола", мне нужно, чтобы макрос оставлял только одно) и,после этого, выводил всё это в combobox. Подскажите пожалуйста,... | ||||||||||||||||||||||
|
VBA Заполнение однотипных связок textbox - Combobox
https://www.cyberforum.ru/ vba/ thread2000905.html Для пользовательской формы, которая за раз может выдать 12 позиций продукции, нужно показывать количество данной продукции на складе. С помощью combobox2101 - combobox2**1 - combobox2211 выбирается наименование продукции, а в соответствующие textbox2103 - textbox2**3 - textbox2213 должно быть выведено количество. Данные для списка находятся в на листе "ИБ_Выдача" в столбце 21 (U), а наличие в 20... |
VBA Написать макрос на VBA
https://www.cyberforum.ru/ vba/ thread2000889.html 1. Создать документ «Движение строительных материалов на складе». Структура исходных данных: шифр материала, вид материала, количество материала на начало месяца, поступление с начала месяца, расход с начала месяца, количество материала на текущий момент, расположение на складе. Структура расходных данных: шифр материала, вид материала, расход с начала месяца. Программа вводит запрос на продажу... | ||||||||||||||||||||||
|
Определение доступности удаленного компьютера в Visual Basic VBA Здравствуйте. С помощью макроса в Word-2007 открываю файлы с другого компьютера, находящегося в локальной сети, и в конце работы макроса сохраняю их на том же компьютере. Интересно знать: а можно ли до момента начала работы с файлами с помощью макроса выполнить проверку на предмет доступности сетевого соединения с этим компьютером, чтобы Ворд не тупил и не вис в случае если, допустим, компьютер... |
VBA Симплесный метод с регулярным симплексом
https://www.cyberforum.ru/ vba/ thread2000613.html Требуется составить задачу для нахождения минимума функции. При выполнении выдает ошибку subscript out of range в строчке c функцией Fn. Прошу помочь. Заранее спасибо Function Fn(x() As Double, i As Integer) As Double Fn = (x(1) + 10 * x(2)) ^ 2 + 5 * (x(3) - x(4)) ^ 2 + (x(2) - 2 * x(3)) ^ 4 + 10 * (x(1) - x(4)) ^ 4 End Function Sub СМРС() Const n = 2, Epsilon = 1E-16, R = -1, Alfa = -1#... | ||||||||||||||||||||||
|
VBA Long из двух String
https://www.cyberforum.ru/ vba/ thread2000511.html здравствуйте, делаю так: ЦенаLong = (Trim(y(b - 2))) & "," & (Trim(y(b))) где (Trim(y(b - 2))) = 33, а (Trim(y(b))) = 14, пытаюсь получить 33,14 - получаю облом, как нужно? спасибо |
Скопировать событие листа VBA Здравствуйте дорогие форумяне! подскажите пож каким образом можно скопировать событие листа из одного листа в другой програмно, если есть такая возможность) нашла лишь ссылку на копирование модуля, но это не совсем то( http://www.excel-vba.ru/chto-umeet-excel/kak-dobavit-kod-procedury-programmno-skopirovat-modul/ | ||||||||||||||||||||||
|
VBA ошибка 9 - Subscript out of range - Индекс вне заданного диапазона
https://www.cyberforum.ru/ vba/ thread2000475.html здравствуйте, не понимаю, эту строку MsgBox$ Trim(c(w)) отрабатывает, получаю правильный ответ "три картонные коробки" на следующей строке Вещь_Количество_Цена(w) = Trim(c(w)) получаю указанную в названии темы ошибку, почему? спасибо |
VBA DateDiff
https://www.cyberforum.ru/ vba/ thread2000369.html здравствуйте в коде считаю секунды между датами, получаю выделение DateDiff и сообщение, argument not optional код: 'присвоение переменной даты начала программы Старт_программы = Time 'присвоение переменной даты окончания программы Конец_программы = Time DateDiffSekund = DateDiff("s", Конец_программы - Старт_программы) Debug.Print DateDiffSekund что делаю не так?... | ||||||||||||||||||||||
|
VBA FIND вывод всех совпадений на листе (макрос-кнопка) Создал на листе кнопку со следующим макросом Sub Кнопка3_Щелчок() x = InputBox("Введите артикул, который нужно найти", "Ввод данных для поиска") If VarType(x) = vbBoolean Then Exit Sub ' нажата кнопка ОТМЕНА x_text = "*" & x & "*" Dim cell As Range Set cell = Cells.Find(What:=x_text, LookIn:=xlValues, LookAt:=xlWhole) |
VBA Найти список телефонов сотрудников, чьи фамилии начинаются с заданной буквы
https://www.cyberforum.ru/ vba/ thread2000299.html Здравствуйте, мне необходимо доработать код. Мой код ищет фамилии по первой букве,а мне нужно,чтобы он искал номера телефонов по первой букве фамилии. Private Sub TextBox1_Change() Dim
Наверх
| ||||||||||||||||||||||
