Форум программистов, компьютерный форум, киберфорум
VBA
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
VBA Программно развернуть окно exe-программы https://www.cyberforum.ru/ vba/ thread2246695.html
Приветствую всех! Кто поможет с вопросом? Кодом VBA Excel нужно развернуть окно exe-программы, независимо от его состояния (свернуто или нет). Если возможно, то не прибегая к имитации нажатия клавиш, если нет, то, имитируя нажатие "WIN" + "UP" при активированном окне. Спасибо всем откликнувшимся.
VBA Определить по введенной дате, к какому знаку цветка он относится
Здравствуйте дорогие пользователи . Помогите с заданием по VBA : Составить программу, в которой определить по введенной дате, к какому знаку цветка он относится. Сделать через case Добавлено через 58 минут ГОРЕЧАВКА ЖЕЛТАЯ (1 января-10 января ЧЕРТОПОЛОХ 11 января-20 января БЕССМЕРТНИК 21 января-31 января ОМЕЛА 1 февраля-10 февраля КРАСАВКА 11 февраля-19 февраля
VBA Самовоспроизведение кода https://www.cyberforum.ru/ vba/ thread2246613.html
Доброго времени суток, форумчане! Прошу помощи с кодом! Есть форма, в которой содержаться checkboxы, отвечающие за отображение столбцов(скрыть/показать) Необходимо добавить возможность: 1)Добавлять через форму новые столбцы 2)Автоматически создавать новый checkbox для управления видимости нового столбца
VBA Задать условие выполнения кода для каждой отдельной страницы Подскажите пожалуйста как задать условие выполнения кода для каждой отдельной страницы For Each wdPage In ActiveDocument выдает ошибку и если можно как задать условие выполнения кода для каждых двух следующих страниц https://www.cyberforum.ru/ vba/ thread2246584.html
Сравнение 2-х сводных таблц в екселе макросом VBA
Есть 2 сводные таблицы с двумя колонками код товара и сумма в одной таблице и такие же колонки в другой таблице, но таблицы формируются с разных источников и между ними бывают расхождения в сумме. Пример данных и сводных таблиц во вложении. Данные1 _ свод: 1. Код товара 2. Сумма1 Данные2 _ свод: 1. Код товара
VBA Поиск и замена строк по маске Имеется строки с разделителем «;» в нескольких колонках файла Excel большого размера следующего содержимого: Параметр 1 = Хx; Параметр 2 = Yx;Параметр 3 = Zx; Параметр N = Nx; Вопрос в том, как оставить в строке, например, Параметр 2 и Параметр 3, а остальные удалить если после знака «=» различные цифровые значения? Пробовал построчно, функциями instr и Split - медленно получается. https://www.cyberforum.ru/ vba/ thread2246398.html
VBA Программа с перемножением матриц Помогите написать программу, которая будет перемножать матрицы. Вот вариант проги, но не выводит третью матрицу(перемноженную), не понимаю где ошибка Выделяет ошибку в строке: mas3(v,c)=mas3(v,c)+(mas1(g,v)*mas2(c,g)) и пишет индекс вне диапазона. Dim mas() As Single Private Sub CommandButton1_Click() Dim n, m, i, j, k, f, s, h, v, c, g, X As Integer n = Val(TextBox2.Text) m =... https://www.cyberforum.ru/ vba/ thread2246060.html Запись текущей дату в Excel после отправки писем из Excel через Outlook VBA
Добрый день, друзья Во вложенном файле Запрос - mail реализован макрос который выполняет создание и отправку писем через Outlook. После запуска макроса формируются письма и таблицы, которые вставляются в тело письма. После этого макрос делает запись текущей даты в таблицу БАЗА ЗАЯВОК 2018 в столбец AI напротив строки которая содержит код (№ Заявки). То есть в таблице Запрос - mail есть...
VBA Построение графа https://www.cyberforum.ru/ vba/ thread2245853.html
Здравствуйте. Задали в институте задание - построить граф по таблице. В общем - это таблица связности. И те места в которых два узла как бы соединены - их пересечение в таблице (строки и столбца) - помечены единицей. В моем понимании - узел - должен быть уже заранее нарисован - в виде отдельного кружка. Каждый кружок - имеет латинскую букву - вписанную в него. И макрос по идее - должен...
VBA Отправка из VBA в телеграмм Добрый день всем! есть код который отправляет сообщение в телеграмм(нашел на просторах сети) помогите чтоб при изменении одной ячейки(с формулой) приходило сообщение, и проблема еще в том что присылает сообщение всего один раз. В VBA новичок. Sub Send_to_Telegram_Bot_example() Dim oHttp As Object Dim sURI As String 'token = "000000000:AaAaAaAaAaAaAaAaAaAaAa-aaa" 'chat_id = "000000000"... https://www.cyberforum.ru/ vba/ thread2245842.html
Задан вектор c={c1, c2, …, cn}. Найти вектор y={c1/|c|, c2/|c|, …, cn/|c|}, где |c| - длина вектора c VBA
Задан вектор c={c1, c2, …, cn}. Найти вектор y={c1/|c|, c2/|c|, …, cn/|c|}, где |c| - длина вектора c Примерно так нужно сделать Пример: Дан массив а={a1,a2, …, a15}. Найти модуль разности между максимальным и минимальным элементами массива. Sub lr5_1() Dim a(15),min, max, mod_raz, i As Integer Dim s As String S=””
VBA Создание формы, заполняющей таблицу, в Excel. Не могу настроить полосу прокрутки https://www.cyberforum.ru/ vba/ thread2245725.html
Задание: Разработать приложение, позволяющее при помощи диалогового окна, показанного на рисунке создавать таблицу Список студентов Я ничего не понимаю в VBA пока что, в
15146 / 6419 / 1731
Регистрация: 24.09.2011
Сообщений: 9,999
16.05.2018, 09:36 0

Нормализация чисел с плавающей запятой - VBA - Ответ 12394078

16.05.2018, 09:36. Показов 2000. Ответов 1
Метки (Все метки)

Ответ

uspu, нужно получить двоичное представление числа с плавающей точкой, это?
https://ru.wikipedia.org/wiki/... 1%82%D0%B8
Можно просто скопировать содержимое переменной типа Double или Single в массив байт, дальше просто
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
'Excel 32 bit!
 
Declare Sub GetMem8 Lib "msvbvm60" (src As Any, dst As Any)
 
Function Dbl2Bits$(d#)
Dim b(0 To 7) As Byte, i&
  GetMem8 d, b(0)
  For i = 7 To 0 Step -1
'    Dbl2Bits = Dbl2Bits & " " & WorksheetFunction.Dec2Hex(b(i), 2) 'для сравнения
    Dbl2Bits = Dbl2Bits & " " & WorksheetFunction.Dec2Bin(b(i), 8)
  Next
  Dbl2Bits = Mid$(Dbl2Bits, 2)
End Function
Тест в Immediate
Код
?dbl2bits(1/3)
00111111 11010101 01010101 01010101 01010101 01010101 01010101 01010101
Добавлено через 8 минут
Можно онлайн сервис использовать: http://www.binaryconvert.com/convert_double.html

Вернуться к обсуждению:
Нормализация чисел с плавающей запятой VBA
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
16.05.2018, 09:36
Готовые ответы и решения:

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

Сложение чисел с плавающей запятой
Здравствуйте. Помогите разобраться в сложение чисел с плавающей точкой(IEEE754). Например...

Сложение чисел с плавающей запятой
Помогите пожалуйста. Сложение чисел с плавающей запятой Ма= -0,111101 Ра= -011 Мв=...

Сравнение чисел с плавающей запятой
Сравнение чисел с плавающей запятой. В этой теме я попробую "просто" объяснить новичкам в...

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

Вывод чисел с плавающей запятой
Доброго времени суток, в программе при выводе значений остаются незначимые нули, можно ли как...

Вычисления с чисел с плавающей запятой
Есть в БД поле с числом (например 0,12). Формат в БД: Одинарное с плавающей точкой, Основной, 2...

Умножение чисел с плавающей запятой
Тут произошёл интересный случай, когда сделал умножение я увидел что любое число например это будет...

Округление чисел с плавающей запятой
Здравствуйте товарищи программисты. Есть вопрос по функции FloatToStrF. Для моей задачи нужно...

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