セルの高さ(行高)を求めるには？

セルの幅(列幅)は =CELL("width",A1) で求まるけど、セルの高さを(行高)求める方法を教えてください。
ちなみに、=CELL("height",A1) はエラー#VALUE! を呈します。

No.3 回答者： Qchan1962 回答日時： 2020/03/18 01:41

＃２の補足

4.0マクロ関数が含まれるファイルを開く（使用する）場合
セキュリティでマクロを有効にする必要があります。

この回答へのお礼

何もしなくても、カレントセルの高さは表示されました。為念。

お礼日時：2020/03/18 10:10

No.2 回答者： Qchan1962 回答日時： 2020/03/18 01:29

＃１　追記です。

＞今更勉強する気もないマクロ音痴なので、潔く(?)諦めます。
なので、違う方法を（こちらも提案すれば良かったですね。）
リボンの数式　＞　名前定義　＞　ダイアログ表示

名前　　　：　Height
参照範囲　：　=GET.CELL(17)+NOW()*0
OKを押す
行高さを取得したいセルへ　=Height

この回答へのお礼

》 違う方法を（こちらも提案すれば良かったですね。）
ありがとうございました！感激しました。
「行高さを取得したいセルへ　=Height」
を実際に実行してみて理解したことは、「行高さを取得したい」行の任意のセルに式 =HEIGHT を入力すればOKなんですね。つまり、カレントセル/カレント行の高さが調べられると。
そして、任意のセルの情報を知るなら、マクロに依らざるを得ないと？

お礼日時：2020/03/18 10:08

No.1 回答者： Qchan1962 回答日時： 2020/03/17 17:13

残念ながら、組み込み関数には無いかな（参照画像）

なので、VBAやVBAでユーザー関数を作成する等になると思います。

VBA
Sub Sample()
Range("A1").Value = ActiveCell.Address & "の高さは " & ActiveCell.Height
End Sub

ユーザー関数
作成方法参考：https://kokodane.com/tec3_3.htm

ユーザー関数例
Function CellHeight(セル As Range) As Double
CellHeight = セル.Height
End Function

セルで関数を使用する場合の例

=CellHeight(A1)

この回答へのお礼

コメント、多謝です。

》 組み込み関数には無いかな
やっぱりィ。=CELL("width",A1) はあるのに、片手落ちですよねぇ。
それとも何か理由があるのでしょうか？

私、今更勉強する気もないマクロ音痴なので、潔く(?)諦めます。

お礼日時：2020/03/17 21:28