Claro que no te lo va ajustar porque solo le estas indicando un paramentro y no lo estas Justificando en el ajemplo que te di anteriormente te enseño como ajustar los datos a las derecha que es lo que necesitas:
seria algo asi:
Código:
For i = 1 To f_factura.grilla.Rows - 1
If f_factura.grilla.TextMatrix(i, 1) <> "" Then
'Alineamos
Printer.CurrentX = 1 + ((1.5 - Printer.TextWidth(Format(f_factura.grilla.TextMatrix(i, 0), "#,##0.00")))
'Lo Imprimimos
Printer.Print Format(f_factura.grilla.TextMatrix(i, 0), "#,##0.00")
End If ' <>""
Next