Excel字母列號互轉代碼
.版本 2.程序集 excel字母列號互轉.子程序 excel列號轉字母, 文本型.參數 列號, 整數型.局部變量 返回值, 文本型.局部變量 索引, 整數型索引 ＝ 列號 － 1 ' 以0為基.循環判斷首 () 返回值 ＝ 字符 (65 ＋ 索引 ％ 26) ＋ 返回值 索引 ＝ 索引 ＼ 26 － 1.循環判斷尾 (索引 ≥ 0)返回 (返回值).子程序 excel字母轉列號, 整數型.參數 字母, 文本型.局部變量 返回值, 整數型.局部變量 字母字節集, 字節集.局部變量 i, 整數型.局部變量 當前基數, 整數型字母字節集 ＝ 到字節集 (到大寫 (刪首尾空 (字母)))當前基數 ＝ 1.變量循環首 (取字節集長度 (字母字節集), 1, -1, i) 返回值 ＝ 返回值 ＋ (字母字節集 [i] － 64) × 當前基數 當前基數 ＝ 當前基數 × 26.變量循環尾 ()返回 (返回值)
字母列號互轉功能調用代碼
.版本 2.程序集 窗口程序集_啟動窗口.子程序 _列號轉換字母按鈕_被單擊列號轉換字母標簽.標題 ＝ excel列號轉字母 (到整數 (列號編輯框.內容)).子程序 _字母轉換列號按鈕_被單擊字母轉換列號標簽.標題 ＝ 到文本 (excel字母轉列號 (字母編輯框.內容))
運行結果：
總結
以上就是這篇文章的全部內容了，希望本文的內容對大家的學習或者工作具有一定的參考學習價值，謝謝大家對VeVb武林網的支持。
新聞熱點
疑難解答
