Re: [VBA ] Range Copy with offset
※ 引述《nosrep (真相)》之銘言：
: Hello,
: 我想要將 sh1 B(x)-ED(x) 的Range拷貝到 sh2 某一欄,
: 不過我 sh2 的位置可能會有offset,所以未必固定是從 B 開始,
: 我會透過一個公式算出,差幾個 Column 開始 Copy
: 在 VBA要怎麼達到?...還是我只能一個Cell去 Copy ?
: Worksheets(sh1).Range("B" & (Row + 2) & ":ED" & (Row + 2)).Copy
: Worksheets(sh2).Range("B" & newrow & ":EF" & newrow)
: ^^^ =>可能是變數 ^^^ =>也是要跟著變化
Dim Cel As Range
Dim Rng As Range
Dim rr As Integer
Dim cc As Integer
Dim dx As Integer
Dim dy As Integer
rr = 3
cc = 2
dx = 1
dy = 4
Set Cel = Cells(rr, cc) '"B3"
Set Rng = Range(Cel, Cel.Offset(dx, dy)) ' "B3:F4"
Rng.Select
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 180.218.46.241
推
03/10 10:08, , 1F
03/10 10:08, 1F
討論串 (同標題文章)
本文引述了以下文章的的內容：
完整討論串 (本文為第 2 之 3 篇)：