Application.Rangeレンジ プロパティ

本ページには広告が含まれています。

セルまたはセル範囲を表すRangeオブジェクトを返します。

構文
  1. Range = Application.Range( Cells1, [Cells2] )
引数
Cells1 省略可
範囲を指定します。範囲名には、範囲を表す演算子「:」、共通部分を表すスペース「 」、または複数の範囲を表す演算子「,」を使うことができます。
Cells2 省略可
セル範囲の左上隅と右下隅のセルを指定します。
戻り値
セルまたはセル範囲を表すRangeオブジェクトを返します。

Application オブジェクトを返すメソッド・プロパティ

Application.Range プロパティ
Microsoft Excelアプリケーションを表すApplication オブジェクトを返します。
Borders.Application プロパティ
Borders オブジェクトが属するApplication オブジェクトを返します。

セルの指定例

入力例 説明
Range("A1") セルA1
Range("A1,B2") セルA1とセルB2
Range("A1:B2") セル範囲A1:B2
Range("A1", "B2") セル範囲A1:B2
Range("A1:B2,C3:D4") セル範囲A1:B2とセル範囲C3:D4
Range("1:3") 行1~行3
Range("A:C") 列A~列C

プログラム実行例

セルに文字列を入力(A1形式)

UWSC
DIM Excel = CREATEOLEOBJ("Excel.Application")
Excel.Visible = TRUE

ID = GETID("Microsoft Excel")
CTRLWIN(ID, ACTIVATE)

Excel.Workbooks.Add()
Excel.Range("A1").Value = "UWSC"

// Excel.DisplayAlerts = FALSE
// Excel.Quit
使用関数
解説

人口の上位3位取得

上位3位まで赤文字にする。

使ったファイルのダウンロードは下記リンクからできます。

[download "/example/510/都道府県別人口.xlsx"]
UWSC
DIM Excel = ExcelBoot("都道府県別人口.xlsx")

CONST xlDown = -4121
CONST xlTop10Top = 1

WITH Excel
	.Range("A:E").EntireColumn.AutoFit
	FOR col = 3 TO 5
		DIM Top10 = .Range(.Cells(2, col), .Cells(48, col)).FormatConditions.AddTop10
		WITH Top10
			.Rank = 3
			.TopBottom = xlTop10Top
			.Font.Color = 255
			.Font.Bold = TRUE
		ENDWITH
	NEXT
ENDWITH

//////////////////////////////////////////////////
// 【引数】
//   path : 開くファイルのパス名 
// 【戻り値】
//   <a href="https://uwsc.jp/com/excel/" >Excel オブジェクト</a> 
//////////////////////////////////////////////////
FUNCTION ExcelBoot(path = "")
	DIM Excel = CREATEOLEOBJ("Excel.Application")
	Excel.Visible = TRUE
	IFB path = "" THEN
		Excel.Workbooks.Add
	ELSE
		DIM FSO = CREATEOLEOBJ("Scripting.FileSystemObject")
		IFB FSO.GetParentFolderName(path) = "" THEN
			path = GET_CUR_DIR + "\" + path
		ENDIF
		Excel.Workbooks.Open(path)
	ENDIF
	RESULT = Excel
FEND
結果
.png
使用関数

関連記事

Range オブジェクト
セル、行、列、連続した1つ以上のセル範囲を表します。
Range.AdvancedFilter メソッド (Excel)
検索条件範囲に基づいて、リストにフィルターをかけます。
Range.AllocateChanges メソッド (Excel)
OLAPデータソースに基づく範囲内の編集されたすべてのセルに書き戻し操作を実行します。
Range.AutoFill メソッド (Excel)
指定された対象セル範囲内のセルに対してオートフィルを実行します。
Range.AutoFilter メソッド (Excel)
オートフィルターを使ってリストをフィルター処理します。
Application.ActiveCell プロパティ (Excel)
セルまたはセル範囲を表すRangeオブジェクトを返します。
Application.Cells プロパティ (Excel)
作業中のワークシートのすべてのセルを表すRange オブジェクトを返します。
Range.AutoOutline メソッド (Excel)
指定したセル範囲にアウトラインを自動的に作成します。 指定されたセル範囲が 1 つのセルのときは、シート全体にアウトラインが作成されます。 既存のアウトラインはすべて、新しいア
Range.ClearHyperlinks メソッド (Excel)
指定された範囲からすべてのハイパーリンクを削除します。
Range.Copy メソッド (Excel)