Delete Empty Rows and empty columns from the word table

Hi Apha,
Oops I am sorry about that. Here is the code

Dim rRange1, rRange2 As Range
        Dim destRg1, destRg2 As Word.Range
Set rRange1 = Worksheets(FName).Range("A1:G415")
            Set rRange2 = Worksheets(FName).Range("A9:H18")
            
            'copy and paste the data range (could be a table1)
            
            rRange1.Copy  ' set the arguments as needed
            Set destRg1 = Wrd.ActiveDocument.Bookmarks("tab1").Range
            If destRg1.Tables.Count > 0 Then destRg1.Tables(1).Delete
        
            destRg1.PasteExcelTable LinkedToExcel:=False, _
            WordFormatting:=True, RTF:=False
            Wrd.ActiveDocument.Bookmarks.Add Name:="tab1", Range:=destRg1.Tables(1).Range
           
       
       
          
            'copy and paste the data range (could be a table2)
            rRange2.Copy  ' set the arguments as needed
            Set destRg2 = Wrd.ActiveDocument.Bookmarks("tab2").Range
            If destRg2.Tables.Count > 0 Then destRg2.Tables(1).Delete
        
            destRg2.PasteExcelTable LinkedToExcel:=False, _
            WordFormatting:=True, RTF:=False
            Wrd.ActiveDocument.Bookmarks.Add Name:="tab2", Range:=destRg2.Tables(1).Range

in this code snippet, i am copy and pasting the table from excel sheet to word where there is a bookmarks tab1 and tab2 in word.
Will I be able to select the used range for sheets even though there have different range (like start and end range)? I will absolutely look at the guide as well. Thanks for the reply.