Форум программистов, компьютерный форум, киберфорум
VBA
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
VBA Вычислить объем и площадь поверхности призмы https://www.cyberforum.ru/ vba/ thread2211395.html
1. Вычислить объем и площадь поверхности призмы, в основании которой ромб, меньшая диагональ которого равна стороне ромба и равна А, а высота призмы равна полупериметру основания.
VBA Макрос. Приведение документа WORD к нужному виду
Всем доброго времени суток. Есть некий документ WORD написанный абы как. Необходимо макросом исправить в нем лишние/не достающие пробелы, абзацы пустые строки. Необходимо функционирование макроса в WORD 2007 (2013) С двойными и лишними пробелами смог побороться вот таким макросом. Sub DeleteSpace() Selection.WholeStory Selection.Find.ClearFormatting...
VBA Расположение UserForm в пределах окна Excel https://www.cyberforum.ru/ vba/ thread2211311.html
Здравствуйте! на листе имеется Кнопка, по нажатию на которую вызывается форма Кнопка: Option Explicit Sub Кнопка1_Щелчок() UserForm1.Show End Sub
VBA Решение биквадратного уравнения Здравствуйте, уважаемые форумчане. Столкнулся с заданием "Решить биквадратное уравнение вида ax4+bx2+cx=0. Вот сам код Sub BiKvadrat() Dim a As Single Dim b As Single Dim c As Single Dim x1 As String Dim x2 As String Dim x3 As String Dim x4 As String https://www.cyberforum.ru/ vba/ thread2211260.html
VBA Написать код к задаче. Выполняется в Microsoft VBA Excel
Кондитерская фабрика для производства двух видов карамели использует три вида основного сырья: сахарный песок, патоку и фруктовое пюре. Нормы расхода сырья каждого вида на производство одной тонны карамели данного вида, количество сырья каждого вида, которое может быть использовано фабрикой и прибыль от реализации 1т карамели данного вида известны. Определить план производства карамели,...
VBA Написать код формулы https://www.cyberforum.ru/ vba/ thread2210941.html
VBA Поиск по столбцу A:A по всем листам документа кроме первого https://www.cyberforum.ru/ vba/ thread2210831.html
Здравствуйте! имею код поиска заданного значения по столбцу активного листа, Dim poz As Range, rng As Range, Adr As String, cc As Integer, TxtForFind As TxtForFind = Worksheets("List1").Range("K1").Value ' значение для поиска Set rng = ActiveSheet.Range("A:A") Set poz = rng.Find(What:=TxtForFind, LookAt:=xlWhole, SearchOrder:=xlByRows) If...
Столбец для вычислений - как дать ссылку на другой столбец из VBA VBA
Новичок в VBA и не могу разобраться как мне переписать вот такую рабочую конструкцию на что-то более лаконичное: Sub GetPrice() Worksheets("Сводное").Range("I2").Value = PriceCount(Trim(Worksheets("Сводное").Range("C2").Value)) Worksheets("Сводное").Range("I3").Value = PriceCount(Trim(Worksheets("Сводное").Range("C3").Value)) Worksheets("Сводное").Range("I4").Value =...
VBA Подскажите, в где у меня ошибка. VBA https://www.cyberforum.ru/ vba/ thread2210733.html
Есть код: Dim temparray As Range Set temparray =Range("a1").CurrentRegion Range(Cells(1, 1), Cells(5, 5)).Value = temparray.Range(Cells(1, 1), Cells(5, 5)).Value Выдает ошибку 424. При этом код:
VBA Перенос строки, при изменении в выпадающем списке Всех приветствую я. Требуется помощь с Excel мне. есть таблица, с заказами, необходимо разделить на листы 1(основная)-Актуальные, 2-Завершённые, 3-Отменённые если в Актуальных у строки заказа меняется статус(выпадающее меню) на завершённые или отменённые. Соответствующие строки улетали в подходящий их статусу лист. Однако Актуальные могут разные статусы, типа "в расчёте", "отправка... https://www.cyberforum.ru/ vba/ thread2210698.html
Все возможные сочетания с перестановкой VBA
Есть макрос, выводит на отдельный лист все возможные сочетания слов из таблицы. Необходимо, чтоб он выдавал все возможные сочетания с перестановкой. Задача 1 3 2 4 Результат сейчас 1 3 2 3
VBA "Скрытое" слово из eq поля в другом EQ поле https://www.cyberforum.ru/ vba/ thread2210645.html
Всем привет! Помогите пожалуйста понять как в поле "eq " содержится слово из другого eq текста. Например есть предложение: "Органы и командиры владеют...", в формате Ctrl + F9 - "{eq Органы} и {eq командиры} владеют...". В WORD при выделение на слово с макросом, органы {eq органы} показывает количество 2 (двух слов!), не одного, после этого лезу проверять код поля (с вопросом:почему два слово, а...
1846 / 1161 / 354
Регистрация: 11.07.2014
Сообщений: 4,102
18.03.2018, 04:14 0

Даны числа А, В, С Меньшее из них утроить, "среднее" - удвоить После этого вновь найти большее, "среднее", меньшее - VBA - Ответ 12223203

18.03.2018, 04:14. Показов 3007. Ответов 13
Метки (Все метки)

Ответ

Sasha_Smirnov, 6; 6; 6;

Добавлено через 15 минут
fever brain,
Цитата Сообщение от fever brain Посмотреть сообщение
Я придерживаюсь мнения что лучше заново написать программу
с учетом исходных данных, чем исправлять корявый код
я не исправлял код, а просто взял вид листа у г-на "Изучайте", а макрос поставил свой

Вернуться к обсуждению:
Даны числа А, В, С Меньшее из них утроить, "среднее" - удвоить После этого вновь найти большее, "среднее", меньшее VBA
1
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
18.03.2018, 04:14
Готовые ответы и решения:

Даны действительные числа x,y,z. Нужно большее из них уменьшить в 2 раза, меньшее увеличить на среднее, а среднее оставить без изменения.
Даны действительные числа x,y,z. Большее из них уменьшить в 2 раза, меньшее увеличить на среднее,...

Операторы выбора. Даны три различных числа. Среднее поделить на меньшее, меньшее возвести в куб, большее оставить без изменения
Даны три различных числа. Среднее поделить на меньшее, меньшее возвести в куб, большее оставить без...

Операторы выбора. Даны 3 различных числа. Большее уменьшить на среднее, среднее заменить полуразностью двух других,меньшее увеличить втрое
Даны 3 различных числа. Большее уменьшить на среднее, среднее заменить полуразностью двух...

Даны действительные числа А, В, С. Большее из них возвести в квадрат, "среднее"(по величине)- в куб, меньшее -
Даны действительные числа А, В, С. Большее из них возвести в квадрат, "среднее"(по величине)- в...

Меньшее из двух чисел удвоить, а большее - утроить
Даны два целых числа a и b. Меньшее из двух чисел удвоить, а большее - утроить. Входные данные:...

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

Даны 2 числа. Большее из них заменить их суммой, меньшее их разностью
даны 2 числа,большее из них заменить суммой,меньшее их разностью. ПОМОГИТЕ,СРОЧНО!!!!

Даны 2 числа большее из них заменить суммой, меньшее произведением
Даны 2 числа большее из них заменить суммой, меньшее произведением

Даны два числа. Вывести вначале большее, а затем меньшее из них
Даны два числа. Вывести вначале большее, а затем меньшее из них.

Даны три числа. Вывести вначале большее, затем меньшее из них.
2. Используя условный оператор if, составить программы для решения следующих задач: а) Даны три...

Даны два числа. Вывести вначале большее, а затем меньшее из них
Даны два числа. Вывести вначале большее, а затем меньшее из них. if (a > b) cout << a; ...

Даны три числа. Вывести вначале большее, затем меньшее из них
Если не затруднит, помогите, пожалуйста написать программы в Паскале АВС.Спасибо большое......

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