Форум программистов, компьютерный форум, киберфорум
VBA
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
VBA Разработка приложения "преобразование географических координат в прямоугольные и обратно" Программа делается в Excel. Ни как не могу разобраться что- к чему, нужен ваш аналитический ум! Tекст и примерный код задачи во вложении. Помогите пожалуйста, нужно очень! Буду признателен. И еще вопрос: интеграционный счетчик - это какой -то специальный счетчик или обычный из инструментария VBA? Спасибо! https://www.cyberforum.ru/ vba/ thread125648.html VBA Среди чисел 1, ..., n найти такие, запись которых совпадает с последними цифрами записи их квадратов
14. Дано натуральное число n. Среди чисел 1, ..., n найти такие, запись которых совпадает с последними цифрами записи их квадратов (например, 62 = 36, 252 = 625). Sub m_4() Dim n As Integer n = InputBox("enter number") If (n > 2) Then CountAndShowResult n Else MsgBox "Not correct data" End If
VBA Нумерация страниц посредством объектной модели Ворда Приветствую ! Подскажите, как с помощью объектной модели ворда можно пронумеровать страницы ? Также интересуеь вопрос генерации оглавления также при помощи объектной модели. Заранее спасибо ! https://www.cyberforum.ru/ vba/ thread125532.html VBA Возможность отмена действий после ввода в ячейку Excel данных Допустим я в Excel делал какие-то действия, но после ввода текста в ячейку через VBA: Sub m_1() ActiveCell.Value = "123" End Sub я не могу отменить действия, т.е. стрелочка Undo - блеклая (неактивная). Какие есть способы ввода в ячейку текста, чтобы можно было отменять предыдущие действия. https://www.cyberforum.ru/ vba/ thread125486.html
На отрезке найти натуральное число, имеющее наибольшее количество делителей VBA
Помагите пожалуйста решить!!!! на отрезке натуральное число, имеющее наи¬большее количество делителей.
VBA Импорт из Word в Excel Подскажите, пожалуйста, как написать макрос, чтобы данные из Word импортировались в Excel. Заранее спасибо. https://www.cyberforum.ru/ vba/ thread125354.html
VBA Двусторонняя замена фрагментов текста для двух языков Привет помоги с заданием по програмирвоанию на языке VBA.Вот условие 1. Запрограммируйте кнопку "Cancel" (Оттенивать) так, чтобы после ее нажатия окно формы закрывалось без превращения выделенного фрагмента текста. Подсказка. Воспользуйтесь командой закрывания формы END. 2. Обеспечьте двустороннюю замену фрагментов текста для двух языков Украинская =>Англійська и Английская Украинская так:... https://www.cyberforum.ru/ vba/ thread125222.html Один из двух других типов цикла VBA
Помагите решить задачу другим способом используя один из двух других типов цикла. 1 способ: Private Function CountAndShowResult(ByRef n As Integer) Dim p As Double p = 1 Dim d As Double For i = 2 To n d = 1 - 1 / (i ^ 2)
VBA VBA (формы) Создать форму для заполнения накладной склада медикаментов. Поля: действительна по, № накладной, код документа, основание операции, наименование медикаментов (раскрывающийся список), код, дата изготовления, срок годности, закупочная цена (появляется в зависимости от кода), категория (раскрывающийся список), количество, наличие скидок (раскрывающийся список),форма оплаты (раскрывающийся список),... https://www.cyberforum.ru/ vba/ thread125154.html VBA Задания по форме https://www.cyberforum.ru/ vba/ thread125135.html
1.Запрограммируйте кнопку "Cancel" (Оттенивать) так, чтобы после ее нажатия окно формы закрывалось без превращения выделенного фрагмента текста. 2. Обеспечьте двустороннюю замену фрагментов текста для двух языков Украинская =>Англійська и Английская Украинская так: любую украинскую букву выделенного фрагмента текста макрос может заменить соответствующей английской и наоборот. Это целесообразно...
VBA Импорт таблицы HTML в Word
Преобразовать Таблица (HTML) -> Таблица (Selection) с элементами форматирования (italics, bold, color, style…). Народ помогите пожалуйста реализовать. Заранее спасибо ;)
VBA Фильтр чисел: оставить строки с числами, оканчивающимися на 8 https://www.cyberforum.ru/ vba/ thread124899.html
спасибо за ответ, еще может подскажите: есть строки в ексель: 1 2 8 12 20 2 12 20 30 35 6 15 18 22 40 2 16 19 20 21 6 24 48 59 60 Нужно оставить строки с числами оканчивающимися на 8 (8 18,28 38 38)
0 / 0 / 0
Регистрация: 26.04.2010
Сообщений: 19
0

Выяснить, что цифры трехзначного числа N являются членами геометрической прогрессии - VBA - Ответ 706419

05.05.2010, 13:29. Показов 3204. Ответов 5
Метки (Все метки)

Author24 — интернет-сервис помощи студентам
Составить программу, печатающую значение true, если указанное высказывание является истинным, и false в противном случае: цифры данного трехзначного числа N являются членами геометрической прогрессии;
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Sub m_3()
Dim b As Long
Dim q As Long
Dim vИскомоеЧисло As Long
Dim vЧислоПрогрессии As Long
b = InputBox("Введите первый член Геометрической прогрессии")
q = InputBox("Введите знаменатель програссии")
vИскомоеЧисло = InputBox("Введите 3-х значное число, чтобы определить, является ли оно членом прогрессии")
Do While vИскомоеЧисло > b
    b = b * q
    If b = vИскомоеЧисло Then
        MsgBox "Это число являет членом Геометрической прогрессии"
        Exit Sub
    End If
Loop
MsgBox "Это число не являет членом Геометрической прогрессии"
End Sub
Надо сделать без условия используя Mid

Вернуться к обсуждению:
Выяснить, что цифры трехзначного числа N являются членами геометрической прогрессии VBA
0
Лучшие ответы (1)
Заказать работу у эксперта

Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
05.05.2010, 13:29
Готовые ответы и решения:

Цифры данного трехзначного числа N являются членами арифметической прогрессии
Цифры данного трехзначного числа N являются членами арифметической прогрессии

Определить, являются ли цифры данного трехзначного числа членами арифметической прогрессии
Составить программу,печатающую значение true,если указанное высказывание является истинным,и false...

Являются ли цифры членами арифметической прогрессии
Составить линейную программу, печатающую значение true, если указанное высказывание является...

Проверить что цифры трехзначного числа являются членами геометрической прогрессии
Составить программу, печатающую значение true, если указанное высказывание является истинным, и...

5
05.05.2010, 13:29
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
05.05.2010, 13:29
Помогаю со студенческими работами здесь

Определить, что цифры трехзначного n числа являются членами геометрической прогрессии
Кто Может Помогите с этой задачей ! Цифры данного трехзначного n числа являются членами...

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

2) Цифры данного трехзначного натурального числа являются членами геометрической прогрессии
помогите найти код

Проверить являются ли членами геометрической прогрессии цифры данного трехзначного натурального числа
цифры данного трехзначного гатурального числа являются членами геометрической прогрессии

Цифры данного трехзначного числа N являются членами арифметической прогрессии
Составить линейную программу, печатающую значение true, если указанное высказывание является...

Цифры даннго трехзначного числа N являются членами арифмететической прогрессии
Цифры даннго трехзначного числа N являются членами арифмететической прогрессии.

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru