Страницы: 1
RSS
Почему на Integer считает, а на Double нет
 
Вот мой код вба:
Код
Sub Macros2()
        Dim x As Integer
        x = Selection.Value
        Selection.FormulaR1C1 = Empty
        Selection.FormulaR1C1 = "=RC[-2]*" & x
End Sub
Считает без проблем, но не когда в ячейке дробные числа. Если поменять Integer на Double или любой другой, то выбивает ошибку 1004, я не понимаю в чем проблема. На Double отдельно может перемножать формулы, отдельно может перемножать вводные, но и то, и то вывести просто нет. Я только начал разбираться в ВБА, но сразу в тупике
 
Цитата
Astronaut написал:
не понимаю в чем проблема.
Нужно, чтобы в VBA разделителем целой и дробной части была точка.
Как посмотреть, что там запятая: Debug.Print "=RC[-2]*" & x
Замените & x на & Replace(x, ",", ".")
или на & Trim(Str(x))
Изменено: ZVI - 25.04.2024 21:06:27
Страницы: 1
Наверх