excel VBA中Range函式將列作為變數怎麼表示

2021-07-08 20:30:34 字數 3207 閱讀 4723

1樓:歲月不及你動人

range型別的函式有多種形式,具體如下:

1.您可以嘗試用range(cells(行1,列1),cells(行2,列2))這種形式,比較靈活;

2.也可以用cells(行,列)這樣的形式表示單元格;

3.還可以用columns(列)表示一列;

4.也可以用range(columns(列1),columns(列2))來表示連續的多列。

這裡的"行"和"列"都是整數,不是字母,數字有時會比字母更靈活。

2樓:一年孤獨

直接用就是了:

function getrange(col as string)

getrange = workbooks(1).sheets(2).range(col & "2:" & col & "2012")

'或者'getrange = workbooks(1).sheets(2).range(replace("a2:a2012","a", col))

end function

getrange("b") 'workbooks(1).sheets(2).range("b2:b2012")

getrange("ab") 'workbooks(1).sheets(2).range("ab2:ab2012")

3樓:匿名使用者

首先range是屬性,不是函式,它本身表示一個區域引用,而不是說它作為函式返回一個區域。

將列作為變數一般可以用cells(row,col)屬性中的col(列號)作為變數,作為區域引用的range屬性可以用range(cells(row1,col1),cells(row2,col2))來表示

4樓:浩哥奕弟

從一個工作表中提取資料到另一個工作表,一般思路是從第一個表中將資料裝入陣列,再將陣列裝入第二個表。

例如:arr=sheet1.range("a1:a100")

sheet2.range("a1").resize(ubound(arr),ubound(arr,2))=arr

5樓:匿名使用者

workbooks(1).sheets(2).range(cells(2,m), cells(2012,m)).value

range 引用單元格時,變數只能為行如range("a" & m) 表示a列第m行的單元格

6樓:匿名使用者

親測以下方式可行

sub test()

dim colname1 as string, colname2 as string, colnum as long, a() as long

dim i as integer, j as integer

redim a(1 to 5, 1 to 2)

for i = 1 to 5 '給aa陣列賦值

for j = 1 to 2

a(i, j) = i * j

next

next

for i = 4 to 10 step 3 '從4列即“d”列開始

colnum = i * 1 '起始列的變數表示

colname1 = getexcelcolumn(i * 1) '起始列變數名稱

colname2 = getexcelcolumn(i * 1 + 1) '終止列變數名稱

sheets("sheet1").range(colname1 & "1:" & colname2 & "5") = a

'將陣列a賦值到 range:d1:e5, g1:h5,j1:k5

next

end sub

function getexcelcolumn(columnnumber as long)

dim div as long, colname as string, modulo as long

div = columnnumber: colname = vbnullstring

do while div > 0

modulo = (div - 1) mod 26

colname = chr(65 + modulo) & colname

div = ((div - modulo) / 26)

loop

getexcelcolumn = colname

end function

7樓:

range型別的函式有多種形式,您可以嘗試用range(cells(行1,列1),cells(行2,列2))這種形式,比較靈活,也可以用cells(行,列)這樣的形式表示單元格,還可以用columns(列)表示一列,也可以用range(columns(列1),columns(列2))來表示連續的多列,這裡的"行"和"列"都是整數,不是字母.數字有時會比字母更靈活

您補貼上來的內容是行不通的,區域賦值不可以直接進行,而是要對該區域內的每一個單元格賦值,對於您想表達的意思,有必要外加一個for迴圈來解決這個問題,最關鍵的賦值語句應該是類似

range(....).cells(r,c)=range(***x).cells(r,c)

這樣的語句

8樓:三井熊

range(變數a & "3:" & 變數a & "2012")

9樓:匿名使用者

range(cells(3,i),cells(2012,i)) , i 可以是123,代表a,b,c

excel vba中range函式把列作為變數怎麼表示?

10樓:歲月不及你動人

range型別的函式有多種形式,具體如下:

1.您可以嘗試用range(cells(行1,列1),cells(行2,列2))這種形式,比較靈活;

2.也可以用cells(行,列)這樣的形式表示單元格;

3.還可以用columns(列)表示一列;

4.也可以用range(columns(列1),columns(列2))來表示連續的多列。

這裡的"行"和"列"都是整數,不是字母,數字有時會比字母更靈活。

11樓:李夏璇鈕浩

workbooks(1).sheets(2).range(cells(2,m),

cells(2012,m)).value

range

引用單元格時,變數只能為行如range("a"&m)表示a列第m行的單元格

Excel請問RANGE中變數的寫法

陽光上的橋 range的引數是字串,要使用變數是可以的,下面舉兩個例子 dim x,y,z x a y 2 z a2 示例一 使用部分變數的三種情況 msgbox range x y addree a2msgbox range d y addree d2msgbox range x 3 addree...

請高手指點 EXCEL VBA中WITH的語法和用法

我學習過的教程摘錄一段 在乙個單一物件或乙個使用者定義型別上執行一系列的語句。語法with object statements end with with 語句的語法具有以下幾個部分 部分 描述 object 必要引數。乙個物件或使用者自定義型別的名稱。statements 可選引數。要執行在 ob...

Excle公式if函式,excel中if函式的返回值可以是另一條公式嗎

用sumproduct 函式沒有行列號,無法寫 excel 中if函式的返回值可以是另一條公式嗎 excel 中if函式的返回值可copy以是另一條公式bai,需要用 括起du來。if函式的返回值zhi if 條件,條件成立dao返回結果,條件不成立返回結果 返回結果可以是數字 直接寫入 文字 用英...