Usa l'oggetto Printer, posizionati con le proprietà CurrentX e CurrentY, poi usa il metodo Print per stampare quello che vuoi. Un esempio:

codice:
Printer.ScaleMode = vbMillimeters
Printer.CurrentX = 10   'posizione in mm da sinistra
Printer.CurrentY = 50   'posizione in mm dall'alto
Printer.Print Text1.Text
...
Printer.EndDoc