|
|
Другие темы раздела | |
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 - Ответ 1222320318.03.2018, 04:14. Показов 3007. Ответов 13
Метки (Все метки)
Ответ
Sasha_Smirnov, 6; 6; 6;
Добавлено через 15 минут fever brain, я не исправлял код, а просто взял вид листа у г-на "Изучайте", а макрос поставил свой Вернуться к обсуждению: Даны числа А, В, С Меньшее из них утроить, "среднее" - удвоить После этого вновь найти большее, "среднее", меньшее VBA
1
|
18.03.2018, 04:14 | |
18.03.2018, 04:14 | |
Помогаю со студенческими работами здесь
0
Даны 2 числа. Большее из них заменить их суммой, меньшее их разностью Даны 2 числа большее из них заменить суммой, меньшее произведением Даны два числа. Вывести вначале большее, а затем меньшее из них Даны три числа. Вывести вначале большее, затем меньшее из них. Даны два числа. Вывести вначале большее, а затем меньшее из них Даны три числа. Вывести вначале большее, затем меньшее из них |