Nhờ đánh số thứ tự chữ cái tăng dần (1 người xem)

Liên hệ QC

Người dùng đang xem chủ đề này

good_luck

Thành viên mới
Tham gia
11/7/11
Bài viết
15
Được thích
0
nhờ các bác giúp em, đơn giản thế này thôi a.
Em có ô B1 giá trị là D. Giờ em muốn làm công thức ô A5=B1+1=E (tăng 1 thứ tự đơn vị chữ cái, chứ không phải tăng số ạ)...
thanks các bác
 
Nếu bạn muốn đánh số thứ tự theo chữ cái theo kiểu đánh số cột của Excel, tức là sau D là E, sau ZZ là AAA, tất nhiên không quá 16384 (XFD) thì nên dùng hàm sau
Function CotTiep(A$) As String Dim I&, Tt$ If UCase(A) >= "XFD" Then CotTiep = "": Exit Function I = Cells(1, A).Column + 1 Tt = Mid(Cells(1, I).Address, 2) I = InStr(Tt, "$") - 1 CotTiep = Left(Tt, I) End Function
Hàm nhận đầu vào là 1 từ, coi rằng viết hoa hết (ví dụ "tTu"), và cho từ tiếp theo: "TTV". Hãy chép hàm trên vô cửa sổ CODE của file cần xử lý và dùng như mọi hàm.
Nếu A1 là "D" và bạn muốn các từ dưới A1 là E, F thì bạn nhập vô A2 = Cottiep(A1) và chép xuống.
Nếu từ đó >= "XFD" thì hàm trả về "".
 
Nếu bạn muốn đánh số thứ tự theo chữ cái theo kiểu đánh số cột của Excel, tức là sau D là E, sau ZZ là AAA, tất nhiên không quá 16384 (XFD) thì nên dùng hàm sau
Function CotTiep(A$) As String Dim I&, Tt$ If UCase(A) >= "XFD" Then CotTiep = "": Exit Function I = Cells(1, A).Column + 1 Tt = Mid(Cells(1, I).Address, 2) I = InStr(Tt, "$") - 1 CotTiep = Left(Tt, I) End Function
Hàm nhận đầu vào là 1 từ, coi rằng viết hoa hết (ví dụ "tTu"), và cho từ tiếp theo: "TTV". Hãy chép hàm trên vô cửa sổ CODE của file cần xử lý và dùng như mọi hàm.
Nếu A1 là "D" và bạn muốn các từ dưới A1 là E, F thì bạn nhập vô A2 = Cottiep(A1) và chép xuống.
Nếu từ đó >= "XFD" thì hàm trả về "".

Đúng ý em là đánh số thứ tự chữ cái theo kiểu đánh số cột của Excel.
Em làm như bác nhưng không được (e ko phải dân chuyên), nhờ bác làm giúp em công thức ở file dưới với.
Ô H146=I76=AM
Em muốn làm công thức để H146=AN (tăng 1 đơn vị chữ cái), thanks bác
 

File đính kèm

Nếu bạn muốn đánh số thứ tự theo chữ cái theo kiểu đánh số cột của Excel, tức là sau D là E, sau ZZ là AAA, tất nhiên không quá 16384 (XFD) thì nên dùng hàm sau


Đúng ý em là đánh số thứ tự chữ cái theo kiểu đánh số cột của Excel.
Em làm như bác nhưng không được (e ko phải dân chuyên), nhờ bác làm giúp em công thức ở file dưới với.
Ô H146=I76=AM
Em muốn làm công thức để H146=AN (tăng 1 đơn vị chữ cái), thanks bác
Thử lại công thức này:

=SUBSTITUTE(ADDRESS(1,COLUMN(INDIRECT(I76&1))+1,4),1,"")

.
 
Update lên chút, tại ô H146, tự động tìm ký tự gần nhất phía trên bên cột I, ứng với dòng "trừ bể" tại cột G, sau đó +1:

Mã:
=SUBSTITUTE(ADDRESS(1,COLUMN(INDIRECT(LOOKUP(2,1/($G$6:G145="Trừ bể"),$I$6:I145)&1))+1,4),"1","")

Copy xuống H216, H286,...
 
Thử lại công thức này:

=SUBSTITUTE(ADDRESS(1,COLUMN(INDIRECT(I76&1))+1,4),1,"")

.
Nhờ bác giúp thêm em: tham chiếu đến tham số trong công thức.
trong công thức F146, em muốn tham chiếu các tham số AN đến ô H146AW đến ô I146 có được ko bác ???
 

File đính kèm

Web KT

Bài viết mới nhất

Back
Top Bottom