Последние записи

made in programmersforum 6

Интенсив по Python: Работа с API и фреймворками 24-26 ИЮНЯ 2022. Знаете Python, но хотите расширить свои навыки?
Slurm подготовили для вас особенный продукт! Оставить заявку по ссылке - https://slurm.club/3MeqNEk

Online-курс Java с оплатой после трудоустройства. Каждый выпускник получает предложение о работе
И зарплату на 30% выше ожидаемой, подробнее на сайте академии, ссылка - ttps://clck.ru/fCrQw

6th
Авг

Округление до сотых и выгрузка всех столбцов в txt файл в execl

Posted by Chas under Basic, Пост-обзор

Казанский:
Попробуйте макрос — работает с выделенной областью.
В принципе, экспорт в txt можно поместить в этот же макрос.



Sub AdvSent()

Dim c As Range, s$, i&

For Each c In Selection

    s = c

    i = InStrRev(s, ",")

    c.Value = Left$(s, i) & Replace$(Format$(Val(Mid$(s, i + 1)), "0.00"), ",", ".")

Next

End Sub

тема на форуме