- 帖子
- 2
- 主題
- 1
- 精華
- 0
- 積分
- 3
- 點名
- 0
- 作業系統
- windows xp
- 軟體版本
- service
- 閱讀權限
- 10
- 註冊時間
- 2011-6-15
- 最後登錄
- 2019-4-10
|
感謝Hsieh 板大
程式執行ok
想請問下列程式的涵義
ar = Array(a.Offset(5).Value, a.Value, a.Offset(1).Value, a.Offset(3).Value)
Sheets("Sheet1").[A2].Resize(s, 4) = Application.Transpose(Application.Transpose(Ay)) |
|