Mělo by pomoci vcelku jednoduché řešení.
Ve ForEach smyčce na všemi listy posílat tisk vždy toho konkrétního listu.
Domnívám se, že to by si měla tiskárna obsloužit v pohodě.
Je to vlastně obdoba jako když budete ručně procházet každý list a ten samostatně tisknout.
Dim list As Worksheet
For Each list In WorkSheets
list.PrintOut
Next
citovat
Ve ForEach smyčce na všemi listy posílat tisk vždy toho konkrétního listu.
Domnívám se, že to by si měla tiskárna obsloužit v pohodě.
Je to vlastně obdoba jako když budete ručně procházet každý list a ten samostatně tisknout.
Dim list As Worksheet
For Each list In WorkSheets
list.PrintOut
Next
citovat