วิธีเพิ่มตัวอักษรทีละตัวโดยอัตโนมัติเพื่อรับตัวอักษรถัดไปใน Excel

สมมติว่าคุณมีเซลล์ที่มีตัวอักษร AB คุณต้องเพิ่มตัวอักษรตัวสุดท้ายทีละตัวเพื่อให้ได้ตัวอักษร AC, AD ... และอื่น ๆ หรือคุณมีตัวอักษร A และต้องการเพิ่มตัวอักษรเป็น B, C ... เพื่อสร้างรายการจดหมาย จะบรรลุได้อย่างไร? บทความนี้สามารถช่วยคุณในรายละเอียด

เพิ่มตัวอักษร AB ทีละตัวเพื่อรับ AC, AD ... พร้อมสูตร
เพิ่มตัวอักษรทีละตัวเพื่อรับรายการตัวอักษรพร้อมสูตร
เพิ่มตัวอักษรทีละตัวเพื่อรับรายชื่อตัวอักษรด้วยฟังก์ชันที่ผู้ใช้กำหนด

เพิ่มตัวอักษร AB ทีละตัวเพื่อรับ AC, AD ... พร้อมสูตร

โปรดทำดังนี้เพื่อเพิ่มตัวอักษรทีละตัวใน Excel

1. เลือกเซลล์ว่างด้านล่างตัวอักษรที่กำหนดจากนั้นป้อนสูตรด้านล่างลงไปจากนั้นกดปุ่ม เข้าสู่ กุญแจ

=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 ต่อไปลาก Fill Handle ลงเพื่อรับรายการตัวอักษรที่คุณต้องการ

เพิ่มตัวอักษร A ทีละตัวเพื่อรับรายการตัวอักษรพร้อมสูตร

คุณสามารถใช้ = CHAR (รหัส (A1) +1) สูตรเพิ่มตัวอักษรทีละตัวใน Excel กรุณาดำเนินการดังนี้

1. เลือกเซลล์ว่างด้านล่างตัวอักษรที่กำหนดให้ป้อนสูตร = CHAR (รหัส (A2) +1) ลงในแถบสูตรแล้วกดปุ่ม เข้าสู่ สำคัญ. ดูภาพหน้าจอ:

2. เลือกเซลล์ผลลัพธ์ลาก Fill Handle ลงเพื่อรับตัวอักษรที่คุณต้องการ

หมายเหตุ: ด้วยสูตรนี้หลังจากได้ตัวอักษร Z แล้วหากคุณลาก Fill Handle ลงไปเรื่อย ๆ คุณจะได้รับอักขระพิเศษตามภาพด้านล่างที่แสดง หากคุณต้องการได้ตัวอักษร AA หลัง Z ฟังก์ชันที่ผู้ใช้กำหนดต่อไปนี้สามารถช่วยคุณได้

เพิ่มตัวอักษรทีละตัวเพื่อรับรายชื่อตัวอักษรด้วยฟังก์ชันที่ผู้ใช้กำหนด

ฟังก์ชั่นที่ผู้ใช้กำหนดต่อไปนี้ยังสามารถช่วยคุณเพิ่มตัวอักษรทีละตัวใน Excel

1 กด อื่น ๆ + F11 พร้อมกันเพื่อเปิดไฟล์ Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง

2 ใน Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่างคลิก สิ่งที่ใส่เข้าไป > โมดูล. จากนั้นคัดลอกและวางโค้ด 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 สำหรับแอปพลิเคชัน หน้าต่าง

4. เลือกเซลล์ว่างด้านล่างตัวอักษรที่กำหนดให้ป้อนสูตร = ColLtrs (ROW ())แล้วกดปุ่ม เข้าสู่ กุญแจสำคัญในการรับตัวอักษรตัวที่สอง

2. เลือกเซลล์ผลลัพธ์ลาก Fill Handle ลงเพื่อรับตัวอักษรที่คุณต้องการ

หมายเหตุ: ด้วยวิธีนี้ตัวอักษรที่คุณเพิ่มขึ้นจะขึ้นอยู่กับหมายเลขแถว คุณต้องเริ่มตัวอักษร A ตัวแรกในแถวแรกของแผ่นงานมิฉะนั้นตัวอักษรจะไม่เป็นระเบียบ

เครื่องมือเพิ่มประสิทธิภาพการทำงานในสำนักงานที่ดีที่สุด

Kutools สำหรับ Excel ช่วยแก้ปัญหาส่วนใหญ่ของคุณและเพิ่มผลผลิตของคุณได้ถึง 80%

นำมาใช้ใหม่: ใส่อย่างรวดเร็ว สูตรที่ซับซ้อนแผนภูมิ และสิ่งที่คุณเคยใช้มาก่อน เข้ารหัสเซลล์ ด้วยรหัสผ่าน; สร้างรายชื่อผู้รับจดหมาย และส่งอีเมล ...
ซุปเปอร์ฟอร์มูล่าบาร์ (แก้ไขข้อความและสูตรหลายบรรทัดได้อย่างง่ายดาย); การอ่านเค้าโครง (อ่านและแก้ไขเซลล์จำนวนมากได้อย่างง่ายดาย); วางลงในช่วงที่กรองแล้ว...
ผสานเซลล์ / แถว / คอลัมน์ โดยไม่สูญเสียข้อมูล แยกเนื้อหาของเซลล์ รวมแถว / คอลัมน์ที่ซ้ำกัน... ป้องกันเซลล์ซ้ำ; เปรียบเทียบช่วง...
เลือกซ้ำหรือไม่ซ้ำ แถว; เลือกแถวว่าง (เซลล์ทั้งหมดว่างเปล่า); Super Find และ Fuzzy Find ในสมุดงานจำนวนมาก สุ่มเลือก ...
สำเนาถูกต้อง หลายเซลล์โดยไม่เปลี่ยนการอ้างอิงสูตร สร้างการอ้างอิงอัตโนมัติ ถึงหลายแผ่น ใส่สัญลักษณ์แสดงหัวข้อย่อย, กล่องกาเครื่องหมายและอื่น ๆ ...
แยกข้อความ, เพิ่มข้อความ, ลบตามตำแหน่ง, ลบ Space; สร้างและพิมพ์ผลรวมย่อยของเพจ แปลงระหว่างเนื้อหาของเซลล์และความคิดเห็น...
ซุปเปอร์ฟิลเตอร์ (บันทึกและใช้โครงร่างตัวกรองกับแผ่นงานอื่น ๆ ); การเรียงลำดับขั้นสูง ตามเดือน / สัปดาห์ / วันความถี่และอื่น ๆ ตัวกรองพิเศษ โดยตัวหนาตัวเอียง ...
รวมสมุดงานและแผ่นงาน; ผสานตารางตามคอลัมน์สำคัญ แยกข้อมูลออกเป็นหลายแผ่น; Batch แปลง xls, xlsx และ PDF...
คุณสมบัติที่ทรงพลังมากกว่า 300 รายการ. รองรับ Office / Excel 2007-2019 และ 365 รองรับทุกภาษา ใช้งานง่ายในองค์กรหรือองค์กรของคุณ ทดลองใช้ฟรี 30 วันเต็ม รับประกันคืนเงิน 60 วัน

อ่านเพิ่มเติม ... ดาวน์โหลดฟรี... ซื้อ...

แท็บ Office นำอินเทอร์เฟซแบบแท็บมาที่ Office และทำให้งานของคุณง่ายขึ้นมาก

เปิดใช้งานการแก้ไขและอ่านแบบแท็บใน Word, Excel, PowerPoint, ผู้จัดพิมพ์, Access, Visio และโครงการ
เปิดและสร้างเอกสารหลายรายการในแท็บใหม่ของหน้าต่างเดียวกันแทนที่จะเป็นในหน้าต่างใหม่
เพิ่มผลผลิตของคุณ 50% และลดการคลิกเมาส์หลายร้อยครั้งให้คุณทุกวัน!

อ่านเพิ่มเติม ... ดาวน์โหลดฟรี... ซื้อ...

13 Comments
Login

Sort by Newest
- Best
- Popular
- Newest
- Oldest

You are guest

or post as a guest, but your post won't be published automatically.

Loading comment... The comment will be refreshed after 00:00.

To post as a guest, your comment is unpublished.
brickh7777@gmail.com · 1 years ago
How do I get it to start over at A when Z is used?
- Reply
To post as a guest, your comment is unpublished.
Zac · 2 years ago
This code will allow you to go from A to 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))))
- Reply
To post as a guest, your comment is unpublished.
Dan · 2 years ago
Is there a way to do this for entire words? Where every letter in the word moves up by X number of characters
- Reply
To post as a guest, your comment is unpublished.
Harold McBroom · 2 years ago
Excel was the spreadsheet that superseded Lotus 1-2-3, and having been around that long, you would think that geniuses at Microsoft would have created a more simple means of retrieving a cells column number, without having to write your own function. Back in 2001, 2002 when I was programming in VBA there were only 65536 rows in an Excel spreadsheet, now the number has increased to a ridiculous 1.4 million rows. It's not how big the database is that counts, but how intelligent you manage the data on your hard drive, when accessing that data through Excel.

If that doesn't make you upset, then the Bankers Rounding scheme used by Excel should finish the job! We were taught math in school, basic rounding, come to find out, the Bankers "guild" wants to determine how cash amounts are rounded to better cater to their advantages. For instance, 1.5 is either closer to 1 or 2, but is rounded up to 2, being the even number. 0.5 is either closer to 0 or 1, but being the odd number, they round it down to 0. The entire system is corrupt, and they create the business software used by American businesses.

I read a comment below the one I'm addressing, and someone basically said, "I have a lot of banker friends, and they never heard of Bankers Rounding; They say they used a method called "5 Step Rounding" in the EU. So does that mean the Bankers Rounding is used only in the sabotage of the American Economy, but not good enough to ruin the European Economy that's trying to take over the world?! These money changers never cease to amaze me at how far they will go in their arrogance!
- Reply
- To post as a guest, your comment is unpublished.
  Me · 1 years ago
  
  Everything man does is corrupt. Everything.
  
  Reply
To post as a guest, your comment is unpublished.
afzalss · 3 years ago
Dear Sir
When I run the function =ColLtrs(ROW()) in an excel sheet, I get perfect results, but if I want to call this function or cell value in VBA, then is it possible. So my variable could be i with values 1,2,3,4,....27,28, etc and result should be A,B,C,D....,AA,AB and so on. Is it possible?
Thanks
- Reply
- To post as a guest, your comment is unpublished.
  crystal · 2 years ago
  
  Hi,
  Please select the number cells and run the below code to solve the problem.
  
  Sub NumTOAZ()
  Dim xRg As Range
  Dim xStr As String
  On Error Resume Next
  For Each xRg In Selection
  xStr = Replace(Cells(1, xRg.Value).Address(False, False), "1", "")
  xRg.Value = xStr
  Next
  End Sub
  
  Reply
To post as a guest, your comment is unpublished.
Afzal · 3 years ago
the formula =ColLtrs(ROW()) works perfectly well in an excel cell, I need to use the same inside a VBA to give me result from A to Z then AA to AZ and so on. If I use CHAR in VBA it has limitation to go only till Z.
- Reply
- To post as a guest, your comment is unpublished.
  crystal · 2 years ago
  
  Hi,
  Way not keep using the VBA code? The above VBA code can create letters from A to Z then AA to AZ and so on to meet your needs.
  
  Reply
To post as a guest, your comment is unpublished.
cdarzur · 3 years ago
thank you for the above. But what if you want to increment from 400_A to 400_B? I tried a few things but I can only make it work with numbers.
Thanks
- Reply
- To post as a guest, your comment is unpublished.
  cdarzur · 3 years ago
  
  Found the answer. Thank you.
  =LEFT(B1,4)&"_"&CHAR(CODE(RIGHT(B1,1))+1)
  
  Reply

เข้าสู่ระบบบัญชีของคุณ

ตั้งค่ารหัสผ่าน