Назначить ячейке в Excel текстовый формат - VB

Формулировка задачи:

Здравствуйте..В VB я практически ничего не знаю,но потребовалось мне выгрузить из бд в Excel таблицу,в которой есть счета...Делаю я это с помощью VB, но вот проблема...Счета большие и выгружаясь в Excel их значения заменяются на что-то вроде 1,5E+20...Если перевести в числовой формат, то 15 первых цифр счёта - те,что надо,а остальные заменяются нулями...
Как я понимаю,мне сначала надо назначить заполняемым ячейкам текстовый формат, а уже потом
ExcelWorksheet.Range("A"+trim(i+2)).Value = Query.FieldByName("ORIG_SYSTEM_CUSTOMER_REF").value
заполнять ячейки...
Вопрос в том,как в VB назначить ячейке текстовый формат...Пожалуйста подскажите

Решение задачи: «Назначить ячейке в Excel текстовый формат»

textual
                            Листинг программы 
                        
                            ExcelWorksheet.Range(<font color="teal">"A"</font>+trim(i+<font color="darkblue"><b>2</b></font>)).NumberFormat = <font color="teal">"@"</font>