[okshef]

Bordlord, чтобы воплотить вашу хотелку, нужно заполнять содержимое листа 2 с помощью макросов, а не формул. Поэтому максимально точно изложите алгоритм необходимых связей.

[Bordlord]

Сделал табличку с пояснениями

[Iska]

Сделал табличку с пояснениями Шаблон с заполненными данными нужно запускать на печать на матричном принтере… »

Sic! Стал понятен смысл слова шаблон в контексте задачи.

Вставьте данный код:

читать дальше »

Код:

Option Explicit

Sub InsertValuesFromActiveCellIntoWorksheet()
    If ActiveSheet.Name = "Лист1" Then
        If Right(ActiveCell.Address(ReferenceStyle:=xlR1C1), 2) = "C1" Then
            If Not IsEmpty(ActiveCell.Value) Then
                With ThisWorkbook
                    With .Worksheets.Item("Лист2")
                        .Cells.Item(13, 1).Value = ActiveCell.Value
                        .Cells.Item(15, 4).Value = ActiveCell.Offset(0, 1).Value
                        .Cells.Item(13, 6).Value = ActiveCell.Offset(0, 2).Value
                        
                        .PrintPreview
                    End With
                End With
            Else
                MsgBox "Активная ячейка не содержит данных", vbExclamation, "Ошибка"
            End If
        Else
            MsgBox "Активная ячейка не находится в столбце [A]", vbExclamation, "Ошибка"
        End If
    Else
        MsgBox "Активная ячейка не находится на листе [Лист1]", vbExclamation, "Ошибка"
    End If
End Sub

в модуль рабочей книги. Назначьте его вызов на сочетание горячих клавиш. Выделите на первом листе в первом столбце потребную ячейку из списка. Нажмите сочетание горячих клавиш. Будет произведена подстановка данных из строки с выделенной ячейкой во второй лист рабочей книги, и этот лист будет выведен на предварительный просмотр (чтобы Вы могли убедиться, правильно ли произведена подстановка).

Или, может, Вам нужно, перебрав созданный список, просто отпечатать всё подряд?

[Bordlord]

Мне нужно каждый раз после печати на принтере отматывать бланки назад, так что нужно поменять данные, нажать печать, отмотать, поменять данные, нажать печать, отмотать и т.д.

Можно пояснить куда конктретно вставить?

[Iska]

отматывать бланки назад »

Поясните подробнее, пожалуйста.

[Bordlord]

кнопочкой на принтере после печати каждой ттнки надо отматывать назад

[Iska]

кнопочкой на принтере после печати каждой ттнки надо отматывать назад »

А что это даёт?

Можно пояснить куда конктретно вставить? »

Я писал — куда.

Вам желательно ознакомиться с документацией:
Начало работы с VBA в Excel 2010
Краткое руководство: создание макроса - Excel - Office.com
Запуск макроса - Excel - Office.com

[Bordlord]

при нажатии печать выпадает ошибка 400

[Iska]

при нажатии печать выпадает ошибка 400 »

Приведите скриншот.