指定したセル範囲のサイズを変更(Resize プロパティ)
Resize プロパティ
指定したセル範囲のサイズ(行数や列数)を変更します。
【書式】
object.Resize [ ( RowSize, ColumnSize ) ]
引数・戻り値
- object ・・・ 対象となる Range オブジェクトを指定します。
- RowSize ・・・ 変更後の行数を指定します。省略すると変更前の行数となります。
- ColumnSize ・・・ 変更後の列数をしていします。省略すると変更前の列数となります。
- 戻り値 ・・・ 変更されたセル範囲(Range オブジェクト)
Resize プロパティ 使用例
サンプルVBAソース 1
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
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 |
実行結果
関連記事
-
-
日付時刻:文字列から日付・時刻データを取得( DateValue 関数、TimeValue 関数 )
DateValue 関数(文字列から日付データを取得) 【書式】 date_va …
-
-
配列の添字の最小値を「1」に設定する
Option Base ステートメントを使用する 【書式】 Option Bas …
-
-
引数が省略されたかどうかをチェックする( IsMissing 関数 )
IsMissing 関数の使い方 【書式】 result = IsMissing …
-
-
ポイント単位の値に変換(CentimetersToPoints,InchesToPoints)
CentimetersToPoints メソッド センチメートル単位の値をポイン …
-
-
文字列:アルファベットを小文字または大文字に変換(LCase 関数,UCase 関数)
LCase 関数・UCase 関数 の使い方 【書式】 <アルファベットの大文字 …
-
-
色を設定する(QBColor 関数)
QBColor 関数 QBColor 関数は、指定した色番号に対応するRGB コ …
-
-
引数の整数部分を取得する(Fix 関数・Int 関数)
Fix 関数・Int 関数の使い方 【書式】 number_fix = Fix …
-
-
変数が日付型かどうかをチェックする( IsDate 関数 )
IsDate 関数の使い方 【書式】 result = IsDate( expr …
-
-
式を評価し、結果(真・偽)に応じた式・値を返す(IIf 関数)
IIf 関数 の使い方 IIf(アイイフ)関数は、式を評価してその結果(真・偽) …
-
-
VBA の演算子(算術演算子)
算術演算子 算術演算を行うときに使用する演算子です。 ^(べき乗)、*(積)、/ …