Dobrý večer, děkuji za reakci. Zde je část toho, co manžel udělal.

List6 - 1
Option Explicit
'Private Sub CommandButton4_Click() 'Hromadný tisk objednávky
'
Dim i As Long
'For i = 136 To 160 Step 2
'
ThisWorkbook.Worksheets("Databáze").Cells(i, 1).Select
'
CommandButton2_Click
'
'
Application ...

Dobrý den, jsem na fóru nová, takže nevím jak to tu chodí. Ale už asi rok používám na svém počítači Linux Mint Cinnamon. Řeším problém s programem, který mi manžel vytvořil v Excelu a otvírám ho pomocí Windows ve Vitual Boxu. Jenže v poslední době program používám denně a už mě nebaví stále čekat až ...