Note: The other languages of the website are Google-translated. Back to English

如何在Excel中自動增加一個字母以獲得下一個字母?

假設您有一個包含字母AB的單元格,則需要將最後一個字母增加一個,以獲取下一個字母AC,AD等。 或者,您有一個字母A,並且想要將該字母增加到B,C…以創建一個字母列表。 如何實現呢? 本文可以為您提供詳細信息。

用公式將字母AB加XNUMX以得到AC,AD…
將字母加XNUMX可獲得帶有公式的字母列表
使用用戶定義的功能將字母增加XNUMX以獲取字母列表


用公式將字母AB加XNUMX以得到AC,AD…

請按照以下步驟在Excel中將字母增加XNUMX。

1.在給定字母下方選擇一個空白單元格,在其中輸入以下公式,然後按 Enter 鍵。 

=IF(RIGHT($A2,1)="Z", CHAR(CODE(LEFT(A2,1))+1),LEFT(A2,1))&CHAR(65+MOD(CODE(RIGHT(A2,1))+1-65,26))

備註:在公式中,A2是包含給定字母的單元格。

2.繼續選擇A3,向下拖動“填充手柄”以獲取所需字母的列表。


將字母A加XNUMX以得到帶有公式的字母列表

您可以使用 =字符(CODE(A1)+1) 在Excel中將字母加XNUMX的公式。 請執行以下操作。

1.在給定字母下方選擇一個空白單元格,輸入公式 =字符(CODE(A2)+1) 進入編輯欄,然後按 Enter 鍵。 看截圖:

2.選擇結果單元格,向下拖動“填充手柄”以獲取所需的字母。

備註:使用此公式,得到字母Z後,如果繼續向下拖動Fill Handle,將得到一些特殊字符,如下圖所示。 如果要在Z後面獲得字母AA,可以使用以下用戶定義的函數來幫助您。


使用用戶定義的功能將字母增加XNUMX以獲取字母列表

以下用戶定義的函數還可以幫助您在Excel中增加一個字母。

1。 按 其他 + F11 同時打開 Microsoft Visual Basic for Applications 窗口。

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

VBA代碼:將字母增加一個以獲取字母列表

Function ColLtrs(i As Long) As String
    ColLtrs = Replace(Cells(1, i).Address(False, False), "1", "")
End Function

3。 按 其他 + Q 關閉鍵 Microsoft Visual Basic for Applications 窗口。

4.在給定字母下方選擇一個空白單元格,輸入公式 = ColLtrs(ROW()),然後按 Enter 獲得第二個字母的鑰匙。

2.選擇結果單元格,向下拖動“填充手柄”以獲取所需的字母。

備註:使用此方法,您增加的字母基於行號。 您需要在工作表的第一行中開始第一個字母A,否則,該字母將變得混亂。


最佳辦公效率工具

Kutools for Excel 解決了你的大部分問題,並將你的生產力提高了 80%

  • 重用: 快速插入 複雜的公式,圖表 以及您以前使用過的任何東西; 加密單元 帶密碼 創建郵件列表 並發送電子郵件...
  • 超級公式欄 (輕鬆編輯多行文本和公式); 閱讀版式 (輕鬆讀取和編輯大量單元格); 粘貼到過濾範圍...
  • 合併單元格/行/列 不會丟失數據; 拆分單元格內容; 合併重複的行/列...防止細胞重複; 比較範圍...
  • 選擇重複或唯一 行; 選擇空白行 (所有單元格都是空的); 超級查找和模糊查找 在許多工作簿中; 隨機選擇...
  • 確切的副本 多個單元格,無需更改公式參考; 自動創建參考 到多張紙; 插入項目符號,複選框等...
  • 提取文字,添加文本,按位置刪除, 刪除空間; 創建和打印分頁小計; 在單元格內容和註釋之間轉換...
  • 超級濾鏡 (將過濾方案保存並應用於其他工作表); 高級排序 按月/週/日,頻率及更多; 特殊過濾器 用粗體,斜體...
  • 結合工作簿和工作表; 根據關鍵列合併表; 將數據分割成多個工作表; 批量轉換xls,xlsx和PDF...
  • 超過 300 項強大的功能. 支持 Office / Excel 2007-2021 和 365。支持所有語言。 在您的企業或組織中輕鬆部署。 完整功能 30 天免費試用。 60 天退款保證。
kte選項卡201905

Office選項卡為Office帶來了選項卡式界面,使您的工作更加輕鬆

  • 在Word,Excel,PowerPoint中啟用選項卡式編輯和閱讀,發布者,Access,Visio和Project。
  • 在同一窗口的新選項卡中而不是在新窗口中打開並創建多個文檔。
  • 將您的工作效率提高 50%,每天為您減少數百次鼠標點擊!
officetab底部
按評論排序
留言 (19)
還沒有評分。 成為第一位評論!
網站主持人對此評論進行了最小化
謝謝你的上述。 但是如果你想從 400_A 增加到 400_B 怎麼辦? 我嘗試了一些東西,但我只能讓它與數字一起使用。
謝謝
網站主持人對此評論進行了最小化
找到了答案。 謝謝你。
=LEFT(B1,4)&"_"&CHAR(CODE(RIGHT(B1,1))+1)
網站主持人對此評論進行了最小化
公式 =ColLtrs(ROW()) 在 excel 單元格中效果很好,我需要在 VBA 中使用相同的公式來給出從 A 到 Z 然後 AA 到 AZ 的結果,依此類推。 如果我在 VBA 中使用 CHAR,它只能到 Z。
網站主持人對此評論進行了最小化
嗨,
方式不繼續使用 VBA 代碼? 上面的 VBA 代碼可以創建從 A 到 Z、AA 到 AZ 等字母以滿足您的需求。
網站主持人對此評論進行了最小化
親愛的主席先生
當我在 Excel 表中運行函數 =ColLtrs(ROW()) 時,我得到了完美的結果,但是如果我想在 VBA 中調用這個函數或單元格值,那麼是否有可能。 所以我的變量可能是 i,值為 1,2,3,4,....27,28 等,結果應該是 A,B,C,D....,AA,AB 等等。 是否可以?
謝謝
網站主持人對此評論進行了最小化
嗨,
請選擇數字單元格並運行以下代碼來解決問題。

子編號TOAZ()
將 xRg 調暗為範圍
將 xStr 調暗為字符串
在錯誤恢復下一頁
對於選擇中的每個 xRg
xStr = 替換(單元格(1,xRg.Value)。地址(假,假),“1”,“”)
xRg.Value = xStr
下一頁
END SUB
網站主持人對此評論進行了最小化
Excel 是取代 Lotus 1-2-3 的電子表格,並且已經存在了這麼長時間,您會認為 Microsoft 的天才會創建一種更簡單的方法來檢索單元格列號,而無需編寫自己的函數。 早在 2001 年和 2002 年,當我在 VBA 中編程時,Excel 電子表格中只有 65536 行,現在這個數字已經增加到荒謬的 1.4 萬行。 重要的不是數據庫有多大,而是當通過 Excel 訪問數據時,您管理硬盤驅動器上數據的智能程度。

如果這不會讓您感到不安,那麼 Excel 使用的銀行家舍入方案應該可以完成這項工作! 我們在學校教過數學,基本四捨五入,後來發現,銀行家“公會”想要確定如何對現金金額進行四捨五入以更好地迎合他們的優勢。 例如,1.5 更接近 1 或 2,但四捨五入為 2,即偶數。 0.5 接近 0 或 1,但作為奇數,他們將其向下舍入為 0。整個系統都已損壞,他們創建了美國企業使用的商業軟件。



我在我正在解決的問題下方閱讀了一條評論,基本上有人說,“我有很多銀行家朋友,他們從未聽說過銀行家四捨五入;他們說他們在歐盟使用了一種稱為“五步四捨五入”的方法。那麼這是否意味著銀行家四捨五入僅用於破壞美國經濟,但不足以破壞試圖接管世界的歐洲經濟?!這些貨幣兌換商從未停止讓我驚訝於他們會走多遠在他們的傲慢中!
網站主持人對此評論進行了最小化
人所做的一切都是腐敗的。 一切。
網站主持人對此評論進行了最小化
有沒有辦法對整個單詞執行此操作? 單詞中的每個字母都向上移動 X 個字符
網站主持人對此評論進行了最小化
此代碼將允許您從 A 轉到 ZZ。

=IF(B2="Z","AA",IF(LEN(B2)=1,CHAR(CODE(B2)+1),IF(RIGHT(B2,1)="Z",CHAR(CODE(LEFT(B2,1))+1),LEFT(B2,1))&CHAR(65+MOD(CODE(RIGHT(B2,1))+1-65,26))))
網站主持人對此評論進行了最小化
感謝 Zac 提供的字母序列公式,為我節省了大量工作量
網站主持人對此評論進行了最小化
使用 Z 時,如何讓它從 A 重新開始?
網站主持人對此評論進行了最小化
我需要從 AZ、AA-ZZ、AAA 到 ZZZ、AAAA 到 ZZZZ 的代碼
網站主持人對此評論進行了最小化
您好,抱歉無法解決這個問題。 您可以將問題發佈到下面的論壇,以獲得其他 Excel 愛好者的幫助。
https://www.extendoffice.com/forum/kutools-for-excel.html 
網站主持人對此評論進行了最小化
我需要一個代碼來將我的行單元格值從 AA-01-A01、AA-01-A02 增加到 AA-01-B01、AA-01-B02。 而且我還需要我的列單元格值的代碼,從 AA-01-A01、AA-01-A02 到 AA-03-A01、A-03-A02。 幫助。
網站主持人對此評論進行了最小化
我將如何創建一個像這樣前進的公式?:

啊啊啊啊
啊啊啊啊啊
啊啊啊啊啊
啊啊啊啊啊
等。
網站主持人對此評論進行了最小化
嗨,威利 B,
您可以嘗試帖子中提供的 VBA 代碼。 添加代碼後,使用這個公式得到你需要的結果:
="AAAAAAAA"&ColLtrs(ROW())
網站主持人對此評論進行了最小化
我需要一個代碼來幫助我的行從 1-A 到 1-Z
網站主持人對此評論進行了最小化
嗨,梅拉·洛佩茲,
帖子中提供的 VBA 代碼仍然有用,但您需要應用以下公式來獲得所需的結果:
="1-"&ColLtrs(ROW())
這裡還沒有評論
留下你的意見
以訪客身份發帖
×
評價此帖子:
0   字符
推薦地點

關注我們

版權所有©2009 - 萬維網。extendoffice.com。 | 版權所有。 供電 ExtendOffice。 |
Microsoft和Office徽標是Microsoft Corporation在美國和/或其他國家的商標或註冊商標。
受Sectigo SSL保護