VBScript Excel格式化.xlsx文件

时间:2020-03-06 14:48:38  来源:igfitidea点击:

基本上我想知道如何使用VBScript设置单元格的中心对齐...

我一直在搜索它,似乎找不到任何有用的东西。

解决方案

有多种选择一个单元格或者一系列单元格的方法,但是以下方法适用于单个单元格。

'Select a Cell Range
Range("D4").Select

'Set the horizontal and vertical alignment
With Selection
    .HorizontalAlignment = xlCenter
    .VerticalAlignment = xlBottom
End With

Horizo​​ntalAlignment选项是xlLeft,xlRight和xlCenter

Set excel = CreateObject("Excel.Application")

excel.Workbooks.Add() ' create blank workbook

Set workbook = excel.Workbooks(1)

' set A1 to be centered.
workbook.Sheets(1).Cells(1,1).HorizontalAlignment = -4108 ' xlCenter constant.

workbook.SaveAs("C:\NewFile.xls")

excel.Quit()

set excel = nothing

'If the script errors, it'll give you an orphaned excel process, so be warned.

将其另存为.vbs,然后使用命令提示符或者双击运行它。