如何使用VBScript和Word文檔在表格中垂直放置單元格的文本？

Question

我嘗試使用

With myTable.Rows(1) 
.Height = 20 
.Cells.VerticalAlignment = wdAlignVerticalTop 
End With 

但它似乎並沒有VBScript的工作，沒有人知道怎麼做我想做的事？

Answer 1

如果您使用的是vbscript，那麼vbscript不知道您的單詞枚舉常量的值。所以，要麼將值分配給這些常量，或直接使用數字/常量，如下圖所示：

With myTable.Rows(1) 
.Height = 20 
.Cells.VerticalAlignment = 1    '1 means WdCellVerticalAlignment(see link below) 
End With 

點擊此處 - Word Enumerated constants

此外，如果您使用的是Word VBA和VBScript中沒有，那麼你應該提及正確的枚舉常量。在你的情況下，它不應該是wdAlignVerticalTop。相反，它應該是WdCellVerticalAlignment。