如何算出顯示第幾名並顯示第X名

show5217

下載 (179.81 KB)

2018-12-13 20:17

show5217

如何算出I欄是第幾名, 比如第一名會顯示  第一名而不是1

show5217

除了這個方法可以用函數代嗎

下載 (350.14 KB)

2018-12-14 06:52

p212

回復 2# show5217
將阿拉伯數字轉換成「一、二、三、四...」格式
使用
=TEXT(要設定格式的值,"[DBNum1]0")
請參考！

准提部林

想顯示為:第一名..第二名.....
1) 自訂格式: 第十名至第十九名, 會顯示為 第一十名, 第一十一名...第一十九名
2) 用函數TEXT轉換格式是可以加工處理, 但其值為文字格式, 無法排序及後續運算

show5217

回復 5# 准提部林

謝謝大大 我研究了一下用
Private Sub CommandButton1_Click()


Range("j2:j100").Clear

For I = 2 To 11

Cells(I, 10).Value = "=Rank(I" & I & " ,I$2:I$11" & "" & ")"

Next

End Sub


Private Sub CommandButton2_Click()
Dim Str As Variant
Dim X As Long, Y As Integer, Z As Integer
Dim NX As Long, NA As Integer

Str = "1=第一名 2=第二名 3=第三名"
Str = Split(Str)
NA = UBound(Str)

For Y = 2 To 11
NX = Cells(65536, Y).End(xlUp).Row

show5217

回復 5# 准提部林

我參考用IF(COUNTIF(I$2:I$11,">"&I2)+1=1,"第一名",IF(COUNTIF(I$2:I$11,">"&I2)+1=2,"第二名",IF(COUNTIF(I$2:I$11,">"&I2)+1=3,"第三名",COUNTIF(I$2:I$11,">"&I2)+1)))   謝謝大大

show5217

回復 4# p212

多學一招 謝謝