Macro for printing from dropdown menu

Question

Good Afternoon,&nbsp;I need to print pick sheets for employees.I have already created a template of a picksheet in a worksheet and the sheet is generated using drop down menu of depot name and vlookups.Now i need a macro that is able to print the Picksheets of all Depots listed on the drop down list all at once, instead of selecting a depot one at a time then print.

marc47555 · Answer

Haytham Amairah&nbsp;thank&nbsp; you so much

haytham amairah · Answer

marc47555&nbsp;Hi,&nbsp;Please try this code:Sub PrintOutAllDepots()
    Dim r As Range
    Set r = Sheets("Orders").Range("D4:P4")
    Dim i As Integer
    i = 1
    Sheets("Pallet Card").Activate
    
    For Each c In r
        Range("R1").Value = r(1, i).Value
        ActiveWindow.SelectedSheets.PrintOut Copies:=1
        i = i + 1
    Next c
    
End Sub&nbsp;Hope that helps

Forum Discussion

Macro for printing from dropdown menu

2 Replies

Resources