Excel VBA 質問スレ Part78

2022/10/30(日) 13:43:16.31

!extend:checked:vvvvv:1000:512
!extend:checked:vvvvv:1000:512
↑同じ内容を3行貼り付けること

ExcelのVBAに関する質問スレ
コード書き込みや作成依頼もOK

次スレは>>980が立てること
無理なら細かく安価指定

※前スレ
Excel VBA 質問スレ Part77
https://mevius.5ch.net/test/read.cgi/tech/1658009255/

-
VIPQ2_EXTDAT: checked:vvvvv:1000:512:: EXT was configured

VIPQ2_EXTDAT: checked:vvvvv:1000:512:: EXT was configured

2023/01/02(月) 00:49:52.66

>>580
内容も吟味せずに脊髄反射で書き込んで馬鹿を擁護するお前のような奴が馬鹿を蔓延らせることに気付くべき

2023/01/02(月) 02:07:30.17

>>580
>>560 にも答えられない馬鹿に言われてもな

2023/01/02(月) 09:35:04.20

>>582
お前の書き込み内容、有益な情報が一つもないじゃん
「内容も吟味せずに脊髄反射で書き込んで馬鹿」ってお前の事？

**570** (ﾜｯﾁｮｲ b666-9yt5) · 2023/01/02(月) 11:24:49.11

なんだかすみません。
今回は主にファイルオープン関連で「絶対にエラーが出ない全てに対応したコード」というのが
書く自信がありませんでした。勉強不足です。

今も一つわからないのですが、例えばマクロと同じフォルダにあるBookAを開いてる状態で、
BookAファイルをさらにオープンしようとするとwin10office2019の当方環境においてエラーが出ないのですが、
これは基本的に他のパソコンでもエラーが出ないのでしょうか？
winxp以降office2000以降あたりであれば大丈夫なものなのでしょうか？

別フォルダにある同名ブックを開こうとするとエラーになります。
こちらは開く前にファイル名で既に開いてるブックを確認するコードを追加しようとみたいなサイトが
いくつも見つかるので解決したのですが、既に開いてるファイル自身を開く事が成功してしまう
ケースを通常と思ってエラーの出ないコードと考えてよろしいのでしょうか？

2023/01/02(月) 11:57:58.32

初心者が思い込みで作ると失敗する
開発環境と実行環境がバージョンやパッチも含めて違うなら同じ環境で動作の確認をするしかない
作ったら終わりではなく、条件を変えても正しく動作するかを確認するくらいやれよ
長いファイル名とか共有フォルダとか、サイズ0に壊したファイルとか作って試すなど

2023/01/02(月) 13:14:15.32

当たり前だけどファイル操作はVBAの知識以外にOSの知識もある程度必要になるから聞かなきゃ判断できないような処理ならやらないが吉かと。
開くのは諦めてせいぜいファイルの存在確認程度にとどめておけば?

2023/01/02(月) 13:45:13.52

>>585
自分はWin10＋Ofiice365だけど
開いているファイルと同じフォルダのファイルを開こうとすると開いているファイルがアクティブになって
別フォルダの同名ファイルであれば同じ名前のファイルは開けないってエラーになるから
古いバージョンでも一緒なんじゃないかと思うけど
回避したいならWorkBooksの内容をチェックして同じファイル名があればメッセージを出して処理を止めるなりすればいいんだと思うけどね

古いバージョンでもチェックしたいなら単純にフォルダA、フォルダBに同じファイルをいれて両方開けるか試してもらうだけでいいと思うぞ

2023/01/02(月) 14:06:13.66

多分だけど、手動で同一ファイルをダブルクリックで開くような操作では無く
開いたファイルを元に「新しいウィンドウを開く」のようなコードを書いてると思う
いろいろとオリジナルというか無手勝流というか、な制作してるようだし、個人利用に留めとけ　と忠告しておきたい
ま、他人からコテンパンに罵られて伸びるタイプも居ない訳でも無いから、ご自由になんだけど(例えばMS社毎月バグって世界中から罵られても知らん顔してアプデを続けるし)

**570** (ﾜｯﾁｮｲ b666-9yt5) · 2023/01/02(月) 21:56:15.06

ありがとうございました。
完璧なコードって、人間の行動を全て読むレベルのとんでもない高度な行為ですよね…
プログラムに携わりたいなら甘えずに向き合うべき課題なんだと思います。
年末年始みたいな時くらいしか勉強出来ないの悔しいですね。

2023/01/02(月) 22:55:02.83

上の方でエラーが出たら自分でコードを修正するって書いているから解決方法は知っているんだろ？
なら、Do loopとOn Error Go Toを使ってエラーが解決するまで、知っている限りの解決コードを全て書けばいいと思うが

**デフォルトの名無しさん** (JP 0He6-9yt5) · 2023/01/03(火) 00:15:50.12

>>590
全てって言っても場合によるよ
入力内容のチェックなら数値文字列エラー値ぐらいでほぼ網羅できるけど、
ファイルを開いたりアクティブになったりってなるとExcelやOSとの兼ね合いも出てくるからほんとキツイ
通常操作の9割をカバーできればいいと思う

あとは起きたエラーに都度対応していくしかない

2023/01/03(火) 00:27:15.59

>>591
ファイルロックとかは可愛いもんでウイルスに実行ファイルを書き換えられたとか、アクセス中に停電とか、HDD不安定とかもしもを考えだすと切りがない

2023/01/03(火) 01:34:33.44

VSCode では、同名のファイルでも、パスが異なると開ける。
a/a.txt, b/a.txt みたいに判別できる

そもそも、そういう事を想定していないアプリがおかしい。
アプリを作る際に、これぐらい誰でも分かる

2023/01/03(火) 01:35:01.24

VSCode では、同名のファイルでも、パスが異なると開ける。
a/a.txt, b/a.txt みたいに判別できる

そもそも、そういう事を想定していないアプリがおかしい。
アプリを作る際に、これぐらい誰でも分かる

2023/01/03(火) 01:52:28.54

アルツハイマーでもこれくらい分かる

2023/01/03(火) 06:33:04.83

最初にon error resume nextを書いとけばランタイムエラーを出さずに原因不明の謎の挙動だけで済む
もし時間に余裕があれば目星を付けた処理の直後でif err<>0 thenでエラーになってないかチェックする
エラーの検出後はon error goto 0でエラーをクリアして再度on error resume nextを仕掛ける
これぐらいいい加減でもVBAの場合は許されるから覚えておくといい

2023/01/03(火) 06:33:48.96

>>593
でた、極論で語る奴w
お前は毎回そこまで考えてコード書いてるのかよ

2023/01/03(火) 06:35:37.55

>>594
むしろダメなのはメジャーなソフトではExcelぐらいだと思うぞ...

2023/01/03(火) 12:03:30.64

読み込みに失敗、書き込みに失敗程度の動作確認は初心者でなければやると思ってる
あとはエラーコード吐いて、異常がでた場合○○を確認してくださいとかで対応
フリーズしない、ファイルを壊さない、間違った表示をしないように作るのは最低でもやってほしいもんだ
俺ならそうするがみんなは違うのかな？

2023/01/03(火) 12:39:40.67

まあテストをどこまでやるかは状況次第だけどファイル関係をエラートラップしてリトライなりエラー表示をするのは普通だと思う
書捨てとか自分しか使わないならエラートラップを端折ってあえてVBAのエラーで止めるとかはある
個人的にないのは>>597みたいなエラーの握りつぶし

2023/01/03(火) 13:00:34.65

まともな開発だとエラー握り潰しは絶対ダメだけどVBAだからなあ
必ずエラーが出るゴミみたいなマクロは珍しくないから、いっそ握り潰してくれた方がマシだと思うことはある

2023/01/03(火) 13:33:35.71

>>598
アホが食いつかんかなと思って恣意的に書たんたがこれほどとはw
こどおじには解らんだろうが絶対落ちてはいけないシステムならそのくらいの対策は普通にされてるぞ

2023/01/03(火) 13:40:10.21

>>602
VBA だから握りつぶしても良いと言うのはよくわからん
まあモダンな言語に比べてエラー処理がやりにくいと言うのはあるけど

2023/01/03(火) 13:49:00.13

>>603
VBA で書く絶対落ちてはいけないシステム！
本でも出せば？w

2023/01/03(火) 14:02:20.98

>>605
おいおい俺はVBAとは言ってないぞ
お前が勝手に吹いてるだけなんだが自覚できんのか

2023/01/03(火) 14:07:51.30

VBAでは絶対に落ちてはいけないシステムとかいう発想自体がシロウト臭丸出しでハズいな

2023/01/03(火) 14:09:48.88

正月からこんなとこでイキってる程度だから仕方ないか w

2023/01/03(火) 14:34:55.58

>>606-608
スレタイ100回読んで来年までROMっとけ

2023/01/03(火) 15:58:29.44

>>593なんてハードウェアやその周りのソフトの対策であって開発するアプリケーションで考慮する話ではないと俺も思ってるけどな
まあ戻れないところまで追いつめられて必死なんだろうけどそろそろ落ち着いたらどうかね

**デフォルトの名無しさん** · 2023/01/04(水) 05:43:45.27

やりたいことあって今日人生で初めてプログラミングに触れたんですけど、ぜんぜんわかりません
idが_rって書いてあるから_rって書いてんのになんでこれでエラー吐くんでしょうか
助けてください
https://i.imgur.com/xYbWeZX.jpg
https://i.imgur.com/KMcczJ7.jpg

2023/01/04(水) 09:18:44.49

まずインデント揃える所から覚えようか

**デフォルトの名無しさん** (JP 0He6-9yt5) · 2023/01/04(水) 09:44:30.63

>>611
Seleniumでスクレイピングしようとしてるのは分かるけど、
その部分だけコード見せられても分からない
全部見せて

2023/01/04(水) 09:54:05.40

てかエラーの内容も書かない奴の相手すんなよ...

2023/01/04(水) 10:34:18.99

これって前澤じゃんけんで金もらえるから自動化したいとかそういう事考えてるんじゃね？

2023/01/04(水) 11:05:45.68

モチベーションの起点はなんでもいいだろ
俺だってエロ画像見たいからperl覚えた口だし

**デフォルトの名無しさん** (JP 0He6-9yt5) · 2023/01/04(水) 11:22:52.20

>>615
まさにそれだね
招待すると挑戦回数が増える
謎アプリをインストールすると100円ぐらいもらえる
という仕組みらしい

プログラムを覚える同期としてはとても良いと思うが、
登録とか色々必要だからめんどくさくて検証できないな

2023/01/04(水) 11:28:33.03

>>616
おれは教えないだけだから別にかまわんよ
そもそも今さらそんなこと聞いてる奴だから他でも聞いてるかもしれんし作れるとも思えないしな

2023/01/04(水) 11:33:57.55

教えないなら黙ってりゃいいのに...

2023/01/04(水) 17:52:13.99

おまえもな

2023/01/04(水) 19:22:28.05

教えないぞー！
俺は教えないぞー！！

2023/01/04(水) 20:38:59.74

それよりもグー、チョキ、パーがr、s、pになる理由を誰か説明してくれ

2023/01/04(水) 20:45:41.73

英語版の頭文字

**デフォルトの名無しさん** · 2023/01/04(水) 23:17:45.40

自己解決しましたありがとうございます

2023/01/05(木) 12:03:16.68

すみません、質問させてください
Listのようなものに最大5000行のデータを表示、編集、Excelに保存したいです
可能なツールと良ければアドバイス等頂けないでしょうか

2023/01/05(木) 12:18:42.51

Excelを使ってみたらどうかな

2023/01/05(木) 12:36:59.21

Listってなに？
俺には意味不明だけど他の人には通じるのかね

2023/01/05(木) 12:45:31.09

>>625
PowerApps使えば一行もコード書かずにできるよ

**デフォルトの名無しさん** (JP 0He6-TwI4) · 2023/01/05(木) 12:51:12.92

>>625
それ本当にExcelそのものじゃん
新しいウィンドウを開くとか試してみて

2023/01/05(木) 12:53:15.69

>>627
listviewなどです
listviewはコード以外に画面編集可能ですか？

**デフォルトの名無しさん** (JP 0He6-TwI4) · 2023/01/05(木) 12:55:06.72

シートに書いてそれをlistviewに反映させればいいんじゃないかな

2023/01/05(木) 12:55:24.41

エクセル2019とそこに付随するVBAでは日付の起点が違うのですか？
ちょっと調べると1900年をうるう年と勘違いしてるとかなんとかでてきます。

44932とセルに手打ちしてから日付に直すと2023/1/6になります。
=Now()をセルに入力して数値表示すると44932、しかし日付にすると今2023/1/5

VBAは1899/12/30=1でエクセルは1900/1/1=1ということでしょうか？
それでもつじつまがあわないのですが。

2023/01/05(木) 12:59:20.88

>>631
それを嫌っている人達がいるんですよ
であればlistview等を使用してどうにかするしかないですが、そこまでするならVBAでやる必要が無いと思ってます

2023/01/05(木) 13:09:13.57

僕ちゃんの頭の中にはlistviewと勝手に名付けた理想のツールが存在しますということか

**デフォルトの名無しさん** (JP 0He6-TwI4) · 2023/01/05(木) 13:14:36.43

>>633
う～～ん、Excelが駄目な理由がよくわかんないな

キャッサバとか使ってみては？？
https://forest.watch.impress.co.jp/library/software/cassavaedit/

もしくはスプレッドシート＋googleform使うとか

>>632
「数値」は四捨五入されるから同じに見えるだけだよ。シリアル値を確認する時は、小数点も表示した方がいい
ちなみにmac版が1900年-1904年ぐらいがうるう年かlotusかなんかの関係でズレている。1905年以降からは全てのバージョン・マクロで同じシリアル値になる

**デフォルトの名無しさん** (JP 0He6-TwI4) · 2023/01/05(木) 13:15:31.72

>>634
通じるからいいじゃん
無駄な煽りはやめよう

>>633
いい忘れてたけどlistviewじゃなくてlistboxかなんか

2023/01/05(木) 13:33:51.27

>>630
どんな編集したいのか不明だけど楽したいならAccessでもいいんじゃない
そもそも質問が漠然としすぎててListの形式もわからんし
単一項目や相関項目の入力チェックとか何がしたいかも不明なんだよね
質問する側も回答欲しいなら要件を書き出せないと適切な回答もらえないぞ

2023/01/05(木) 13:34:51.53

>>635
項目が50近くあって混乱するからといった理由ですね
他の人はできてますしそれくらい覚えられると思いますが、とにかく多量のデータを見ると混乱するそうです

2023/01/05(木) 16:58:29.73

>>632
ちょっとだけじゃ無くて、もっと調べると簡単に理由が出て来るじゃん
で、1900年の日付のデータを扱う必要が頻繁にあるのだとしたら、もっと詳しく調べて間違いが無いようにしとかないと

2023/01/05(木) 18:51:14.37

>>636
通じないよ
Excelシートが閲覧、編集すべての点で最適

2023/01/05(木) 19:13:27.32

何なら良くて何がダメなのかハッキリさせておかないと何度もやり直す羽目になるパターンだな

**632** (ﾜｯﾁｮｲ b666-9yt5) · 2023/01/06(金) 03:18:12.99

>>635
明日の昼くらいの時間に=Now()を小数点表示させてみます！感謝です！

2023/01/06(金) 07:15:36.61

昨日Sessionで「トランプの影響力低下」
と断言した北●さん
面目丸潰れ

2023/01/06(金) 12:14:29.82

>>640
通じないなら通じる人が答えるから通じない人は黙ってればよくね？

2023/01/06(金) 19:13:43.70

便秘じゃしょうがないな

2023/01/06(金) 21:21:30.88

>>642
セルの書式との組み合わせだから、セルの書式を意識しないと「標準」ではまる。

Excelの「標準」はExcelだけにしかわからないから、Excelで閉じた世界でないから使わない方がいい。

2023/01/07(土) 13:21:26.68

配列=range("A1:C3")
と格納した配列にrange("A5:C8")を追加で格納したいです
この場合、配列の要素1つづつに格納していくしかないのでしょうか？範囲をまるごと格納できますか？

2023/01/07(土) 18:18:20.53

ぐぐれば配列を結合してくれる関数が出てくるよ

2023/01/07(土) 18:45:14.41

ぐぐれとかの用語を初心者は知らないんじゃね

**デフォルトの名無しさん** (JP 0H2b-Or7w) · 2023/01/07(土) 21:17:42.27

>>647
用途がよく分からんけど、普通に文字列で結合していけばいいのでは？
オブジェクトで返す事もできる

Sub foo()

r = "a2:b3"
r = r & "," & "e3:f4"
r = r & "," & "h3:i4"
Range(r).Value = 1

Set ra = Range(r)
ra.Activate

End Sub

Intersect辺りでもなにかできそうかも？と考えたけど、
全然できないかもしれない

2023/01/08(日) 01:02:59.56

オブジェクト指向って
Range.Offset(1).value
みたいな事でしょうか？

自作関数って基本は引数渡して返り値貰ってみたいな手続きするだけの存在ですが、
それをオブジェクトを作る関数(Rangeオブジェクトみたいなものを生み出せる関数)にして、
その関数から出てきたオブジェクトは
メソッドＡ、メソッドBが使えて、プロパティA、プロパティBみたいな状態も持っている
みたいな考えの元に組んでいくとオブジェクト指向なプログラミングになるのでしょうか？

それはやはりそういう形式を取った方が、少ない脳みそでも複雑化に対応できるという事なのでしょうか？

同じ機能を持ったプログラミングを後から書き直す事があります。
勉強を進めた結果、「もしかしてこういうルールで書いた方がわかりやすいかも」みたいに思って書き直します。
うまく行くと複雑だと思っていたものがとてもチープで難易度の低いものに見えてきます。

オブジェクト指向はその極致みたいなものですか？

2023/01/08(日) 02:37:15.71

>>651
>みたいな事でしょうか？
それはメソッドチェーンという記法で、オブジェクト指向言語から生まれた副産物
一見便利で、実際これが無ければVB/VBAはとっくに廃れていたと思われる
ただしメソッドの呼び出しと中間オブジェクトの生成で毎回コストが掛かるため、
複数同じような処理を書く場合は一旦適当な変数で受けるか、VBAの場合はWithステートメントでまとめた方が良い

2023/01/08(日) 02:50:51.43

オブジェクト指向の原理主義的には、関数の戻り値はあまり積極的に使用すべきではない
でもドットで階層を掘っていくのは頭悪い人にもわかりやすいから、VB系のエセオブジェクト指向ではわりとよく使われる

2023/01/08(日) 03:26:30.83

>>653
「関数」という自分しかわからない用語の定義で話すのはやめろ

2023/01/08(日) 08:20:15.45

オブジェクト指向には大きく分けてクラスベースとプロトタイプベースの2種類の流派がある
ちなみにExcel VBAのオブジェクト指向はどちらとも言えない傍流としか言いようがない
本格的にオブジェクト指向を学ぶなら別の言語の方が良い

**デフォルトの名無しさん** (JP 0H2b-Or7w) · 2023/01/08(日) 11:07:33.40

>>651
エクセルvbaの場合、オブジェクト指向かどうかは考えなくていいよ

オブジェクト指向かどうかは、オブジェクトをメインに据えるかどうかによる
しかしエクセルvbaは「エクセル」という超巨大なオブジェクトが中心なので、
普通に書いてたら勝手にオブジェクト指向になる

2023/01/08(日) 11:19:24.04

そもそもWindowsというOSを使ってる時点で、すべてのアプリは「Window」オブジェクトの上で転がってるだけ

2023/01/08(日) 12:08:40.63

オブジェクトの設計図そのものを作って組み合せていくスタイルがクラスベース(C++やC#など)
半完成品のオブジェクトに手を加え加工したクローンを作って組み合わせていくスタイルがプロトタイプベース(JavaScript/TypeScriptなど)
Excel VBAは完成品として用意されたオブジェクトをそのまま利用するスタイル
(VBAのクラスモジュールは変数や関数を単純にまとめるだけでクラス自体の拡張性はほぼ無い)

**デフォルトの名無しさん** (JP 0H2b-Or7w) · 2023/01/08(日) 23:34:49.21

sheetクラスを継承できれば・・・
いやできなくてよかった

2023/01/09(月) 00:09:50.06

VBAのオブジェクト指向機能は、あくまでCOMを使うために設計されてると言っていいよ
OfficeやC++その他で作成されたCOMを利用するだけだし
クラスを作ったりできるのはおまけで、VBAでそこからさらに派生なんてことは誰もやらないし

2023/01/09(月) 08:59:03.23

できないからやらないだけできるなら派生とかやりまくってると思う

**デフォルトの名無しさん** (JP 0H2b-Or7w) · 2023/01/09(月) 12:03:48.87

あまり考えたくないな

2023/01/09(月) 13:50:58.25

現代的なオブジェクト指向ではクラスの継承はあまり使用せずインターフェイスを使うので、クラスを派生できないこと自体はそれほど問題ではない
とはいえVBAでクラスを使うべきでないのは同意する

2023/01/10(火) 19:35:26.63

オブジェクト指向は考え方の一つとして知っていればいい

2023/01/10(火) 19:47:40.17

VBAのたとえなんちゃってオブジェクト指向でもクラスは普通に便利じゃん

俺はカプセル化もオブジェクト指向も正直どうでもいいから
Publicで書いたりすることも少なく無い

**651** (ﾜｯﾁｮｲ 5b66-tb1I) · 2023/01/11(水) 00:58:56.65

オブジェクト指向の話は自分にはまだ早かったようです。
時間のあるときにC++やC#の世界がどんなものか覗いてみようと思います。
ありがとうございました。

ちょっと初歩的な事で質問をしたいのですが、
UserForm1の方に
Private Sub ButtonEnter_Click()
FormData = TextBox1.Value
Unload Me
End Sub
とあるとします。エクセルシート側のコマンドボタンに登録してるマクロには
Public FormData as Variant
Sub Sample()
FormData = 1
UserForm1.Show vbModeless
MsgBox FormData
end Sub
みたいにしてパブリック変数でフォームの入力値のやりとりをしようとしています。
しかしこれを実行するとユーザーフォームが表示された直後にMsgBoxが1表示してきます。
原因はvbModelessまでは調べが付きました。
RefEditでvbModeless使うとボタンが反応しなくなりエクセルの強制終了しか手がなくなる事も。
win10office2019環境特有かもしれませんが。

そこで質問ですがvbModelessって本来どうやって使うものなのでしょうか？
この挙動だと何にも使えない気がするのです。
処理がShowで止まらずに進んでしまうので入力値を受け取れませんし。
処理を止めるコードとセットで使うのでしょうか？
RefEditでは絶対にvbModelessは正常に動作しませんか？

2023/01/11(水) 07:07:46.99

画面表示後に後続のコードを実行させたくないなら　vbModal　にしないとだめ
vbModeless　のままで作りたいなら後続のコードを画面側にもっていくか
ブック側に別のPublic関数として用意して画面側から実行するなりしないとだめ

vbModeless　は画面を表示した状態でもブック側を操作できるようにしたいときに指定するものなので
そういう事をしたいときに使いましょう

2023/01/11(水) 07:14:17.28

>>666
vbModeless は単純にユーザーフォームを表示したままEXCELシートを編集できるようにするか
否かなので、入力待ちのような場合には不要ですね。
本来の使い方というか、特徴からしてフローティングツールボックスみたいなことができる感じ？
Photoshopとか見たことあるとイメージしやすいかな。。。

必要かどうかは置いておいて例えば、、、
複数のマクロが作ってあるEXCELファイルでシート上のコマンドボタンでマクロ呼出ししようと
すると当然、別シートに移ると使えなくなるけどvbModelessのユーザーフォームに作っておけば
シートを移ってもボタン一発で呼び出せる、みたいな？
あとはテーブルがいくつか作られているシートでテーブルを渡りながら編集する必要がある場合、
目的のテーブルのみを表示させるマクロを登録しておけば簡単にアクセスできるようになる、とか。
どちらもどうでもいい使い方だけどｗ
ユーザーフォームとのデータの受け渡しならココを参考にしてみては？
関数化して引数でやりとりしてしまえばいいような気がする。。。
https://excel-ubara.com/excelvba3/EXCELFORM010.html

**666** (ﾜｯﾁｮｲ 5b66-tb1I) · 2023/01/11(水) 10:17:37.94

>>667>>668
ありがとうございます。
パブリック変数よりFunctionの戻り値をうまく使うっていう方がいいのですね。
UserForm_Initializeもいらなくなりそうですね。
フォームが増えていくとフォーム毎に渡すよう受け取るようのパブリック変数作って
ちょっと管理しづらいなと思っていましたのでいい勉強になりました。
Hideも使っていきます。
モーダルだとフォーム出てる間、タッチパッドの二本指スクロールが正常に動作しなくなるので
そのためだけにモードレスに魅力を感じていました。

**666** (ﾜｯﾁｮｲ 5b66-tb1I) · 2023/01/11(水) 10:30:30.16

>>668
ちなみにそのサイトにあるdoModalというフォーム側に書くパブリック関数名ですが。
今試したところ、標準モジュールと違ってPublic Subで同名のdoModal関数を
フォーム毎に一つずつ名前重複エラーにならなかったんですが、これを仕様として受け止めて
フォーム側の呼び出し関数を全部同じ名前にしてしまっても安全でしょうか？

フォームが5個あるとして、別々の呼び出し関数を作るのは名前を憶えれないどうせ
呼び出し時には
標準モジュール側で
受け取る変数名 = FormName.doModal(引数1,引数2)
みたいにするので別にdoModalにこだわりませんでが
フォーム名.Initializeとか、フォーム名.ShowMeとかにする危険性はありますでしょうか？

2023/01/11(水) 10:47:26.82

オブジェクト指向ですね

2023/01/11(水) 11:07:44.33

>>670
標準モジュールに宣言するPublic関数とは違って
ユーザーフォームに宣言するPublic関数はユーザーフォーム名.XXXのような記載をして呼び出すので同名の関数でも構わない
（XXX単独では呼べない）

2023/01/11(水) 11:12:01.18

>>670
VBEの画面でF2を押下するとオブジェクトブラウザが表示されるから
自分で作った変数や関数がどういう管理をされているかみてみるといいかもね

2023/01/11(水) 12:42:00.54

>>670

> みたいにするので別にdoModalにこだわりませんでが
> フォーム名.Initializeとか、フォーム名.ShowMeとかにする危険性はありますでしょうか？

頭にshowをつけてユニークな名前にすることは個人的にはよくある。
initializeはつけたことないけどユニークな名前なら平気なんじゃないかな。ただVBA側で用意されている名前に酷似してしまうから避けるけど。

**670** (ﾜｯﾁｮｲ 5b66-tb1I) · 2023/01/11(水) 14:39:04.35

>>672
そうですよね。自信持って決まった名前のやつ使い回します。
>>673
見る習慣なかったですが見ないと理解は深まらないやつですねこれは。
>>674
予約語とぶつからないよう気を付けます。

グローバル変数のやりとりなくしたら右上×ボタン閉じでエラーが出る原因が突き止められなくて苦労しました。
Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
If CloseMode = vbFormControlMenu Then
Cancel = True
Me.Hide
End If
End Sub
右上×ボタンで閉じるとShowの次の行に制御は戻るのに、モジュールレベルの変数は
値をクリアされてしまうのですね。
とりあえずグローバルのやりとりは卒業できました。ありがとうございました。

2023/01/11(水) 23:25:55.84

オブジェクト指向では
多態性を覚えて初めてその恩恵を実感すると思う。

2023/01/12(木) 01:03:37.94

>>676
多態性とは…
プログラムの経験が浅いとイマイチ具体例が出て来なくてモヤモヤっとした状態から抜け出せませんね。
VBAはオブジェクトは作れないけど、元々作ってあるオブジェクトの利用は出来るんですよね？多分
as objectとされるものは大体、オブジェクト名.プロパティ名とかオブジェクト名.メソッド名みたいなの持ってますよね。

継承というのは、Range.InsertとRange.EntireRow.Insertみたいな親クラスのメソッドを
引き継いでる子クラスみたいなことなのでしょうか。
今の経験量ではどれだけリファレンスサイトを読んでもピンときません。
残念ですし、アドバイスを活かせず申し訳ないです。

オブジェクト指向と非オブジェクト指向の境目がわかるようになるまで深入りしないようにしようと思っています。

2023/01/12(木) 01:27:45.18

VBAはそもそもちゃんとしたオブジェクト指向言語じゃないから
ちゃんとしたオブジェクト指向言語やらんと、その境目なんてわからんよ

2023/01/12(木) 05:03:44.98

そうね
Object指向の概念はVBAだけやってれば
人によっては一生身につかないかもね。

この手の参考資料が一番多いのはやっぱりJavaになるのかなぁ。
VBAと文法が近いVB.Netでもあまり見かけないね。アレもIObject指向言語なのに。

2023/01/12(木) 14:53:02.95

>>679
お前には見つけられないだけ

2023/01/12(木) 15:01:56.40

vbscriptでwin32apiのキーダウンを使おうとしているのですが、
キーダウンは検知できるのですが、標準入力に押したキーが入ってしまいます。
この標準入力を削除することはできないでしょうか
もしくはキーダウンが標準入力にならないようにする方法はないでしょうか

2023/01/12(木) 15:37:08.41

ここはExcelVBAのスレなのでスレチです