|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
13.04.2015, 18:45 | #1 |
Пользователь
Регистрация: 30.08.2013
Сообщений: 29
|
Формат числа в TextBox
Добрый день.
Прошу помощи!!!!!! Private Sub pechat_Click() Dim lNumber As Long Dim i As Long Set mL1 = Лист1 'Помещаем в переменную lNumber, с какого номера 'должна начинаться нумерация. lNumber = Me.TextBox2.Value 'Делаем столько витков цикла, сколько страниц надо распечатать. For i = 1 To Me.TextBox1.Value Step 1 'Помещаем в ячейку "A1" данные из переменной lNumber. mL1.Range("B39").Value = lNumber 'Печатаем. mL1.Range("A1:E44").PrintOut , Collate:=True 'Помещаем в переменную lNumber новое число для следующего витка цикла. lNumber = lNumber + 1 Next i End Sub Нужно чтоб в ячейке В39 формат числа был 8 разрядный с нулями впереди. Пример: Сколько страниц печатать - 10 Начать с номера 00000001 и последовательно напечатались 10 страниц с номерами от 00000001 по 00000011 сейчас нули отсекаются. Буду очень признателен!!!!! |
13.04.2015, 18:53 | #2 |
Новичок
СтарожилДжуниор
Регистрация: 05.02.2008
Сообщений: 9,487
|
format(1, "00000000") = 00000001
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
|
14.04.2015, 11:55 | #3 |
Пользователь
Регистрация: 30.08.2013
Сообщений: 29
|
Сделал, но не так
mL1.Range("B39").NumberFormat = "00000000" Все работает. Спасибо!! |
Опции темы | Поиск в этой теме |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Val() и формат числа | VictorM | Microsoft Office Excel | 7 | 29.03.2012 12:35 |
Странный формат числа. | Klim Bassenger | Microsoft Office Excel | 19 | 23.12.2009 13:37 |
Формат числа | mchip | Microsoft Office Word | 15 | 17.11.2009 00:32 |
Формат числа в калькуляторе | Mint86 | Microsoft Office Excel | 8 | 25.07.2008 11:49 |
формат отрицательного числа | zetrix | Microsoft Office Excel | 0 | 30.10.2006 18:54 |