- 帖子
- 835
- 主題
- 6
- 精華
- 0
- 積分
- 915
- 點名
- 0
- 作業系統
- Win 10,7
- 軟體版本
- 2019,2013,2003
- 閱讀權限
- 50
- 性別
- 男
- 註冊時間
- 2010-5-3
- 最後登錄
- 2024-11-14
|
4#
發表於 2012-9-19 21:32
| 只看該作者
本帖最後由 luhpro 於 2012-9-19 21:34 編輯
所以我該從一開始的定義就開始改是嗎?
還是可以把 Columns 用別的參數做取代呢?
謝謝~
Genie 發表於 2012-9-19 17:08
意思是以 Columns 來表示多個欄位時,
後面要放表示欄位名稱的英文字而不能放數字, (數字是表示多列時在用的)
不過這倒可以用 Chr(64 + 欄位序號) 的方式來轉換.
轉換後的程式可以如下 :
Columns(Chr(64 + BeginCol) & ":" & Chr(64 + BeginCol + InsCol - 1)).Insert Shift:=xlToRight
你程式中上列應是 InsCol 而非 InsRow 喔.
另 tempCol = Range(Cells(myRow, 255), Cells(myRow, 255)).End(xlToLeft).Column
可以簡化為 : tempCol = Cells(myRow, 255).End(xlToLeft).Column |
|