Excel VBA Macro: Create Word Document & Add Table (Static Range)
💼 Hire Me for Excel VBA Automation Need help automating your Excel workflows? I specialize in building custom Excel VBA solutions to save you time and eliminate repetitive tasks. 👉 https://www.upwork.com/freelancers/~013bd05e311ebf4a2c Excel VBA Macro: Create Word Document & Add Table (Static Range). In this video, we go over how to add a table with a set range to a word document using excel. We also enable borders in the table and change the background color of the table with our code. Code: Sub add_table_2_word() Dim objWord Dim objDoc Dim objSelection Dim i As Integer Dim j As Integer Set objWord = CreateObject("Word.Application") Set objDoc = objWord.Documents.Add Set objSelection = objWord.Selection objWord.Visible = True objWord.Activate Set CountryTable = objDoc.Tables.Add(objSelection.Range, 6, 3) With CountryTable With .Borders .enable = True .outsidecolor = RGB(0, 0, 0) .insidecolor = RGB(0, 0, 0) End With .Rows(1).shading.backgroundpatterncolor = RGB(51, 204, 51) For i = 1 To 6 For j = 1 To 3 .cell(i, j).Range.InsertAfter ThisWorkbook.Sheets("Sheet1").Cells(i, j).Text Next j Next i End With End Sub #ExcelVBA #ExcelMacro
Download
0 formatsNo download links available.