オブジェクトのByRef、ByVal、Variant
ツイッターで出題した問題です。
出題ツイート
Sub main()
Range("A1") = 1
Dim a As Range: Set a = Range("A1")
Call func(a)
Debug.Print a
End Sub
Function func(□ b As △)
b = 2
End Function
□と△の組み合わせで間違っているものはどれか?
□:ByVal , △:Variant
□:ByRef , △:Range
□:ByRef, △:Variant

https://twitter.com/yamaoka_ss/status/1539118680809799683
解説ツイート
正解は
「□:ByVal , △:Variant」
まず、
ByRefは参照渡しです。
ByValは値渡しです。
https://excel-ubara.com/excelvba4/EXCEL218.html
ByRef値渡しの場合は、呼ぶ側の変数の中の値を渡しているので、funcで変更したものはmainに戻りません。
オブジェクト変数の中の値は、オブジェクトのアドレスが入っています。
同じ値のアドレスは同じオブジェクトを参照します。
つまりByVal値渡しでも同じ値のアドレス先のオブジェクトは同じものになります。
ここまでは、一般的なByRef,ByRefの説明でした。
今回の問題の厄介なところは、
ByValでオブジェクトを渡しているが、受け取り側(仮引数)がVariantの場合にどうなるかです。
問題は代入式です。
型Rangeの変数なら、プロパティを省略した場合はValueになります。
しかし、型Variantへの代入では、代入時点で変数が作り直されます。
単純な例.
Set v = Range("A1")
v = 2
エクセルの神髄
「□:ByVal , △:Variant」の場合は、これと同じことが発生しています。
これを避けたい場合は、受け取り側で何らかの対処が必要になります。
引数がオブジェクトかどうかで処理を分岐させたりが必要です。
エクセルの神髄
b.Value = 2
Else
b = 2
End If
Rangeしか入ってこないのであれば、分岐させずに.Valueを付けてしまえば良いのですが、それなら最初から型をRangeで指定すれば良い事になります。
基本的には、ByRefの場合は型を一致させた方が良いと思います。
以上です。

https://twitter.com/yamaoka_ss/status/1539493559736205312
同じテーマ「ツイッター出題&回答」の記事
greeenはgreenに、greeeeeNをGReeeeNに変換
数値変数の値を別の変数を使わずに入れ替える
Rangeオブジェクトを受け取り"行数,列数"で埋める
数式の関数の使用回数、関数名を配列で返す
キーボード操作だけで非表示列を表示
日付型と通貨型のValueとValue2について
小文字"abc"を大文字"ABC"に変換する方法
連番を折り返して出力
4,9を使わない連番作成
コメントから特定形式の年月を取り出す
オブジェクトのByRef、ByVal、Variant
新着記事NEW ・・・新着記事一覧を見る
オブジェクトのByRef、ByVal、Variant|エクセル雑感(2022-06-22)
コメントから特定形式の年月を取り出す|エクセル雑感(2022-06-19)
4,9を使わない連番作成|エクセル雑感(2022-06-17)
連番を折り返して出力|エクセル雑感(2022-06-16)
VBAの基礎・基本の要約|VBA入門(2022-06-14)
ピッボットテーブルって便利だよね|還暦のVBA(2021-10-18)
還暦のVBA:VBAまでたどりつけるか… (2021-09-29)
VLOOKUPを使うことを基本としてシートを設計すべきか|エクセル雑感(2021-08-17)
コンピューターはブラックボックスで良い|エクセル雑感(2021-08-14)
小文字"abc"を大文字"ABC"に変換する方法|エクセル雑感(2021-08-13)
アクセスランキング ・・・ ランキング一覧を見る
1.最終行の取得(End,Rows.Count)|VBA入門
2.RangeとCellsの使い方|VBA入門
3.変数宣言のDimとデータ型|VBA入門
4.繰り返し処理(For Next)|VBA入門
5.Excelショートカットキー一覧|Excelリファレンス
6.セルのコピー&値の貼り付け(PasteSpecial)|VBA入門
7.マクロって何?VBAって何?|VBA入門
8.Range以外の指定方法(Cells,Rows,Columns)|VBA入門
9.並べ替え(Sort)|VBA入門
10.エクセルVBAでのシート指定方法|VBA技術解説
- ホーム
- エクセル全般
- ツイッター出題&回答
- オブジェクトのByRef、ByVal、Variant
このサイトがお役に立ちましたら「シェア」「Bookmark」をお願いいたします。
記述には細心の注意をしたつもりですが、
間違いやご指摘がありましたら、「お問い合わせ」からお知らせいただけると幸いです。
掲載のVBAコードは動作を保証するものではなく、あくまでVBA学習のサンプルとして掲載しています。
掲載のVBAコードは自己責任でご使用ください。万一データ破損等の損害が発生しても責任は負いません。