Предполагая, что вы хотите сохранить его как числовое значение c, вам нужно будет отформатировать ячейку, в которой оно находится. Если вы поместите его в ячейку A1, вы должны использовать:
Range("A1").NumberFormat = "000000000"
To верните его обратно в текстовое поле, как показано, используйте свойство .Text
вместо свойства .Value
.
txtNumber = Range("A1").Text
Однако свойство .Text
просто извлекает то, что вы видите в ячейке, поэтому, если их ячейка недостаточно широка для отображения всего числа, вместо этого может отображаться что-то вроде #####
, и в этом случае это то, что даст вам свойство .Text
.
Чтобы справиться с этим, вы можете использовать метод AutoSize
перед получением свойства:
Range("A1").Columns.AutoFit
или
Columns(1).Autofit