OK, here's the code:
Option Explicit
Sub sClearDataTable()
With Sheets("Masterlease")
.Range("N8:AC27").ClearContents
End With
End Sub
Sub sLoadDataTable()
With Sheets("Masterlease")
With .Range("M7:AC27")
.Table _
RowInput:=Range("F14"), _
ColumnInput:=Range("F15")
End With
End With
End Sub
Sub sLoadDataTable_Test()
With Sheets("Masterlease")
With .Range("M7:AC27")
.Table Range("F14"), Range("F15")
End With
End With
End Sub
I'd suggest you move the buttons to the top of the sheet above the table, as in the attached updated workbook. I have assigned the macros to both sets of buttons, so have a play and see which you prefer.
Bookmarks