[算表] 請問VBA中逐欄設定欄寬怎麼寫?

作者: CaoCao (超級討厭統一)   2016-08-17 20:43:22
軟體:Excel
版本:2010
請教各位,我想在第一列輸入數字,然後把那數字當作該欄欄寬,這樣怎麼寫?
我只會寫列高,不會欄寬,哭哭...
請眾大神幫幫忙。
Ex.
假設要設定的有50欄,先以4欄當作例子。
A B C D ......
1 105 120 133 205 ......
然後把A欄欄寬設定為105,B欄欄寬設定為120,C欄133,D欄205......
如果是列高,我是這樣寫:
Dim x
Dim y As Integer
For y = 1 To 50 Step 1
x = Range("A" & y ) '列高寫在A欄
Row(y).Select
Selection.RowHeight = x
用同樣的寫法寫欄寬,要怎麼寫呢?
作者: soyoso (我是耀宗)   2016-08-17 21:36:00
作者: CaoCao (超級討厭統一)   2016-08-18 00:13:00
謝謝S大~~~

Links booklink

Contact Us: admin [ a t ] ucptt.com