這是想把多個相同的工作表合併為一個工作表。可以用vba程式碼實現最簡單，可以順便完成。你可以新建一個控制元件按鈕，把按鈕程式碼設定為：Private Sub CommandButton1_Click()Application.ScreenUpdating = FalseFor j = 1 To Sheets.Count If Sheets(j).Name <> ActiveSheet.Name Then x = Range("A65536").End(xlUp).Row + 1 Sheets(j).UsedRange.Copy Cells(x, 1) End IfNextRange("B1").SelectApplication.ScreenUpdating = TrueMsgBox "當前工作簿下的全部工作表已經合併完畢！", vbInformation, "提示"End Sub