Лидеры рейтинга

ID: 226425

Konstantin Shvetski

Модератор

962

Россия, Северодвинск


ID: 165461

Лангваген Сергей Евгеньевич

Советник

685

Россия, Московская обл.


ID: 398750

Елена Васильевна

Специалист

400

Беларусь, Гомель


ID: 401284

Михаил Александров

Академик

269

Россия, Санкт-Петербург


ID: 400669

epimkin

Профессионал

185


ID: 401888

puporev

Профессор

162

Россия, Пермский край


ID: 137394

Megaloman

Мастер-Эксперт

145

Беларусь, Гомель


8.3.3

05.03.2021

JS: 2.4.4
CSS: 4.4.1
jQuery: 3.5.1


 
 
Просмотр ответов эксперта YAV (Специалист)
• Пакет MSOffice
Вопрос № 141619 ушел в рассылку

Добрый день!
Требуется во многих документах Word (установлен 2003) заменить некоторые фразы в множестве документов, для этого я воспользовался макросом, а также пробывал допольнительные программы на его основе. НО по умолчанию во всех документах колонтитулы выключены, а после замены текста они в...


Автор вопроса: Sergey V. Gornostaev (Профессионал)
Дата отправки вопроса: 17.08.2008, 16:51

Ответ № 227537

Здравствуйте, Sergey V. Gornostaev!
Попробуйте после того как отработает Ваш макрос выполнить еще и такую процедуру
Public Sub DelHeaders()
Dim i As Integer
For i = 1 To Documents.Count
For Each aStory In Documents(i).StoryRanges
If aStory.StoryType = wdPrimaryHeaderStory Or a...


Автор ответа: YAV (Специалист)
Дата отправки ответа: 19.08.2008, 23:24
• Пакет MSOffice
Вопрос № 139229 ушел в рассылку

Здравствуйте, уважаемые эксперты!
Вопрос: Начальство желает контролировать своих служащих. Желает знать сколько договоров оформлено за день (неделю, месяц). Вот меня и озадачило.

Контора занимается оформлением однотипных договоров, меняются только фамилии клиентов, адреса и прочие рекви...


Автор вопроса: Меннибаев Самат Маисович / Som
Дата отправки вопроса: 05.06.2008, 21:58

Ответ № 225694

Здравствуйте, Меннибаев Самат Маисович / Som!
По поводу вопроса 1. Можно для этого вам надо использовать встроенный язык VBA
Вот код
Private Sub Document_Open()
InitEvents
End Sub

'Модуль 1
Dim x As New AppEvents
Public Sub InitEvents()
Set x.appWord = Applic...


Автор ответа: YAV (Специалист)
Дата отправки ответа: 08.06.2008, 18:52
• Пакет MSOffice
Вопрос № 138581 ушел в рассылку

Здравствуйте!
Форматирую документы (после распознавания) в ворде для последующей выкладки в веб (другим человеком).
Иногда появляются "лишние" картинки, (линии, дефекты распознавания)Э которые в документе не видны (в любом из режимов просмотра, даже в веб-режиме), но когда сохраняю...


Автор вопроса: Бакуменко Валентина Евгеньевна
Дата отправки вопроса: 29.05.2008, 21:19

Ответ № 225061

Здравствуйте, Бакуменко Валентина Евгеньевна!
Да, их можно найти и удалить из документа
Вот макрос, который удаляет все картинки и фигуры из документа Word

Public Sub DelAllPicturesAndFigures()
Dim sh As Shape
Dim insh As InlineShape
For Each sh In ThisDocument.Sha...


Автор ответа: YAV (Специалист)
Дата отправки ответа: 31.05.2008, 00:54
• Пакет MSOffice
Вопрос № 137386 ушел в рассылку

Снова здравствуйте. Имеется довольно большая электронная таблица Excel, заполненная данными в формате времени ЧЧ:ММ. Требуется как можно быстрее увеличить все значения времени в ней на 5 минут.
Подскажите, пожалуйста, побыстрее, как это сделать, а то я сам не могу догадаться.


Автор вопроса: Syarik
Дата отправки вопроса: 18.05.2008, 18:43

Ответ № 223982

Здравствуйте, Syarik!
Вот макрос, который увеличивает время во всех непустых ячейках активного раб листа. Только формат у ячеек должен быть соотвествующий - временной ЧЧ:ММ

Public Sub IncTime5()
Dim cell
For Each cell In ActiveSheet.Cells
If cell.Value <> "" ...


Автор ответа: YAV (Специалист)
Дата отправки ответа: 18.05.2008, 21:36
• Пакет MSOffice
Вопрос № 135773 ушел в рассылку

Товарищи, подскажите пожалуйста, как можно осуществить следующее:

есть документ (база) в Экселе. нужно, чтобы каждые сутки документ обрезался (удалялись некоторые заданные колонки) и этот дубликат помещался в другой каталог. Оригинал должен оставаться незатронутым в исходном месте.


Автор вопроса: Гарик Николенко
Дата отправки вопроса: 07.05.2008, 13:07

Ответ № 222782

Здравствуйте, Гарик Николенко!
Вот код который через 15 секунд после того как был открыт оригинальный документ
удаляет в нем столбец А сохраняет под именем duplicat, закрывает без сохранения
оригинал и выходит из Excel

Private Sub Workbook_Open()
Application.OnTime TimeValue...


Автор ответа: YAV (Специалист)
Дата отправки ответа: 09.05.2008, 00:03
• Пакет MSOffice
Вопрос № 133489 ушел в рассылку

Вопрос по PowerPoint У меня не получается наложить звук на слайд. Открываю Меню- Анимация. Там выбираю Звук перехода. Ставлю нужную мелодию. Слайд открывается, музыка начинает играть, но припереходе на другой слайд она так и продолжает играть. А мне нужно чтобы музыка остановилась.
Вообщем если ...


Автор вопроса: Kalgri
Дата отправки вопроса: 21.04.2008, 23:41

Ответ № 221067

Здравствуйте, Kalgri!
В главном меню PowerPoint выберите Вставка-Фильмы и звук-Звук из файла. На слайде появиться значок. Кликните по нему Левой кнопкой мыши затем правой и выберите настройка анимации. В правой части экрана появиться окно настройка анимации. Там вы увидите Ваш файл
щелкните...


Автор ответа: YAV (Специалист)
Дата отправки ответа: 24.04.2008, 22:37
• Пакет MSOffice
Вопрос № 129765 ушел в рассылку

Доброго времени суток.
Проблема: начальнику необходимо любой документ Word, напечатанный с любыми параметрами (шрифт, линейка, интервал, отступ, абзац) одним нажатием клавиши (сочетанием клавиш) отформатировать под нужные ему параметры. Дал подсказку, что как-то через макросы ему делали раньше....


Автор вопроса: Panama
Дата отправки вопроса: 30.03.2008, 19:09

Ответ № 217249

Здравствуйте, Panama!
Шрифт можно поменять так

Selection.WholeStory
Selection.Font.Name = "Times New Roman" шрифт
Selection.Font.Size = 20 размер
Selection.Font.Bold = wdToggle

Интервал, отступ, абзац регулируются так
...


Автор ответа: YAV (Специалист)
Дата отправки ответа: 30.03.2008, 20:59
• Пакет MSOffice
Вопрос № 122899 ушел в рассылку

Доброго времени суток!
VBA Exel. Две рабочие книги при открытии запускают форму Userform1 и Userform2. Открываем первую книгу. При наступлении определенного события в Userform1(например нажатие кнопки) необходимо, чтобы управление было передано второй рабочей книге (а именно должно сработать соб...


Автор вопроса: Фоменко Сергей Владимирович
Дата отправки вопроса: 13.02.2008, 01:26

Ответ № 210681

Здравствуйте, Фоменко Сергей Владимирович!
Это возможно.
1) Откройте рабочую книгу номер два, в которой UserForm2
2) Откройте редактор VBA
3) В главном меню выберите Insert-Module, должен добавиться новый модуль Module 1
3) В него скопируйте такой вот код

Public S...


Автор ответа: YAV (Специалист)
Дата отправки ответа: 16.02.2008, 21:51
• Пакет MSOffice
Вопрос № 121788 ушел в рассылку

Здравствуйте уважаемые Эксперты!!! Помогите пожалуйста. Я скачал набор шрифтов и поместил их в папку Shrift программы Microsoft Office (2003), но когда открываю документ и хочу воспользоваться шрифтом, то его там нет. Там только стандартный набор и то не весь открывается.
Как мне вставить закаче...


Автор вопроса: Овсейчик Сергей Иванович
Дата отправки вопроса: 05.02.2008, 17:48

Ответ № 208685

Здравствуйте, Овсейчик Сергей Иванович!
Скопируйте Ваши шрифты в папку Панель Управления - Шрифты


Автор ответа: YAV (Специалист)
Дата отправки ответа: 05.02.2008, 22:21
• Пакет MSOffice
Вопрос № 121556 ушел в рассылку

Доброго времени суток! Вопрос по VBA Exel.
В ячейке рабочего листа хранится адрес интернет. На моей форме UserForm1 есть кнопка CommfndButton1. Форма загружается при открытии книги.
Как сделать так, чтобы при нажатии на кнопку открылся документ, ссылка на который хранится в ячейке?


Автор вопроса: Фоменко Сергей Владимирович
Дата отправки вопроса: 04.02.2008, 10:28

Ответ № 208504

Здравствуйте, Фоменко Сергей Владимирович!
Можно использовать API функцию ShellExecute
Чтобы всё заработало откройте редактор VBA и создайте
модуль в него скопируйте вот этот код:
Private Declare Function ShellExecute Lib "shell32.dll" Alias _
"ShellExecuteA...


Автор ответа: YAV (Специалист)
Дата отправки ответа: 05.02.2008, 01:11
• Пакет MSOffice
Вопрос № 116768 ушел в рассылку

Уважаемые эксперты, помогите сделать диаграмму.

есть список из IP адресов
пример

213.184.24.10
213.184.24.10
217.150.55.10
217.21.40.10
217.21.40.10
217.21.40.10


нужно нарисовать диаграмму по количеству пользователей в подсети
...


Автор вопроса: Кэр Лаэда
Дата отправки вопроса: 03.01.2008, 19:18

Ответ № 202908

Здравствуйте, Кэр Лаэда!
Можно с помощью функции =ПСТР(C5;5;3) выделить номер подсети для каждого из
IP адресов.Если он трехзначный, то вернется 184,150? а если двух значный, то 21.
Но это не страшно. А затем с помощью функции =СЧЁТЕСЛИ(E10:E15;"=184") подсчитать количество для...


Автор ответа: YAV (Специалист)
Дата отправки ответа: 04.01.2008, 00:35
• Пакет MSOffice
Вопрос № 116228 ушел в рассылку

Уважаемые эксперты! Помогите, пожалуйста: в Wordе надо курсовую работу сделать так, чтобы на каждом листе была рамка с чертежным графическим штампом внизу листа. Рамка должна находиться на расстоянии 0,7 см от края листа - сверху, снизу и справа и 20 см - слева листа. Кроме того, текст внутри рамки ...


Автор вопроса: Варфоломеева Луиза Николаевна
Дата отправки вопроса: 27.12.2007, 20:57

Ответ № 202245

Здравствуйте, Варфоломеева Луиза Николаевна!
Я столкнулся с Вашей проблемой, когда писал диплом и у меня уже есть готовый
шаблон, с нарисованной рамкой, сообщите куда мне его прислать. А нумерация
листов осуществляется с помощью такого макроса

Public Sub numeration_of_page...


Автор ответа: YAV (Специалист)
Дата отправки ответа: 27.12.2007, 21:37
• Пакет MSOffice
Вопрос № 113309 ушел в рассылку

Мне нужно с помощью функций выполнить следующее задание в Excel.
В ячейку А7 ввести слово из 5 букв, в ячейке А8 вычислить сумму порядковых номеров букв. Помогите пожалуйста.


Автор вопроса: lyalya
Дата отправки вопроса: 10.12.2007, 21:56

Ответ № 199135

Здравствуйте, lyalya!
Вот посмотрите как вариант.
В ячейке А8 такая формула, которая и вычисляет сумму порядковых номеров:
=СУММ(ДЛСТР(A7);ДЛСТР(A7)-1;ДЛСТР(A7)-2;ДЛСТР(A7)-3;ДЛСТР(A7)-4)


Автор ответа: YAV (Специалист)
Дата отправки ответа: 10.12.2007, 22:52
• Пакет MSOffice
Вопрос № 112984 ушел в рассылку

Доброго времени суток! Скажите, пожалуйста, можно ли произвести какие либо действия с каждой из ячеек Exel в определенном диапазоне с помощью цикла For Each …Next


Автор вопроса: Фоменко Сергей Владимирович
Дата отправки вопроса: 08.12.2007, 19:26

Ответ № 198810

Здравствуйте, Фоменко Сергей Владимирович!
Можно, для этого и предназначены циклы.
Например, ВАМ нужно вписать текст в каждую ячейку диапазона A2:H20
Для этого напишем такой код

Public Sub WorkWithCells()
Dim Cell
For Each Cell In Range("A2:H20")
Cell...


Автор ответа: YAV (Специалист)
Дата отправки ответа: 08.12.2007, 22:24
• Пакет MSOffice
Вопрос № 105510 ушел в рассылку

Здравствуйте!
Подскажите пожалуйста можно ли сделать в колонке excel выбор даты из календаря?
Большое спасибо.


Автор вопроса: Борода Алексей Борисович
Дата отправки вопроса: 15.10.2007, 11:39

Ответ № 188839

Здравствуйте, Борода Алексей Борисович!
Можно. Для этого Вам нужно найти компонент
календарь и добавить его к элементам
управления. Для этого откройте редактор VBA Alt+F11
в главном меню выберите Insert-UserForm появиться новая
форма и автоматически откроется панель стандартных...


Автор ответа: YAV (Специалист)
Дата отправки ответа: 17.10.2007, 00:45
• Пакет MSOffice
Вопрос № 105254 ушел в рассылку

Здравствуйте Уважаемые эксперты! Я немогу найти элекутронный учебник, по изучению программы Ворд! Я хотела бы начать с начала! Помогите пожалуйста? Спасибо.


Автор вопроса: Ремнева Инна Геннадиевна
Дата отправки вопроса: 12.10.2007, 22:34

Ответ № 188436

Здравствуйте, Ремнева Инна Геннадиевна!
И в дополнение вот ссылка на хороший справочник по ворду
http://wordexpert.ru/download.php?file=http://wordexpert.ru/wp-content/uploads/we.chm
там есть почти всё что необходимо сам пользуюсь


Автор ответа: YAV (Специалист)
Дата отправки ответа: 15.10.2007, 00:16
• Пакет MSOffice
Вопрос № 105006 ушел в рассылку

Здравствуйте ЭКСПЕРТЫ !
Имеется лист Excel, имеется столбец с датами. Как приделать дни недели к этому столбцу (чтобы в соседнем или в столбце с датами отображались дни недели)?
Проблема заключается в том, что в столбце с датами бывают проскальзывания( к примеру после 9.10.2007 может идти 11...


Автор вопроса: Жорж
Дата отправки вопроса: 10.10.2007, 23:30

Ответ № 187813

Здравствуйте, Жорж!
Воспользуйтесь таким макросом

Public Sub DayOfW()
Dim i As Integer
i = 1
While Range("A" + CStr(i)).Value <> ""
Range("B" + CStr(i)).Value = Format(Range("A" + CStr(i)).Value, "dddd")
i = i +...


Автор ответа: YAV (Специалист)
Дата отправки ответа: 11.10.2007, 00:08
• Пакет MSOffice
Вопрос № 104924 ушел в рассылку

Уважаемые эксперты!
Был установлен Nice PDF creator. После его удаления в меню Word "Файл" остался пункт Nice PDF creator с подменю. Можно ли его удалить и как это сделать. Где-то встречал, что можно удалять пункты меню Word Ctrl+Alt+-, навести жирный курсор на пункт, который надо удал...


Автор вопроса: Coherent
Дата отправки вопроса: 10.10.2007, 10:32

Ответ № 187805

Здравствуйте, Coherent!
У меня была такая же проблема
Воспользуйтесь следующим макросом

Public Sub ReMoveFromMenu()
Dim MyMenu As CommandBarControl
Dim MyCBar As CommandBar
Dim MyCon As CommandBarControl
Set MyCBar = CommandBars.ActiveMenuBar
Set MyMenu = ...


Автор ответа: YAV (Специалист)
Дата отправки ответа: 10.10.2007, 23:35