Деление дает неправильное значение

Question

Ребята, это сводит меня с ума!Я пытаюсь разделить две ячейки, и ответ всегда 1. Посмотрите на картинку, чтобы понять больше о проблеме: https://imgur.com/B8NfWJh Как видите, я использую правильный номер листа.

Переменная «PTDPE» ранее не использовалась в коде.Я не хочу беспокоить вас, ребята, кодом, так как он содержит около 600 строк, но если вам нужно, я могу добавить его сюда.

Dim PTDPE As Integer

PTDPE = Sheets(2).Cells(17, 6).Value / Sheets(2).Cells(17, 7).Value

Worksheets("Sheet2").Cells(17, 8).Value = PTDPE

Другие переменные в порядке и дают правильное значение,но этот всегда показывает 1

Answer 1

Вы объявили PTDPE As Integer.Когда Excel выполняет деление, он округляет результат до ближайшего Integer - в данном случае 1.

Измените значение декарации на Dim PTDPE As Single