將Word文檔另存爲文檔中包含的表格信息生成的文件名

Question

我期望使用文檔中包含的數據使Word能夠保存文件名。

在文檔的頂部（航空公司釋放字母），存在包含在第2列

Column 1, 
Cell 1: AETC; Cell 2: MAWB; Cell 3: HAWB 

Column 2, 
Cell 1: 80123; Cell 2, 0161234567; Cell 3: 00112345678 

基本上2列與包含阿爾法3排在一列和字母數字數據的表，第一列將是靜態的標籤要輸入的變量數據插入列2

從所有這一切，我想生成一個另存爲文件名：AETC80123_MAWB0161234567_HAWB00112345678_ReleaseLetter.doc

我很少觸及表面的VBA，因爲我更多的是一種操作主管，而不是技術人員，所以我不確定這是否可能。

任何幫助/方向/複製粘貼編碼（如果它超級簡單和麻煩）會很棒！

謝謝！

Answer 1

我不打算全部詳細介紹這些，也沒有經過測試（只是寫出了我的頭），但是這應該提示您如何閱讀Word文檔中的單元格內容：

' Set tbl to first table in document 
Dim tbl As Table 
Set tbl = ActiveDocument.Tables(0) 

Dim r As Integer 
Dim c As Integer 
Dim val As String 
Dim filename As String 
filename = "" 

For r = 1 To tbl.Rows.Count 
    For c = 1 To tbl.Columns.Count 
     ' Get text in cell 
     val = tbl.Cell(r, c).Range.Text 
     ' and append to string or whatever 
     filename = filename & val & "_" 
    Next c 
Next r 

最後，使用

ActiveDocument.SaveAs FileName:=filename 

檢查this microsoft site約另存爲參數的詳細信息保存文檔。