Top.Mail.Ru
Ответы

Язык программирования Visual Basic for Application ПОМОГИТЕ!!! ОЧЕНЬ НАДО. (ДА ДА ЭТО МОИ ДОЛГИ) Прошу понять и помочь.

1.Создать макрос, который получает список слов, выделенных в документе Microsoft Word полужирным курсивом, а также номера страниц, на которых находятся эти слова.
2.Создать макрос, который вычисляет сумму чисел в диапазоне A1:D4 листа 1 книги Microsoft Excel.
3.Создать консольное приложение, которое определяет является ли число N (N<100) простым. Простое число делится без остатка только сама на себя и на единицу.
4.Создать консольное приложение, которое находит первый из элементов, больших 1000, в арифметической последовательности 1, 3, 6, …

Только авторизированные пользователи могут оставлять свои ответы
Дата
Популярность
Аватар пользователя
Новичок

1. Цикл по словам, вывод тех, что выделены жирным
Sub MyWords()
Dim r As Range
For Each r In ThisDocument.Words
If r.Bold Then MsgBox r.Text
Next
End Sub

2. Используйте функции листа в коде
Sub MySum
MsgBox WorksheetFunction.Sum([Лист1!A1:D4])
'Или Range("Лист1!A1:D4") вместо [...], если привыкли к Range в таком виде
End Sub

Дальше сами.

Пункт 3 и 4 вряд-ли от _VBA_.
Как на VBA без извращений с WinAPI делать _консольное_ приложение - я не представляю. Скорее всего это из другой области вопросы. Н-р VB.NET.

ЗЫЖ Если вдруг "консольное" это вывод в Debug.Print - это НЕ консольное приложение

Аватар пользователя
Гуру

.Создать макрос, который получает список слов