If T<= 13 Then
: height= =Chr(2*(MOD(T-1,13))+65)
: weight= Chr(2*(MOD(T-1,13))+66)
: Else
height= =Chr(INT(T/14)+64) & Chr(2*(MOD(T-1,13))+65)
: weight= Chr(INT(T/14)+64) & Chr(2*(MOD(T-1,13))+66)
End if
MOD 是EXCEL 取餘數的函數
INT 是無條件捨去的函數
※ 引述《timohu (睡覺要關呼叫器)》之銘言:
: 如果我想把每個球員的身高體重存入EXCEL
: ex:
: 第一隊的球員身高存在A,體重在B(第一個球員A1,B1,,第二個A2,B2.....)
: 第二隊的球員身高存在C,體重在D
: 依此類推
: 有什麼寫法可以寫成球隊代碼1時就知道要放在A跟B(2==>C,D)
: (下面T為球隊代碼)
: 我現在的寫法很長很死@@" (excel排法是A~Z,AA~AZ,~BA~BZ........)
: If T<= 13 Then
: height= Chr(64 + 2 * T-1)
: weight= Chr(64 + 2 * T
: ElseIf T> 13 And T<= 26 Then
: height= "A" & Chr(64 + 2 * (T- 13) - 1)
: weight= "A" & Chr(64 + 2 * (T- 13))
: ElseIf T> 26 And T<= 39 Then
: height= "B" & Chr(64 + 2 * (T- 26) - 1)
: weight= "B" & Chr(64 + 2 * (T- 26))
: ElseIf T> 39 And T<= 52 Then
: height= "C" & Chr(64 + 2 * (T- 39) - 1)
: weight= "C" & Chr(64 + 2 * (T- 39))
: ElseIf T> 52 And T<= 65 Then
: height= "D" & Chr(64 + 2 * (T- 52) - 1)
: weight= "D" & Chr(64 + 2 * (T- 52))
: ................................
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 61.217.211.18