|
|
Другие темы раздела | |
VBA VBA - управление документами Microsoft Office Document Imaging
https://www.cyberforum.ru/ vba/ thread1598209.html Доброго времени суток, господа профессионалы! :) Есть те, кто разбирается в программировании VBA, касательно Microsoft Office Document Imaging (MODI)? В общем, задача следующая: У меня есть уже открытый документ формата TIF, открывается файл в программе Microsoft Office Documents Imaging. Мне нужно средствами VBA-MODI управлять этим документом - переключать страницы, менять ориентацию... |
Макрос на выделение цветом найденную запись VBA здравствуйте, данный макрос находит заданное значение и выделяет его цветом Sub Finderer() Dim FD, firstAddress, adrs FD = InputBox("ВВЕДИТЕ ИСКОМОЕ СЛОВО ИЛИ ЧИСЛО", "Мой поиск") If FD = "" Then Exit Sub ' если пользователь нажал кнопку ОТМЕНА - отказ от поиска Dim c As Range: Set c = Range("A:A").Find(FD) ' поиск данных ' если ничего не нашли - выход из макроса If c Is Nothing Then... |
VBA Поиск текста и перемещение по документу Word из редактора VBA CorelDraw X6 Добрый день! Пробую автоматизировать работу, осваиваю VBA, столкнулся со следующей загвоздкой: Необходимо в документе Word находить по названию таблицы индекс этой таблицы в документе для дальнейшей работы с ней. Операции поиска необходимо проводить из редактора Corel, потому что дальше основная работа будет осуществляться в документе Corel со значениями из таблицы. Ниже привожу код, написанный... https://www.cyberforum.ru/ vba/ thread1598156.html |
VBA Определение объема выданных (не выполненных) заданий
https://www.cyberforum.ru/ vba/ thread1597801.html Добрый день, уважаемые форумчане. Окажите содействие в решении небольшого вопроса: нужно в журнале заданий рабочему посчитать сколько этому рабочему уже выдано работы, которая им еще не выполнена. Предполагаемый алгоритм я описал в примечании к столбцу М. Заранее благодарен. |
Копирование данных с нескольких листов с по двойному клику мыши VBA Помогите написать макрос для копирования данных в лист "Заказ" по двойному клику мыши по цене товара |
VBA Textbox Как считать ряд цифр, записанных в TextBox? https://www.cyberforum.ru/ vba/ thread1597650.html |
VBA При создании нового документа Word в документе уже что то есть
https://www.cyberforum.ru/ vba/ thread1597487.html Разбирался с VBA Word. Не знаю, что мог такого сделать, но теперь каждый раз при создании нового документа Word, каждый раз в новом документе уже есть какие то значения (которые я возможно раньше вводил) Появляется такое, если создавать новый документ как с помощью меню "Файл - Создать", или просто на рабочем столе нажать "ПКМ - Создать - Документ Word", или просто запустить сам exe файл Word.... |
VBA Сумма цифр чисел одномерного массива Вот такой код получился,выдает ошибку next without for Sub summa(a) Dim i, s s = 0 n = TextBox1 For i = 1 To n While a(i) <> 0 s = s + (a(i) / 100) a(i) = a(i) / 10 |
VBA Перенос данных по условию Доброго времени суток. Помогите, пожалуйста, решить задачу: Есть 3 таблицы (отдельными файлами). В основной таблице, в столбце А набор данных (фамилии). в столбце В условие переноса (да/нет). Необходимо, чтобы данные (вводимые и имеющиеся при изменении условия) из основной таблицы по условию ДА автоматически переносились в две другие таблицы. https://www.cyberforum.ru/ vba/ thread1597282.html |
VBA Частичная очистка листа при сохранении
https://www.cyberforum.ru/ vba/ thread1597235.html Уважаемые форумчане,помогите решить проблему. Имеется такой код With Range("A3") .FormulaLocal = .Value .AutoFill Destination:=Range("A3:A10000"), Type:=xlFillDefault End With With Range("F3") .FormulaLocal = .Value .AutoFill Destination:=Range("F3:F2000"), Type:=xlFillDefault End With |
Псевдотаблицы word в нормальные таблицы VBA Добрых вечеров, постояльцы. Есть ли вариант перевода псевдотаблиц (когда текст обрамлен символами вертикальных и горизонтальных линий) в человеческие таблицы? Может кто-то боролся с подобным? |
VBA Перенос данных по условию
https://www.cyberforum.ru/ vba/ thread1597165.html Доброго времени суток. Помогите, пожалуйста, решить задачу: Есть 3 таблицы (отдельными файлами). В основной таблице, в столбце А набор данных (фамилии). в столбце В условие переноса (да/нет). Необходимо, чтобы данные (вводимые и имеющиеся при изменении условия) из основной таблицы по условию ДА автоматически переносились в две другие таблицы. |
0 / 0 / 0
Регистрация: 13.10.2015
Сообщений: 4
|
||||||
01.12.2015, 20:05 [ТС] | 0 | |||||
Переставить местами строку матрицы с max элементом и строку с минимальным средним арифметическим - VBA - Ответ 842341901.12.2015, 20:05. Показов 1238. Ответов 4
Метки (Все метки)
Ответ
Вернуться к обсуждению: Переставить местами строку матрицы с max элементом и строку с минимальным средним арифметическим VBA
0
|
01.12.2015, 20:05 | |
Готовые ответы и решения:
4
Переставить последнюю строку матрицы со строкой с максимальным средним арифметическим значением Поменять местами строку с максимальный элемент и строку с минимальным элементом матрицы Найти строку с минимальным средним арифметическим своих элементов Переставить строку матрицы с минимальным элементом и со строкой с заданным номером |
01.12.2015, 20:05 | |
01.12.2015, 20:05 | |
Помогаю со студенческими работами здесь
0
Переставить последнюю строку со строкой со средним арифметическим значением Заполнить строку нулей матрицы средним арифметическим по столбцам, а столбец - средним по строкам Переставить строку с минимальным элементом на главной диагонали матрицы со строкой с заданным номером В матрице переставить последнюю строку со строкой с максимальным средним арифметическим значением |