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

Вход

Регистрация

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

 

= Мир MS Excel/Создание листов в книге с данными из таблицы. - Мир MS Excel

Регистрация · Логин: · Пароль: · · Забыли пароль?
  • Страница 1 из 1
  • 1
Модератор форума: _Boroda_, Manyasha, SLAVICK, китин  
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Создание листов в книге с данными из таблицы. (Формулы/Formulas)
Создание листов в книге с данными из таблицы.
nemon Дата: Пятница, 12.01.2018, 21:06 | Сообщение № 1
Группа: Пользователи
Ранг: Прохожий
Сообщений: 4
Репутация: 0 ±
Замечаний: 0% ±

Excel 2016
Подскажите. Как сделать, чтобы создались вкладки с шаблоном и изменёнными данными, например 1 лист: имя листа Вексель №1, в листе Вексель №1, далее ничего не меняется кроме суммы:
2 548 200 (два миллиона пятьсот сорок восемь тысяч двести) рублей 00 копеек.
Номера векселей берутся из первого столбца листа список, а суммы из 9 столбца листа список.
Что то наковырял, но что то не работает (первый раз пытаюсь выяснить что такое макросы).
К сообщению приложен файл: 111.xlsm(28.9 Kb)
 
Ответить
СообщениеПодскажите. Как сделать, чтобы создались вкладки с шаблоном и изменёнными данными, например 1 лист: имя листа Вексель №1, в листе Вексель №1, далее ничего не меняется кроме суммы:
2 548 200 (два миллиона пятьсот сорок восемь тысяч двести) рублей 00 копеек.
Номера векселей берутся из первого столбца листа список, а суммы из 9 столбца листа список.
Что то наковырял, но что то не работает (первый раз пытаюсь выяснить что такое макросы).

Автор - nemon
Дата добавления - 12.01.2018 в 21:06
Pelena Дата: Пятница, 12.01.2018, 21:40 | Сообщение № 2
Группа: Админы
Ранг: Местный житель
Сообщений: 13121
Репутация: 2891 ±
Замечаний: ±

Excel 2010, 2016 & Mac Excel
Вариант Слияние с Word не рассматриваете?


"Черт возьми, Холмс! Но как??!!"
ЯД 41001765434816
 
Ответить
СообщениеВариант Слияние с Word не рассматриваете?

Автор - Pelena
Дата добавления - 12.01.2018 в 21:40
nemon Дата: Пятница, 12.01.2018, 21:53 | Сообщение № 3
Группа: Пользователи
Ранг: Прохожий
Сообщений: 4
Репутация: 0 ±
Замечаний: 0% ±

Excel 2016
Да мне бы просто на печать вывести всё.
 
Ответить
СообщениеДа мне бы просто на печать вывести всё.

Автор - nemon
Дата добавления - 12.01.2018 в 21:53
_Igor_61 Дата: Пятница, 12.01.2018, 21:58 | Сообщение № 4
Группа: Проверенные
Ранг: Обитатель
Сообщений: 275
Репутация: 47 ±
Замечаний: 20% ±

Excel 2007
Исправьте For r = 2 на For r = 3
Сделайте шире столбец "А" в шаблоне и добавьте формат ячеек в свой код:
[vba]
Код
With wb.Sheets(wb.Sheets.Count)
            .Name = Left(wb.Sheets("Список").Cells(r, 1), 31)
            .Range("A1") = "ПРОСТОЙ ВЕКСЕЛЬ № " & wb.Sheets("Список").Cells(r, 1)
            .Range("A4") = wb.Sheets("Список").Cells(r, 9)
            .Range("A4").NumberFormat = "#,##0"
            .Range("A12") = wb.Sheets("Список").Cells(r, 9)
            .Range("A12").NumberFormat = "#,##0"
        End With
[/vba]
Сумма прописью - отдельная тема, на форуме есть, поищите и добавьте в свой код
К сообщению приложен файл: 111_1.xlsm(22.5 Kb)


Сообщение отредактировал _Igor_61 - Пятница, 12.01.2018, 22:23
 
Ответить
СообщениеИсправьте For r = 2 на For r = 3
Сделайте шире столбец "А" в шаблоне и добавьте формат ячеек в свой код:
[vba]
Код
With wb.Sheets(wb.Sheets.Count)
            .Name = Left(wb.Sheets("Список").Cells(r, 1), 31)
            .Range("A1") = "ПРОСТОЙ ВЕКСЕЛЬ № " & wb.Sheets("Список").Cells(r, 1)
            .Range("A4") = wb.Sheets("Список").Cells(r, 9)
            .Range("A4").NumberFormat = "#,##0"
            .Range("A12") = wb.Sheets("Список").Cells(r, 9)
            .Range("A12").NumberFormat = "#,##0"
        End With
[/vba]
Сумма прописью - отдельная тема, на форуме есть, поищите и добавьте в свой код

Автор - _Igor_61
Дата добавления - 12.01.2018 в 21:58
nemon Дата: Пятница, 12.01.2018, 23:00 | Сообщение № 5
Группа: Пользователи
Ранг: Прохожий
Сообщений: 4
Репутация: 0 ±
Замечаний: 0% ±

Excel 2016
Спасибо, большое! Всё работает!
 
Ответить
СообщениеСпасибо, большое! Всё работает!

Автор - nemon
Дата добавления - 12.01.2018 в 23:00
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Создание листов в книге с данными из таблицы. (Формулы/Formulas)
  • Страница 1 из 1
  • 1
Поиск:

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