Что-то вроде:
Worksheets("Sheet1").Range("A17").NumberFormat = "@"
Я не уверен, но думаю, что "@" означает текстовый формат.
Это только для одной ячейки, если вы хотите, чтобы все ячейки, я думаю, это может быть что-то вроде этого:
Worksheets("Sheet1").Range("B:B").NumberFormat="@"
на случай, если вам нужен только столбец B
`Worksheets("Sheet1").Range("A:E").NumberFormat="@"`
если вы хотите, чтобы все ваши данные читались как текст.