2017-05-08 39 views
0

我給出的問題是根據重複的日期值對多行進行合併的單詞表進行格式設置。在下面的示例,第1個顯示覆制日期值和第2列中是與該日期對應的文本:在Word錶行和列中比較值以及刪除或合併單元格

2017年1月3日從A 2017年1月3日電子郵件細讀電子郵件到小組委員會 01/03 /從2017年的B博士從d先生 2017年1月3日電話呼叫的 2017年1月3日電話打到d先生 2017年1月3日電話通話細讀郵件

我想結束了什麼是以下內容:

01/03/2017閱讀A的電子郵件 電子郵件給小組委員會 從的B博士從d先生 電話呼叫的 電話打到d先生 電話呼叫細讀郵件

也就是說,我想一個日期在第1列和合併文本列2.我不能在MS Word中編寫代碼時不會找到太多幫助,因爲它更多地針對MS Excel。

我知道我可以使用:

If ActiveDocument.Tables.Count >= 1 Then 
    With ActiveDocument.Tables(1) 
    .Cell(Row:=1, Column:=1).Merge _ 
    MergeTo:=.Cell(Row:=1, Column:=2) 
    .Borders.Enable = False 
    End With 
End If 

然而,這只是一個簡單的合併,我需要更復雜的東西根據我上面提到的標準。

希望有人能夠協助並指引我走向正確的方向。

回答

0

在MS Word中,一旦合併了行,就失去了可靠地處理該表中的行的能力。合併列後,Word將無法正確響應您在該表中處理單個單元格的列號。因此,您的計劃將無法使用,至少在使用VBA時不會。

你的任務非常複雜,因爲你試圖在原地修改數據。更好更簡單的方法是將所有內容重新寫入新表格,也許只有兩列,一列是日期,另一列是所有其他文本。

要提出這個問題,可以問你應該設計輸出表,確保你的源表沒有合併的單元格,數據傳輸的規則以及勇敢的努力來表明你試圖自己解決問題。 :-)

+0

謝謝您的意見。我非常喜歡重寫產生輸出的代碼,但它來自鎖定的軟件程序。格式化表的請求是用戶事後纔想到的。由於輸出可能長達多頁,因此這僅僅是爲了節省編輯器費力地選擇,合併和刪除日期字段中的每個更改。我會重新考慮我能做些什麼。 –