主题：在设置打印的时候 怎样在下面的代码中加入

 在设置打印的时候      怎样在下面的代码中加入  

      “自动换行 和 指定某一列数据居中呢？”

 With Tables("xxx价格表").PrintInfo
    .Title = "xxx价格表xx" '用于设置标题
    .PageFooter = "第[PageNo]页,共[PageCount]页" '用于设置页脚
    .PageFooterLine = True '页脚之上是否显示一条分割线
    .PaperKind = 9 '指定纸张类型 9为A4纸张
    .FitIntoPage = True '是否自动适用页宽
    .LandScape = True '是否横向打印
End With
Tables("xxx价格表").Print(True,False)

求高手帮帮忙   或者用其他比较比较能实现上图打印 也可以  多谢