Форум программистов, компьютерный форум, киберфорум
VBA
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
VBA Как в обычный кусок текста вставить данные из ячеек? Есть таблица с данными. На листе2 текст в который нужно вставить эти данные. Должно таких текстов получиться столько же сколько строк в таблице. Подскажите как это делается? И возможно ли это. Вручную как то очень муторно... https://www.cyberforum.ru/ vba/ thread1456452.html уравнение VBA VBA
Добрый день, как осуществить в VBA следующую задачу решить уравнение (-0.25- N)x+b=(0,25 +N) x+d, что пользователь вводит два MS Excel ячейки b и d. Цена не должна быть менее 300 евро N = (Дата вашего рождения * месяц) / 1000 Заранее благодарю!
VBA Не удается изменить формат ячейки https://www.cyberforum.ru/ vba/ thread1456147.html
Добрый день! Прошу помощи, потому что уже все перепробовал, не могу понять в чем загвоздка. Суть вот в чем: имеется таблица с данными подобного плана: 35.895 35.833 34.36 34.38 28.38 29.532 35.045 20.552 35.489 35.437 34.153 34.101 27.838 28.499 34.774 20.535 35.682 35.48 33.954 33.862 27.453 28.002 34.505 20.514 36.147 36.133 33.152 33.289 26.564 27.264 33.916 20.481...
VBA Отключение макроса генератора случайных чисел по истечении текущей даты Здравствуйте, уважаемые форумчане. Имеется задача следующего рода: Необходимо отключение макроса генератора случайных числе по истечении текущей даты. Макрос активируется при изменении ячейки с "Месяцем" на лист 1. Ячейка сделана в виде выпадающего списка с месяцами. То есть при выборе "просроченного" месяца он не должен работать, а для будущих месяцев и текущего - должен. Сам макрос.... https://www.cyberforum.ru/ vba/ thread1456096.html
Обращение к файлу, у которого изменяется название VBA
Здравствуйте. В моем файле есть макрос. Нужно обратиться к другому файлу, который генерируется отдельным отчетом, но при этом к его названию иногда могут добавляться скобки, например, - "файл (1)". Есть ли возможность прописать обращение к файлу, например, добавив звездочку к имени? (звездочку добавлял, не получилось:))) Файл (1) нигде не сохранен, просто открыт после генерирования
VBA Преобразовать локальное форматирование в стили https://www.cyberforum.ru/ vba/ thread1455889.html
Привет. Есть тексты набранные в ворде. Много локального форматирования, которое зачастую весьма разнообразно. Нужно всё это преобразовать в символьные стили. Я думал примерно так (не судите строго — не программист): 1. Устанавливаем курсор в начале в образце текста который считаем базовым и запускаем макрос. 2. Макрос находит в тексте первое отличие форматирование от базового и заносит...
VBA Почему не выполняется условие? Код в прикрепляемых скриншотах. Также там указаны значения, которые, кстати, идентичны. Так почему же условие не выполняется. И ещё странно, что оно выполняется через раз. Если войти в программу и сделать всё чтобы было else и потом ещё раз выполнить условие, оно не выполняется. Если изначально всё сделать на then - то условие выполняется. Использую ms access. https://www.cyberforum.ru/ vba/ thread1455878.html VBA Блок-схема по листингу в VBA
Помогите составить блок-схему по данному листингу n = InputBox("Введите количество строк:", "Введите количество строк") m = InputBox("Введите количество столбцов:", "Введите количество столбцов") ReDim a(n, m) For i = 1 To n For j = 1 To m a(i, j) = InputBox("Введите A(" & i & "," & j & ")") Next j
VBA Внешнее правое объединение двух массивов vba https://www.cyberforum.ru/ vba/ thread1455405.html
Подскажите, как работает алгоритм внешнего правого объединения(М3=М1 right join М2) для двух двумерных массивов, используя vba?
VBA Работа с комментарием .Comment.Text и ShapeRange Парсил данные (заголовок - описание), и пришла в голову идея описание засунуть в комментарии к ячейкам с заголовками. Все получилась, комментарии проставляются. cells(2,1).Select For i = 1 To WorksheetFunction.CountA(Columns(1)) ActiveCell.AddComment ActiveCell.Comment.Visible = False qqq = ActiveCell.Offset(0, 1).Value If Len(qqq) = 0 Then qqq = " " https://www.cyberforum.ru/ vba/ thread1455392.html
VBA Обьект Data
как можно подключить базу даних access, что бы оно при виборе варианта подключалося к базе и вибирало соотвественный вариант, обьект дата не могу сопотставить, а форм много не вариант делать
VBA Определить количество элементов массива, принадлежащих промежутку от a до b Задача : Определить количество элементов массива, принадлежащих промежутку от a до b (значения a и b вводятся с клавиатуры; b > a) При запуске появляется ошибка "run time error 13 type mismatch" Sub abc() Dim a, b, k, i As Integer Dim l(10) As Integer https://www.cyberforum.ru/ vba/ thread1454866.html
15151 / 6424 / 1731
Регистрация: 24.09.2011
Сообщений: 9,999
24.05.2015, 16:53 0

Как умножать данные в готовом столбце? - VBA - Ответ 7662062

24.05.2015, 16:53. Показов 559. Ответов 3
Метки (Все метки)

Ответ

Runner63, выделите диапазон, запустите макрос
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Sub Runner63()
Const C73# = 7 / 3
Dim c As Range, i&, j&, s$(), d#, NBSP$
NBSP = Chr$(160)
For Each c In Selection
  s = Split(c, "%")
  For i = 0 To UBound(s)
    j = InStrRev(s(i), ":")
    If j Then
      d = Val(Replace$(Mid$(s(i), j + 1), NBSP, "")) * C73
      If d > 0 Then s(i) = Left$(s(i), j) & Replace$(Format$(d, "0.00"), ",", ".")
    End If
  Next
  c = Join(s, "%")
Next
End Sub


Вернуться к обсуждению:
Как умножать данные в готовом столбце? VBA
0
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
24.05.2015, 16:53
Готовые ответы и решения:

Как можно скопировать данные одной ячейки в столбце рандомно?
Привет! Как можно скопировать данные одной ячейки в столбце - рандомно? Т.е. мне нужно: Если в...

Как умножать числа?
Здравствуйте! я начала учить ассемблер и у меня появился вопрос. Как умножить положительное целое...

Работа с БД, как можно привязать к переменной $q данные которые находятся в столбце za?
У меня есть база данных Microsoft Access. $connect = odbc_connect("baza", "", "") or die( "Не...

Как сменить формат в столбце оставив неизменными данные в ячейках этого столбца
Здравствуйте.Подскажите решение,формат всех ячеек столбца F "ч : м" в ячейках данные записаны в...

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

Как дальше умножать матрицу на число?
Доброго времени суток.Народ в общем в ассемблере не очень вот возник вопрос: Необходимо решить...

Как транспонировать, умножать и находить обратные матрицы?
Напишите, пожалуйста, коды для операций транспонирования матрицы, нахождения обратной матрицы,...

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

Как рисовать на готовом canvas?
Друзья всем привет!! :) Недавно начал изучать canvas и всю эту тему и не могу разобраться как...

Как делать автозамену в готовом документе?
Я читаю законы, и нужно сокращать многие слова с помощью замены. Может кто знает, как это делать...

Как создать генератор чисел на готовом алгоритме
Приветствую Всех! Я новичок в программирование хотелось бы создать генератор чисел на алгоритме...

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