|
|
Другие темы раздела | |
VBA Готовый макрос MO Word! Всем привет! Задали нам с товарищем написать макрос, который проверяет текст на критерии преподавателя! Вот они: 1) шрифт Times New Roman; 2) размер шрифта 14; 3) меж строчный интервал одинарный; 4)Наличие Оглавления, Заключения, Списка литературы; 5)Размер текста не меньше 6 станиц; 7) Поиск работ преподавателя(в данном макросе подсчитывается кол-во упоминаний в док-те фамилии, 1 раз в тит.... https://www.cyberforum.ru/ vba/ thread276624.html |
Одномерный массив. Как задать max элемент? VBA задание такое. Найти максимальный из отрицательных элементов массива А размера n. Программу написал, но проблема в том, что я задал максимальный элемент равным первому элементу массива(max=A(1)), и если я ввожу первым элементом 0, тогда он и оказывается максимальным. как это исправить? Sub tipovoi5_2() Dim A() As Integer, n As Integer, max As Integer, i As Integer n = InputBox("vvedi... |
VBA Работа с объктами 1)как сделать,что бы объект в вба двигался слева направа 2)Справо на лево 3)сверху вниз 4)снизу вверх 5)менял цвет(например была фигура белой стала менятся на черной),тем самым будет эффект маргания Добавлено через 2 минуты или же мегания) Добавлено через 12 минут https://www.cyberforum.ru/ vba/ thread276442.html | VBA Excel не хочет открывать файл Вкратце суть проблемы: Sheets.Add Sheets("Лист1").Select Sheets("Лист1").Name = "Множественный выбор" Directory = "D:\Результаты\" f = Dir(Directory & "*.mht", 7) Do While f <> "" Workbooks.Open Filename:=("" & f) https://www.cyberforum.ru/ vba/ thread276402.html |
VBA Поиск и редактирование текста в Word Народ, помогите со следующей проблемкой. Пытаюсь написать код в VBA для обработки документа. Задача такова: нужно искать в тексте фрагменты с размером шрифта 30. И потом обработать, нопример добавить в конце этого фрагмента символ, к примеру точку. Количество таких фрагментов - большое и не фиксированное. (Количество листов 20-30, в каждом листе - 10-15 фрагментов). Прикрепляю образец одной... |
VBA Разработка программы с использованием операторов цикла
https://www.cyberforum.ru/ vba/ thread276149.html Уважаемые форумчане!Нужна ваша помощь!Только что закончил ознакомление с циклами на основе простейших примеров!Теперь необходимо выполнить задание,которое намного труднее мной изученного!Пожалуйста,помогите составить программу с использованием операторов цикла! Заранее спасибо за помощь! |
VBA Найти сумму торговой наценки
https://www.cyberforum.ru/ vba/ thread276139.html Создать программу, с помощью которой можнно ввести закупочную цену компьютера. После нажатия кнопки "Расчёт " программа должна выдавать:сумму торговой наценки - 10% от закупочной цены товара, сумму реализации товара - закупочная цена плюссумма торговой наценки. |
Не могу найти ошибку в программе VBA Доброго времени суток. Прочитал множество тем, многие люди обращаются с одной и той же проблемой написания программы на языке VBA. Причём как было замечено у всех один преподаватель, и я не исключение. Я полный ноль в VBA, поэтому взял готовую решённую задачу, просидел с ней 6 ночей подставляя свои значения, получилось почти всё, да не всё. помогите, пожалуйста найти ошибку. Задание таково:... |
VBA Напишите функцию, возвращающую i-тое слово из текста выделения Задание: разработать макрос для MS Word Напишите функцию, возвращающую i-тое слово из текста выделения (символы-разделители см. ниже). На форме пользователь вводит число, в ответ на это в текстовом поле появляется слово с этим номером (символы-разделители отбрасываются). Задание необходимо реализовать в 2-х вариантах: 1. С использованием любых функций для работы со строками ( StrComp ,... https://www.cyberforum.ru/ vba/ thread276058.html |
VBA Закрепление макроса!
https://www.cyberforum.ru/ vba/ thread276001.html Скажите пожалуйста, как закрепить макрос за определенный документом? Что бы можно было отправить этот документ по "мылу" и получатель открыв док-нт мог им пользоваться и копировать себе в шаблоны и т.п. |
Ошибка: "Несоответствие типа" при распечатке документа VBA есть код: Application.PrintOut fileName:="", Range:=wdPrintSelection, Item:=wdPrintDocumentContent, Copies:=Количество_копий, Pages:="", PageType:=wdPrintAllPages, _ ManualDuplexPrint:=False, Collate:=True, Background:=False, PrintToFile:=False, PrintZoomColumn:=0, PrintZoomRow:=0, PrintZoomPaperWidth:=0, _ PrintZoomPaperHeight:=0получаю ошибку 13 Type mismatch Несоответствие типа подвожу... |
VBA Одномерный массив. составление одного массива из эл.другого. задание звучит так: Составить массив B из неположительных элементов массива А(15). Вот что у меня получилось, но доделать никак не получается. Sub lab3_3() Dim A(15) As Integer, B() As Integer For i = 1 To 15 A(i) = InputBox("vvedi element massiva") Cells(i, 1) = A(i) Next For i = 1 To 15 https://www.cyberforum.ru/ vba/ thread275974.html |
1392 / 533 / 68
Регистрация: 10.04.2009
Сообщений: 8,782
|
|
15.04.2011, 18:38 | 0 |
как вызвать меню Открыть файл.. и Сохранить_как - VBA - Ответ 155604715.04.2011, 18:38. Показов 11606. Ответов 9
Метки (Все метки)
Ответ
Отмену нажал Икс = 0
??????? Вернуться к обсуждению: как вызвать меню Открыть файл.. и Сохранить_как VBA
0
|
15.04.2011, 18:38 | |
Готовые ответы и решения:
9
Как програмно вызвать стандартное меню Excela Saveas ? Создать меню, чтобы открыть файл Отключение пункта меню Файл-Открыть Вызвать диалоговое окно "Открыть Файл" из кода |
15.04.2011, 18:38 | |
15.04.2011, 18:38 | |
Помогаю со студенческими работами здесь
0
Как из Access открыть файл, используя диалоговое окно "Открыть файл"? Как вызвать Popup меню на закладке TTabset Как вызвать форму по правому клику в меню Как вызвать другое активити в контексном меню |