Ciao.
Ho fatto un po di prove e ho scritto questa semplice macro che sembra fare quello che hai descritto, quindi prova ad aprire il VBA editor e immetti questa routine, poi dalle proprietà Macro, come hai detto puoi dargli una combinazione tasti, io per prova avevo messo ctrl + z:
Public Sub Luky()
' --- Numero colonne/campi da 1 a ?
Dim NC As Integer
' --- es. se i campi fossero 5/riga, metti quanti ne hai
NC = 5
Range(Cells(ActiveCell.Row, 1), Cells(ActiveCell.Row, NC)).Select
Selection.PrintOut Copies:=1, Collate:=True
End Sub