Question about an Excel form

Marinka 

If you're using the desktop version of Excel for Mac or Windows, you can run a macro.

In the following, I'll make the following assumptions:

• The form is a worksheet named Form.
• The name is to be entered in cell B1 on this sheet.
• You have a separate worksheet in the same workbook named List, with a title such as Name in A1, and the names to be used in A2 and down.

To create the macro, follow these steps:

• Press Alt+F11 to activate the Visual Basic Editor.
• Select Insert > Module.
• Copy the code listed below into the module.
• Switch back to Excel.
• Save the workbook as a macro-enabled workbook (*.xlsm).
• You'll have to allow macros when you open the workbook.
• To run the macro, press Alt+F8 to activate the Macros dialog, select PrintForms and click Run.

The code:

Sub PrintForms()
    Dim FormSheet As Worksheet
    Dim ListSheet As Worksheet
    Dim NameRow As Long
    Dim LastRow As Long
    Application.ScreenUpdating = False
    ' The sheets to be used
    Set FormSheet = Worksheets("Form")
    Set ListSheet = Worksheets("List")
    ' The row of the last name
    LastRow = ListSheet.Range("A1").End(xlDown)
    ' Loop through the names
    For NameRow = 2 To LastRow
        ' Enter the next name in B1 on the form sheet
        FormSheet.Range("B1").Value = ListSheet.Range("A" & NameRow).Value
        ' Print the form sheet
        FormSheet.PrintOut
    Next NameRow
    Application.ScreenUpdating = True
End Sub