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 を使っています。コメントデータの処理方法の詳細はこちらをご覧ください。

関連記事

: VBA の演算子（論理演算子：And、Eqv、Imp、Not、Or、Xor）

論理演算子論理演算を行うときに使用する演算子で、以下の 6 種類があります。 …

: 列挙型変数（Enum ステートメント）

列挙型変数を使う列挙型変数を使用するには、Enum ステートメントを使って、宣 …

: 日付時刻：年・月・日を取得（Year、Month、Day 関数）

日付から年・月・日を取得する関数【書式】 date_year = Year ( …

: 文字に下線を設定する（Underline プロパティ）

下線を設定（Underline プロパティ） Underline プロパティは、 …

: ある数値が、複数の範囲のどの範囲に含まれるかを示す文字列を返す（Partition 関数）

Partition 関数の使い方 Partition 関数は、ある数値が、区切 …

: 書式を変換（Format 関数）

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

: XlThemeColor 列挙型

XlThemeColor 列挙定数値内容 xlThemeColorDark …

: 配列の添字の最小値を「1」に設定する

Option Base ステートメントを使用する【書式】 Option Bas …

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

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

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

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

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