sub upperselection()
dim i, j as integer
dim iareacnt as integer, iloop as integer, iloopsub1 as integer, iloopsub2 as integer
iareacnt = selection.areas.count '選擇的區域的數目， 多數為1
for iloop = 1 to iareacnt
i = selection.areas(iloop).columns.count '區域內列數
j = selection.areas(iloop).rows.count '區域內行數
for iloopsub1 = 1 to i
for iloopsub2 = 1 to j
selection.areas(iloop).cells(iloopsub2, iloopsub1) = _
ucase(selection.areas(iloop).cells(iloopsub2, iloopsub1)) '轉為大寫
next
next
next
end sub
EXCEL中數字金額自動轉化為大寫公式
text i69,dbnum2 g 通用格式元 負 dbnum2 g 通用格式元 把格式直接轉換 沒有整啊喂！text i69,dbnum2 g 通用格式元 負 dbnum2 g 通用格式元 text right fixed i69 2 dbnum2 0角0分 if abs i69 1 整 使用 加...
Excel 貨幣中文大寫漢字轉化
excel轉化貨幣數字為中文大寫 例如 效果圖 if d8 1,if d8 0.1,text int d8 100 dbnum2 g 通用格式 分 if int d8 100 int d8 10 10 0 text int d8 10 dbnum2 g 通用格式 角整 text int d8 10 ...
Excel 貨幣中文大寫漢字轉化
excel轉化貨幣數字為中文大寫 例如 效果圖 dbnum2 g 通用格式 分 if int d8 100 int d8 10 10 0 text int d8 10 dbnum2 g 通用格式 角整 text int d8 10 dbnum2 g 通用格式 角 text int d8 100 in...
金額小寫自動轉為大寫
輸入數字 大寫金額 var maximum number 999999999999.99 最大值 定義轉移字元 var cn zero 零 var cn one 壹 var cn two 貳 var cn three 叄 var cn four 肆 var cn five 伍 var cn six ...
Excel自動換行
四種方法實現單元格內的自動換行 1 輸入資料隨時換行 在輸入資料時換行，alt enter組合鍵即可實現。此方法可使已輸入內容的單元格在游標所在處換行。2 單元格區域內換行 將某個長行轉成段落並在指定區域內換行。例如 a10內容很長，欲將其顯示在a列至c列之內，步驟是 選定區域a10 c12 先選a...