Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Изменение номера шаблона при печати - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Изменение номера шаблона при печати (Формулы/Formulas)
Изменение номера шаблона при печати
tklf88 Дата: Пятница, 16.10.2015, 20:47 | Сообщение № 1
Группа: Пользователи
Ранг: Прохожий
Сообщений: 5
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
Добрый вечер, Уважаемые продвинутые пользователи!
Совсем недавно появилась необходимость работать с excel, поэтому постепенно учусь.
Столкнулся со следующей проблемой:
Сегодня была задача напечатать 500 шаблонов доверенностей под разными номерами.
Поскольку я неуверенный пользователь, вынужден был менять номера и каждый печатать вручную это заняло достаточно много времени( на работе никто понятия не имеет и не хочет знать как это сделать, делают все руками)
вопрос такой: как это дело автоматизировать?
Не судите строго, понимаю что для экселя и опытного пользователя это вообще смешная проблема, кроме меня
Заранее спасибо!
К сообщению приложен файл: doverennost-1-.xls (23.5 Kb)
 
Ответить
СообщениеДобрый вечер, Уважаемые продвинутые пользователи!
Совсем недавно появилась необходимость работать с excel, поэтому постепенно учусь.
Столкнулся со следующей проблемой:
Сегодня была задача напечатать 500 шаблонов доверенностей под разными номерами.
Поскольку я неуверенный пользователь, вынужден был менять номера и каждый печатать вручную это заняло достаточно много времени( на работе никто понятия не имеет и не хочет знать как это сделать, делают все руками)
вопрос такой: как это дело автоматизировать?
Не судите строго, понимаю что для экселя и опытного пользователя это вообще смешная проблема, кроме меня
Заранее спасибо!

Автор - tklf88
Дата добавления - 16.10.2015 в 20:47
buchlotnik Дата: Пятница, 16.10.2015, 20:50 | Сообщение № 2
Группа: Заблокированные
Ранг: Участник клуба
Сообщений: 3442
Репутация: 929 ±
Замечаний: 20% ±

2010, 2013, 2016 RUS / ENG
tklf88, здравствуйте. Какие поля должны меняться при печати? только F18? или перед печатью вы ещё что-нибудь меняете?


Сообщение отредактировал buchlotnik - Пятница, 16.10.2015, 21:21
 
Ответить
Сообщениеtklf88, здравствуйте. Какие поля должны меняться при печати? только F18? или перед печатью вы ещё что-нибудь меняете?

Автор - buchlotnik
Дата добавления - 16.10.2015 в 20:50
tklf88 Дата: Пятница, 16.10.2015, 21:36 | Сообщение № 3
Группа: Пользователи
Ранг: Прохожий
Сообщений: 5
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
ничего не меняется, только F18
каждая печать новый номер
чтобы я задал диапазон например с 1-100 и напечатались доверенности чтобы не по одной нажимать на печать
 
Ответить
Сообщениеничего не меняется, только F18
каждая печать новый номер
чтобы я задал диапазон например с 1-100 и напечатались доверенности чтобы не по одной нажимать на печать

Автор - tklf88
Дата добавления - 16.10.2015 в 21:36
buchlotnik Дата: Пятница, 16.10.2015, 22:05 | Сообщение № 4
Группа: Заблокированные
Ранг: Участник клуба
Сообщений: 3442
Репутация: 929 ±
Замечаний: 20% ±

2010, 2013, 2016 RUS / ENG
можно так
К сообщению приложен файл: doverennost-1-2.xls (39.5 Kb)
 
Ответить
Сообщениеможно так

Автор - buchlotnik
Дата добавления - 16.10.2015 в 22:05
tklf88 Дата: Пятница, 16.10.2015, 22:22 | Сообщение № 5
Группа: Пользователи
Ранг: Прохожий
Сообщений: 5
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
Спасибо большое!!!!
потрясающее решение, мне бы научиться этому
можно узнать как такую кнопку сделать?
 
Ответить
СообщениеСпасибо большое!!!!
потрясающее решение, мне бы научиться этому
можно узнать как такую кнопку сделать?

Автор - tklf88
Дата добавления - 16.10.2015 в 22:22
buchlotnik Дата: Пятница, 16.10.2015, 22:51 | Сообщение № 6
Группа: Заблокированные
Ранг: Участник клуба
Сообщений: 3442
Репутация: 929 ±
Замечаний: 20% ±

2010, 2013, 2016 RUS / ENG
да можно, но матчасть придётся подучить - тут всё на VBA
для начала в настройках ленты (файл - параметры - настроить ленту) поставьте галку на вкладке РАЗРАБОТЧИК
там получите доступ к элементам управления, которые можно воткнуть на лист, в т. ч. кнопку
а потом идём в Visual Basic - увидите окно редактора кода - слева увидите структуру проекта - в модуле листа всё просто:[vba]
Код
Private Sub CommandButton1_Click()
    Call UserForm1.Show
End Sub
[/vba], модуль формы чуть сложнее:[vba]
Код
Private Sub CommandButton1_Click()
    Dim pref$, st%, fin%, i%
    pref = TextBox1
    st = TextBox2
    fin = TextBox3
    For i = 1 To (fin - st + 1)
        [f18] = pref & Format(st + i - 1, "000")
        ActiveWorkbook.PrintOut
    Next i
    Unload Me
End Sub

Private Sub CommandButton2_Click()
    Unload Me
End Sub
[/vba], изучайте код, попытайтесь разобраться - тут главное практика. Как-то так B)


Сообщение отредактировал buchlotnik - Пятница, 16.10.2015, 22:51
 
Ответить
Сообщениеда можно, но матчасть придётся подучить - тут всё на VBA
для начала в настройках ленты (файл - параметры - настроить ленту) поставьте галку на вкладке РАЗРАБОТЧИК
там получите доступ к элементам управления, которые можно воткнуть на лист, в т. ч. кнопку
а потом идём в Visual Basic - увидите окно редактора кода - слева увидите структуру проекта - в модуле листа всё просто:[vba]
Код
Private Sub CommandButton1_Click()
    Call UserForm1.Show
End Sub
[/vba], модуль формы чуть сложнее:[vba]
Код
Private Sub CommandButton1_Click()
    Dim pref$, st%, fin%, i%
    pref = TextBox1
    st = TextBox2
    fin = TextBox3
    For i = 1 To (fin - st + 1)
        [f18] = pref & Format(st + i - 1, "000")
        ActiveWorkbook.PrintOut
    Next i
    Unload Me
End Sub

Private Sub CommandButton2_Click()
    Unload Me
End Sub
[/vba], изучайте код, попытайтесь разобраться - тут главное практика. Как-то так B)

Автор - buchlotnik
Дата добавления - 16.10.2015 в 22:51
tklf88 Дата: Пятница, 16.10.2015, 23:02 | Сообщение № 7
Группа: Пользователи
Ранг: Прохожий
Сообщений: 5
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
buchlotnik, спасибо! hands
научить бы людей на работе макросам глядишь бы не тратили пол дня на бесполезные операции руками.....
на посошок еще спрошу
с чего начинать вообще?
где лучше почитать это все?
 
Ответить
Сообщениеbuchlotnik, спасибо! hands
научить бы людей на работе макросам глядишь бы не тратили пол дня на бесполезные операции руками.....
на посошок еще спрошу
с чего начинать вообще?
где лучше почитать это все?

Автор - tklf88
Дата добавления - 16.10.2015 в 23:02
buchlotnik Дата: Пятница, 16.10.2015, 23:13 | Сообщение № 8
Группа: Заблокированные
Ранг: Участник клуба
Сообщений: 3442
Репутация: 929 ±
Замечаний: 20% ±

2010, 2013, 2016 RUS / ENG
Я начинал с Джона Уокенбаха "Excel Библия пользователя" - там есть достаточно краткий, но весьма понятный и достаточный, на мой взгляд, обзор VBA. Потом можно его же книгу "Профессиональное программирование на VBA в Excel". А так - ставим перед собой задачу и гугл рулит B)
[p.s.] А ещё многое я прочитал на этом форуме
 
Ответить
СообщениеЯ начинал с Джона Уокенбаха "Excel Библия пользователя" - там есть достаточно краткий, но весьма понятный и достаточный, на мой взгляд, обзор VBA. Потом можно его же книгу "Профессиональное программирование на VBA в Excel". А так - ставим перед собой задачу и гугл рулит B)
[p.s.] А ещё многое я прочитал на этом форуме

Автор - buchlotnik
Дата добавления - 16.10.2015 в 23:13
tklf88 Дата: Пятница, 16.10.2015, 23:17 | Сообщение № 9
Группа: Пользователи
Ранг: Прохожий
Сообщений: 5
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
buchlotnik, спасибо за все!
 
Ответить
Сообщениеbuchlotnik, спасибо за все!

Автор - tklf88
Дата добавления - 16.10.2015 в 23:17
bratt677 Дата: Вторник, 27.04.2021, 11:11 | Сообщение № 10
Группа: Пользователи
Ранг: Прохожий
Сообщений: 5
Репутация: 0 ±
Замечаний: 0% ±

Уже увидел, спс


Сообщение отредактировал bratt677 - Вторник, 27.04.2021, 11:17
 
Ответить
СообщениеУже увидел, спс

Автор - bratt677
Дата добавления - 27.04.2021 в 11:11
bratt677 Дата: Понедельник, 28.03.2022, 09:44 | Сообщение № 11
Группа: Пользователи
Ранг: Прохожий
Сообщений: 5
Репутация: 0 ±
Замечаний: 0% ±

Уважаемые Специалисты.
Подскажите пожалуйста, как вышеуказанную форму распечатывать на формате А5 (т.е. по две доверки на листе) тоже со сменой номеров.
Заранее СПАСИБО!!


Сообщение отредактировал bratt677 - Понедельник, 28.03.2022, 09:44
 
Ответить
СообщениеУважаемые Специалисты.
Подскажите пожалуйста, как вышеуказанную форму распечатывать на формате А5 (т.е. по две доверки на листе) тоже со сменой номеров.
Заранее СПАСИБО!!

Автор - bratt677
Дата добавления - 28.03.2022 в 09:44
_Boroda_ Дата: Понедельник, 28.03.2022, 09:50 | Сообщение № 12
Группа: Модераторы
Ранг: Местный житель
Сообщений: 16666
Репутация: 6478 ±
Замечаний: 0% ±

2003; 2007; 2010; 2013 RUS
Нужно Ваш файл смотреть. Ну хорошо, давайте без него попробуем, но Вам придется самому поправить у себя

Допустим, первый номер у Вас в ячейке А2, а второй тогда в А27
В А27 пишете
Код
=A2+1

А цикл переписываете с шагом 2
[vba]
Код
For i = 1 To (fin - st + 1) Step 2
[/vba]


Скажи мне, кудесник, любимец ба’гов...
Платная помощь:
Boroda_Excel@mail.ru
Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995


Сообщение отредактировал _Boroda_ - Понедельник, 28.03.2022, 11:43
 
Ответить
СообщениеНужно Ваш файл смотреть. Ну хорошо, давайте без него попробуем, но Вам придется самому поправить у себя

Допустим, первый номер у Вас в ячейке А2, а второй тогда в А27
В А27 пишете
Код
=A2+1

А цикл переписываете с шагом 2
[vba]
Код
For i = 1 To (fin - st + 1) Step 2
[/vba]

Автор - _Boroda_
Дата добавления - 28.03.2022 в 09:50
bratt677 Дата: Понедельник, 28.03.2022, 11:05 | Сообщение № 13
Группа: Пользователи
Ранг: Прохожий
Сообщений: 5
Репутация: 0 ±
Замечаний: 0% ±

вот файл
К сообщению приложен файл: 111.xls (55.5 Kb)


Сообщение отредактировал bratt677 - Вторник, 29.03.2022, 06:33
 
Ответить
Сообщениевот файл

Автор - bratt677
Дата добавления - 28.03.2022 в 11:05
bratt677 Дата: Среда, 30.03.2022, 06:18 | Сообщение № 14
Группа: Пользователи
Ранг: Прохожий
Сообщений: 5
Репутация: 0 ±
Замечаний: 0% ±

формат
К сообщению приложен файл: 111.xlsx (24.7 Kb)
 
Ответить
Сообщениеформат

Автор - bratt677
Дата добавления - 30.03.2022 в 06:18
_Boroda_ Дата: Среда, 30.03.2022, 10:24 | Сообщение № 15
Группа: Модераторы
Ранг: Местный житель
Сообщений: 16666
Репутация: 6478 ±
Замечаний: 0% ±

2003; 2007; 2010; 2013 RUS
О! Это Вам поворачивать еще их нужно. Отдельный гемор. Примерно так, как в приложенном файле (высоту строк второй доверенности не стал подгонять). Но еще тогда и макрос менять, чтобы другой лист печатал.
Попробуйте сами (или, может, еще кто поможет). Я пока с работы не могу скачивать файлы с макросами
К сообщению приложен файл: 111_1.xlsx (108.5 Kb)


Скажи мне, кудесник, любимец ба’гов...
Платная помощь:
Boroda_Excel@mail.ru
Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995
 
Ответить
СообщениеО! Это Вам поворачивать еще их нужно. Отдельный гемор. Примерно так, как в приложенном файле (высоту строк второй доверенности не стал подгонять). Но еще тогда и макрос менять, чтобы другой лист печатал.
Попробуйте сами (или, может, еще кто поможет). Я пока с работы не могу скачивать файлы с макросами

Автор - _Boroda_
Дата добавления - 30.03.2022 в 10:24
bratt677 Дата: Четверг, 31.03.2022, 09:55 | Сообщение № 16
Группа: Пользователи
Ранг: Прохожий
Сообщений: 5
Репутация: 0 ±
Замечаний: 0% ±

Ок, спасибо.
 
Ответить
СообщениеОк, спасибо.

Автор - bratt677
Дата добавления - 31.03.2022 в 09:55
Balzam Дата: Четверг, 02.02.2023, 16:04 | Сообщение № 17
Группа: Пользователи
Ранг: Новичок
Сообщений: 10
Репутация: 0 ±
Замечаний: 20% ±

Excel 2010
Уважаемы специалисты, помогите, пожалуйста, и мне тоже. Задача аналогичная, но менять надо значения в ячейке AE10 в диапазоне от 100000 до 999999. Вариант с кнопкой прям очень понравился, но сам не осилю...Огромное спасибо!
К сообщению приложен файл: 9624440.xlsx (59.5 Kb)


Сообщение отредактировал Balzam - Четверг, 02.02.2023, 16:05
 
Ответить
СообщениеУважаемы специалисты, помогите, пожалуйста, и мне тоже. Задача аналогичная, но менять надо значения в ячейке AE10 в диапазоне от 100000 до 999999. Вариант с кнопкой прям очень понравился, но сам не осилю...Огромное спасибо!

Автор - Balzam
Дата добавления - 02.02.2023 в 16:04
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Изменение номера шаблона при печати (Формулы/Formulas)
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2024 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!