Add this VBA Macro to your PERSONAL.XLSB workbook. Run it while selecting a cell within a table to save that table to a CSV file.

ButterflyButtonModule.bas

Option Explicit

Sub ButterflyButton()

    Dim tbl As ListObject
    Dim csvFilePath As String
    Dim fNum As Integer
    Dim i As Long
    Dim tblArr
    Dim rowArr
    Dim csvVal
    

    'Set tbl = ActiveSheet.ListObjects(ActiveCell.ListObject.Name)
    Set tbl = ActiveCell.ListObject
    csvFilePath = Application.GetSaveAsFilename(FileFilter:="CSV UTF-8 (Comma delimited) (*.csv), *.csv")

    tblArr = tbl.Range.Value

        ' TODO change this section to move table into new Excel workbook and save that workbox 
        ' as a CSV for ideal encoding (UTF-8) and quoting (cells containing commas)
    fNum = FreeFile()
    Open csvFilePath For Output As #fNum
    For i = 1 To UBound(tblArr)
        rowArr = Application.Index(tblArr, i, 0)
        csvVal = VBA.Join(rowArr, ",")
        Print #1, csvVal
    Next
    Close #fNum
    Set tblArr = Nothing
    Set rowArr = Nothing
    Set csvVal = Nothing
End Sub