Excel（エクセル）のマクロ・ＶＢＡ・関数・操作などのメモ

指定したセル範囲のサイズを変更（Resize プロパティ）

2017/11/07

Resize プロパティ

指定したセル範囲のサイズ（行数や列数）を変更します。

【書式】

object.Resize [ ( RowSize, ColumnSize ) ]

引数・戻り値

object ・・・対象となる Range オブジェクトを指定します。
RowSize ・・・変更後の行数を指定します。省略すると変更前の行数となります。
ColumnSize ・・・変更後の列数をしていします。省略すると変更前の列数となります。
戻り値・・・変更されたセル範囲（Range オブジェクト）

Resize プロパティ使用例

サンプルVBAソース 1

　
Sub Sample_Resize1()

    Dim wkst As Worksheet
    Dim myRng As Range
    
    Set wkst = Worksheets("Sheet2")
    
    With wkst
        
        Set myRng = .Range("B3:D8")
        myRng.Resize(1).Copy .Range("G3")
    
    End With

End Sub

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

　

Sub Sample_Resize1()

Dim wkst As Worksheet

Dim myRng As Range

Set wkst = Worksheets("Sheet2")

With wkst

Set myRng = .Range("B3:D8")

myRng.Resize(1).Copy .Range("G3")

End With

End Sub

　

実行結果

サンプルVBAソース 2

　
Sub Sample_Resize2()

    Dim myRng As Range
    Worksheets("Sheet3").Activate
    Range("B3:D3").Select
    Set myRng = Selection.Resize(4, 2)
    myRng.Copy Range("G3")

End Sub

1

2

3

4

5

6

7

8

9

10

11

　

Sub Sample_Resize2()

Dim myRng As Range

Worksheets("Sheet3").Activate

Range("B3:D3").Select

Set myRng = Selection.Resize(4, 2)

myRng.Copy Range("G3")

End Sub

　

実行結果

- VBA基本 excel vba, Resize プロパティ, VBA基本, エクセル VBA

Tweet

Message コメントをキャンセル

このサイトはスパムを低減するために Akismet を使っています。コメントデータの処理方法の詳細はこちらをご覧ください。

関連記事

: 書式を変換（Format 関数）

Format 関数の使い方【書式】 result = Format ( exp …

: カレントフォルダ（CurDir 関数、ChDir ステートメント、ChDrive ステートメント）

カレントフォルダカレントフォルダとは、ブックを開いたり保存するときに既定で参照 …

: 日付時刻：日付から曜日を取得（ Weekday 関数、WeekdayName 関数）

Weekday 関数（日付から曜日を表す数値を返す）の使い方【書式】 week …

: 文字列：文字列の一部を別の文字列で置換（Replace 関数）

Replace 関数の使い方【書式】 result = Replace ( s …

: 指定した値を8進数で表記した文字列に変換する（Oct 関数）

Oct 関数の使い方【書式】 result = Oct ( expressi …

: VBA の演算子（演算子の優先順位）

演算子の優先順位演算子の優先順位とは、１つの式の中に演算子が複数ある場合、どの …

: 日付時刻：数値から日付・時刻データを取得（ DateSerial 関数、TimeSerial 関数）

DateSerial 関数（数値を使って日付データを取得）【書式】 date …

: エラー（CVErr 関数・IsError 関数・Error 関数）

CVErr 関数（エラー番号をエラー値に変換する）の使い方【書式】 retur …

: 文字列：指定した数の空白（スペース）からなる文字列を返す（Space 関数）

Space 関数【書式】 result = Space ( number ) …

: ユーザー定義関数：自動再計算関数の設定（Volatile メソッド）

ユーザー定義関数で、自動再計算を行うかどうかを設定するワークシート上で使用する …

PREV: セルのデータを固定長形式で複数のセルに分割する（TextToColumns メソッド・Parse メソッド）
NEXT: VBA で正規表現を使う（RegExp オブジェクト）