• <acronym id="danlv"><form id="danlv"></form></acronym>
  • <dd id="danlv"><rt id="danlv"></rt></dd>
      <var id="danlv"><rt id="danlv"><big id="danlv"></big></rt></var>
      1. <code id="danlv"><ol id="danlv"></ol></code>
        <var id="danlv"><rt id="danlv"></rt></var>
          1. <code id="danlv"></code>
            返回首頁
            當前位置: 主頁 > 精通Office > Excel教程 >

            Excel 合并同一文件中的 sheet 工作表和替換星號 *

            時間:2018-12-21 00:17來源:知行網www.n1979.com 編輯:麥田守望者

            Excel 替換單元格中的星號 *

            英文半角的星號(*)在 Excel 中是作為通配符(是這么說的吧),如果想替換表格里的英文半角星號(*),如果你直接 ctrl+H 輸入 * 然后替換,那么你就會悲劇的發現,所有內容都被替換沒了。

            因為知道這么個問題,所以以往看到有人在 Excel 里用 * 做標記,而又要刪除它的時候只能手動一個個的刪除了,今天突然很懶,就百度了下,發現了解決辦法:

            辦法就是 ctrl+H 的時候輸入 ~*,然后替換就 OK 了。

            Excel 合并同一文件中的多個 sheet 工作表

            有人喜歡做表格的時候一個個工作表的建立,可對于處理數據的人來說就麻煩了,一個個的復制能復制傻掉,合并到一張工作表上再處理就會好一些。

            還是百度到的辦法——我是互聯網上勤勞的搬運工——如下:

            1. 在要合并的 N 多工作表的 Excel 里再新建一個空白工作表
            2. 在新建的工作表表名字那里,比如 Sheet13 點右鍵選擇 【查看代碼】
            3. 復制粘貼下面的代碼,后點運行,或者直接 F5 運行

            Excel 合并工作表的代碼:

            Sub 合并當前工作簿下的所有工作表()
            Application.ScreenUpdating = False
            For 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 If
            Next
            Range("B1").Select
            Application.ScreenUpdating = True
            MsgBox "當前工作簿下的全部工作表已經合并完畢!", vbInformation, "提示"
            End Sub
            

            然后你會發現,唰的一下,所有工作表內容都跑到最后新建的那個工作表 Sheet13 里了。

            ------分隔線----------------------------
            標簽(Tag):EXCEL Excel表格畫斜線表頭
            ------分隔線----------------------------
            推薦內容
            猜你感興趣
            日韩在线av免费视久久