通过Excel宏将.ods保存为.xls文件

Question

我正在尝试转换.ods格式的多个.xls文件。由于我不能使用Workbook.SaveAs和Workbook.Open方法的原因，所以目前我坚持这个：

Public FileName As Variant
Sub Choose()
    Set FileName= Nothing
    ChDrive (ThisWorkbook.Path)
    ChDir (ThisWorkbook.Path)
    FileName = Application.GetOpenFilename _
        (FileFilter:="Excel Worksheets(*.xls; *.xlsx; *.ods), *.xls; *.xlsx; *.ods", _
        Title:="Select a file.", MultiSelect:=False)
End Sub
Sub Saving()
    Call Choose
    ActiveWorkbook.FollowHyperlink Address:=FileName, NewWindow:=True
End Sub

我设法打开了一个文件，但是，honeslty，不知道接下来该做什么。 我不指望任何指导或直接回答，但暗示，我该怎么办，甚至是否可能 附：当我打开.ods文件并保存为.xls时，它可以正常工作，但我必须考虑自动执行此操作的魔术按钮。