Areas オブジェクト (Excel)
選択範囲内にある領域 (隣接しているセルのブロック) のコレクションです。
解説
特異な Area オブジェクトはありません。Areas コレクションの個々の メンバー は Range オブジェクト です。 Areas コレクションには、選択範囲 内のセル の個別の連続した範囲ごとに 1 つの Range オブジェクトが含まれる。 選択範囲に含まれる領域が 1 つのみである場合、 Areas コレクションには、その選択範囲に対応する 1 つの Range オブジェクトが含まれる。
例
Areas コレクション を取得 するには 、Range オブジェクトの Areas プロパティ を使用 します。 次の使用例は、選択範囲に複数の領域がある場合は、その選択範囲をクリアします。
If Selection.Areas.Count <> 1 Then Selection.Clear
コレクション から 1 つの Range オブジェクトを取得するには、領域インデックス番号である Areas (index) を使用します。 インデックス番号は、領域が選択された順序に対応します。 次の使用例は、選択範囲に複数の領域が含まれている場合、現在の選択範囲の最初の領域をクリアします。
If Selection.Areas.Count <> 1 Then
Selection.Areas(1).Clear
End If
一部の操作は、選択範囲内の複数の領域で同時に実行できません。選択範囲の個々の領域をループ処理し、各領域に対して個別に操作を実行する必要があります。 次の使用例は、選択範囲に領域が 1 つしか含まれている場合、選択した範囲で myOperation という名前の操作を実行します。選択範囲に複数の領域が含まれている場合、この例では、選択範囲の個々の領域ごとに myOperation を実行します。
Set rangeToUse = Selection
If rangeToUse.Areas.Count = 1 Then
myOperation rangeToUse
Else
For Each singleArea in rangeToUse.Areas
myOperation singleArea
Next
End If
プロパティ
関連項目
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。