跳到主要內容

如何防止Excel表格中重複列標題的自動編號?

在 Excel 中,當您在表格中鍵入重複的列標題時,它會自動添加一個數字,就像 name、name1、name2 一樣,並且無法刪除該數字,如下圖所示。 為防止表中重複列標題自動編號,您可以在重複標題中添加尾隨空格。 這是一個 VBA 代碼,可以幫助您重複標題並自動添加尾隨空格,以使它們不同但看起來相同。
從另一個列表自動完成

自動在標題中添加尾隨空格

注意:本教程提供的方法均在 Excel 2021 中測試,在不同的 Excel 版本中可能會有一些不同。


自動在標題中添加尾隨空格

1. 在列中鍵入要重複的標題,然後按 其他 + F11 啟用鍵 Microsoft Visual Basic for Applications 窗口。

2。 點擊 插入 > 模塊Microsoft Visual Basic for Applications 窗口,然後將以下代碼複製並粘貼到其中。

VBA:重複並添加尾隨空格

Sub repeat()
'UpdatebyExtendoffice20220927
    Dim xRg As Range
    Dim saveRg As Range
    Dim xIndex As Integer
    Dim xCount As Integer
    Dim k As Integer
    Dim xStr As String
    Set xRg = Application.InputBox("Select the cells that you want to repeat", "kte", , , , , , 8)
    xIndex = Application.InputBox("Enter the repeat times", "kte")
    Set saveRg = Application.InputBox("Select a cell to output", "kte", , , , , , 8)
    xStr = ""
    xCount = xRg.Cells.Count * xIndex
    Set saveRg = saveRg.Range("a1").Resize(1, xCount)
    k = 0
    For i = 1 To xIndex
        For j = 1 To xRg.Cells.Count
            k = k + 1
            saveRg.Cells(k).Value = xRg.Cells(j).Value + xStr
        Next
        xStr = xStr + " "
    Next
End Sub

 從另一個列表自動完成

3。 點擊 從另一個列表自動完成 功能區中的按鈕或按 F5 鍵激活代碼,在第一個彈出對話框中,選擇要重複的標題。 點擊 OK.
從另一個列表自動完成

4. 在第二個彈出對話框中,輸入您想要的重複次數。 點擊 OK.
從另一個列表自動完成

5. 選擇要輸出重複標題的單元格。 點擊 OK.
從另一個列表自動完成

現在標題已被重複並添加了尾隨空格。
從另一個列表自動完成

6. 選擇標題並按複製它們 按Ctrl + C,然後按 按Ctrl + V..

現在您可以看到表格有重複的列標題而沒有編號。
從另一個列表自動完成


其他操作(文章)

如何在Excel中找到最大或最小絕對值並保持登錄
有時,您可能希望找到它們絕對值的最大值或最小值,但在返回結果時保留它們的符號,如下面的屏幕截圖所示。

輸入Excel時如何保持領先的撇號?
我們知道,當你想將數字轉換為文本時,可以在前面輸入一個撇號,如下所示:'123,數字將轉換為文本並隱藏撇號。

如何在Excel中強制以只讀方式打開?
有時,您希望打開共享工作簿的其他用戶在編輯共享工作簿時要小心,您可以發出只讀提示來警告他們...

如何阻止 Excel 自動格式化 CSV 中的日期?
這是一個 csv 文件,其中包含文本格式 12-may-20 的日期,但是當您通過 excel 打開時,將自動存儲為日期格式...


  • 超級公式欄 (輕鬆編輯多行文本和公式); 閱讀版式 (輕鬆讀取和編輯大量單元格); 粘貼到過濾範圍...
  • 合併單元格/行/列 和保存數據; 拆分單元格內容; 合併重複的行和總和/平均值...防止細胞重複; 比較範圍...
  • 選擇重複或唯一 行; 選擇空白行 (所有單元格都是空的); 超級查找和模糊查找 在許多工作簿中; 隨機選擇...
  • 確切的副本 多個單元格,無需更改公式參考; 自動創建參考 到多張紙; 插入項目符號,複選框等...
  • 收藏并快速插入公式,範圍,圖表和圖片; 加密單元 帶密碼 創建郵件列表 並發送電子郵件...
  • 提取文字,添加文本,按位置刪除, 刪除空間; 創建和打印分頁小計; 在單元格內容和註釋之間轉換...
  • 超級濾鏡 (將過濾方案保存並應用於其他工作表); 高級排序 按月/週/日,頻率及更多; 特殊過濾器 用粗體,斜體...
  • 結合工作簿和工作表; 根據關鍵列合併表; 將數據分割成多個工作表; 批量轉換xls,xlsx和PDF...
  • 數據透視表分組依據 週號,週幾等 顯示未鎖定的單元格 用不同的顏色 突出顯示具有公式/名稱的單元格...
kte選項卡201905
  • 在Word,Excel,PowerPoint中啟用選項卡式編輯和閱讀,發布者,Access,Visio和Project。
  • 在同一窗口的新選項卡中而不是在新窗口中打開並創建多個文檔。
  • 將您的工作效率提高 50%,每天為您減少數百次鼠標點擊!
officetab底部
Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations