Question

请教，如何使用Excel VBA，将窗体水平和垂直居中打印？谢谢。

Answer 1

当然是可以的了，在printout输出前加入以下代码，设置水平和垂直居中
With ActiveSheet.PageSetup
.CenterHorizontally = True
.CenterVertically = True
End With

追问

没有居中啊？是不是我的编码有问题啊？
Private Sub CommandButton1_Click()
With ActiveSheet.PageSetup
.CenterHorizontally = True
.CenterVertically = True
End With
Me.PrintForm
End Sub

追答

哦 窗体，我看成工作表了。
窗体没法直接居中，但是可以在代码中控制left和top属性以控制窗体的位置，实现居中的效果。

Answer 2

不能直接设置，可以考虑用文本框的高度和字体大小来调节