Looking for some help please with this coding below, they work seperately, but cannot workout how to piece them together to be incorporated into one button. This is to paste an different excel tables into a word template table placeholder. Thanks

Sub CGPasteTable()
Selection.PasteSpecial Link:=False, DataType:=wdPasteRTF, Placement:= _
wdInLine, DisplayAsIcon:=False
End Sub

With Selection
.Tables(1).Select
.Style = ActiveDocument.Styles("CG Table Text")
.Tables(1).AutoFitBehavior (wdAutoFitContent)
.Tables(1).AutoFitBehavior (wdAutoFitWindow)
.ParagraphFormat.Alignment = wdAlignParagraphRight
With .Cells
.VerticalAlignment = wdCellAlignVerticalCenter
.Height = CentimetersToPoints(0.44)
End With
End With
End Sub

Sub CGleftalignfirstcolumn()
With Selection
.SelectColumn
.ParagraphFormat.Alignment = wdAlignParagraphLeft
End With
End Sub