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

関連記事

: 変数のデータ型・宣言（Dim ステートメント）

変数の宣言一般的な方法【書式】 Dim varname [ As type, …

: フォント太字・斜体（Bold, Italic, FontStyle プロパティ）

太字の設定（Bold プロパティ） Bold プロパティは、フォントを太字にする …

: データをクリアする（ClearContents メソッド）

ClearContents メソッド対象がセル範囲（Range オブジェクト） …

: CPU に制御を移す（DoEvents 関数）

DoEvents 関数 DoEvents 関数を実行すると、CPU に制御を移し …

: 文字列：文字列変数の値を右詰めまたは左詰めにする（RSet ステートメント・LSet ステートメント）

RSet ステートメント・LSet ステートメント【書式】＜ RSet ステ …

: カレントフォルダの取得・設定（DefaultFilePath プロパティ）

DefaultFilePath プロパティカレントフォルダとは、ブックを開いた …

: IME の現在の状態を取得します（IMEStatus 関数）

IMEStatus 関数の使い方【書式】 result = IMEStatus …

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

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

: 文字列：文字列の指定した位置から指定文字数取得（Mid 関数,MidB 関数）

Mid 関数・MidB 関数の使い方【書式】 result_mid = Mi …

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

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

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