Excel字母列號(hào)互轉(zhuǎn)代碼
.版本 2.程序集 excel字母列號(hào)互轉(zhuǎn).子程序 excel列號(hào)轉(zhuǎn)字母, 文本型.參數(shù) 列號(hào), 整數(shù)型.局部變量 返回值, 文本型.局部變量 索引, 整數(shù)型索引 = 列號(hào) - 1 ' 以0為基.循環(huán)判斷首 () 返回值 = 字符 (65 + 索引 % 26) + 返回值 索引 = 索引 \ 26 - 1.循環(huán)判斷尾 (索引 ≥ 0)返回 (返回值).子程序 excel字母轉(zhuǎn)列號(hào), 整數(shù)型.參數(shù) 字母, 文本型.局部變量 返回值, 整數(shù)型.局部變量 字母字節(jié)集, 字節(jié)集.局部變量 i, 整數(shù)型.局部變量 當(dāng)前基數(shù), 整數(shù)型字母字節(jié)集 = 到字節(jié)集 (到大寫 (刪首尾空 (字母)))當(dāng)前基數(shù) = 1.變量循環(huán)首 (取字節(jié)集長(zhǎng)度 (字母字節(jié)集), 1, -1, i) 返回值 = 返回值 + (字母字節(jié)集 [i] - 64) × 當(dāng)前基數(shù) 當(dāng)前基數(shù) = 當(dāng)前基數(shù) × 26.變量循環(huán)尾 ()返回 (返回值)
字母列號(hào)互轉(zhuǎn)功能調(diào)用代碼
.版本 2.程序集 窗口程序集_啟動(dòng)窗口.子程序 _列號(hào)轉(zhuǎn)換字母按鈕_被單擊列號(hào)轉(zhuǎn)換字母標(biāo)簽.標(biāo)題 = excel列號(hào)轉(zhuǎn)字母 (到整數(shù) (列號(hào)編輯框.內(nèi)容)).子程序 _字母轉(zhuǎn)換列號(hào)按鈕_被單擊字母轉(zhuǎn)換列號(hào)標(biāo)簽.標(biāo)題 = 到文本 (excel字母轉(zhuǎn)列號(hào) (字母編輯框.內(nèi)容))
運(yùn)行結(jié)果:
總結(jié)
以上就是這篇文章的全部?jī)?nèi)容了,希望本文的內(nèi)容對(duì)大家的學(xué)習(xí)或者工作具有一定的參考學(xué)習(xí)價(jià)值,謝謝大家對(duì)VeVb武林網(wǎng)的支持。
新聞熱點(diǎn)
疑難解答
圖片精選