Excel VBA 質問スレ Part59

2019/02/09(土) 15:12:30.70

!extend:checked:vvvvv:1000:512
!extend:checked:vvvvv:1000:512

ExcelのVBAに関する質問スレです
コード書き込みや作成依頼もOK
※前スレ
Excel VBA 質問スレ Part58
https://mevius.5ch.net/test/read.cgi/tech/1542577644/

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

2019/02/27(水) 09:27:38.25

>>501
ならない。

---------------------------
Microsoft Excel
---------------------------
10
---------------------------
OK
---------------------------

2019/02/27(水) 10:08:05.65

>>502
アホはお前

**デフォルトの名無しさん** (JP 0H2e-eSdf) · 2019/02/27(水) 10:14:24.05

>>504
自己紹介かな？

2019/02/27(水) 10:21:18.29

>>505
本当、馬鹿は食いつきがいいな。エラーも起こさずに動くのが問題なんだよ。
馬鹿には難しいか？

2019/02/27(水) 10:48:04.11

&演算子が勝手に文字列に変換するのは利便性考えたらわかるし
Long型の変数に文字列代入する時に暗黙のキャストするのもわからなくはない

けど警告ぐらいは出してほしいね

**デフォルトの名無しさん** (JP 0H2e-eSdf) · 2019/02/27(水) 10:48:12.18

>>506
それはエラーであってほしいというお前の願望だろ

2019/02/27(水) 11:32:27.96

VBAにも当然、厳密な構文ルールは存在するだろう

数字　＆　文字列は文字列にするってのがルールじゃね。　一度覚えたらそれでいい

2019/02/27(水) 11:45:10.68

& が + に解釈されたらたまったもんじゃない

2019/02/27(水) 12:38:47.93

>>497
Variantは意識して使う。
型安全も意識する。
当然、暗黙の型変換でどうなるのかも意識して組んでいれば、そうそう問題になることもあるまい。

2019/02/27(水) 12:41:38.23

どんな言語でもツボは有るわけでね。
押さえてコードを書けない奴がアホなだけだろ。

初めて触った初心者じゃあるまいし警告なんて全く必要無い。

2019/02/27(水) 13:03:51.61

>>509
代入先が数値だろ

2019/02/27(水) 13:08:23.01

同じマクロを使っている複数の文書があって、マクロの一部を修正したいんですが、
別ファイルのモジュール内の変更を行うマクロは VBA を使って書けますか？

または、別ファイルのモジュールを削除（開放）してインポートする形でも構いません。

実際はワードでやりたいことですがワードVBAスレがなさそうなのでこちらで質問しました。
Normal を書き換えて対応するというのはできない前提です。

2019/02/27(水) 13:17:59.19

>>514
スレ一覧よく見てみろ。そういういい加減で他人にすぐ聞くからできないことだらけなんだよ。

2019/02/27(水) 13:19:02.81

ByRef x As Variant

**デフォルトの名無しさん** (JP 0H2e-eSdf) · 2019/02/27(水) 13:19:50.19

>>514
書けるよ

2019/02/27(水) 14:41:22.10

>>503
Option Explicit付けてもエラーにならないのかな？

2019/02/27(水) 15:47:12.82

>>510
お前は何を言ってるんだ？
& は文字の連結子だろ。　だから、文字としての1と0を連結したんだよ
>>513
代入先は数値だな。　文字処理をしてそれがVariantだからそれから数値変換したんだな
文字処理が優先なんだろ

2019/02/27(水) 15:48:15.94

＞それがVariantだから
すまん。これはなし

まあ変な構文ではある

2019/02/27(水) 16:29:49.69

>>519
だから連結じゃなく加算と解釈されたらたまったもんじゃない
と言っている

2019/02/27(水) 17:58:08.46

>>507
& 演算子は文字列同士の連結だから
2 & 1 ⇒ "21"
"2" & 1 ⇒ "21"
2 & "1" ⇒ "21"
"2" & "1" ⇒ "21"
になる
逆に - 演算子は数値同士の引き算だから
2 - 1 ⇒ 1
"2" - 1 ⇒ 1
2 - "1" ⇒ 1
"2" & "1" ⇒ 1
になる
問題は + 演算子で普通は数値の足し算なんだけど両辺が文字列の時は文字列連結になるので
2 + 1 ⇒ 3
"2" + 1 ⇒ 3
2 + "1" ⇒ 3
"2" + "1" ⇒ "21"
になる
なのでVariant使っててA + Bとかやってると両方が文字列の時にはあ？ってなことになったりする

2019/02/27(水) 18:25:55.24

>>522
>"2" + "1" ⇒ "21"
&、-と合わせて考えるとめちゃくちゃ気持ち悪いなこれ

2019/02/27(水) 18:25:56.15

出力する時以外に文字列と他の型を演算させる需要ってあるか？
すごい変なプログラム書いてそう

2019/02/27(水) 18:31:15.76

>>524
Cells(1,1) + Cells(1,2)
とか気軽に書いて文字列セルなのに気づかず発狂するがいい

2019/02/27(水) 18:45:49.28

>>525
セルの値同士の計算をダイレクトにやろうとする発想にまず疑問を感じる

2019/02/27(水) 18:48:38.08

だから、型を意識してコード書かない奴は駄目なんだ。
あと、Cells(1,1) + Cells(1,2)じゃなくて、Cells(1,1).Value + Cells(1,2).Valueとすべき。

2019/02/27(水) 18:53:54.71

>>524
セル値が16進で、その値で計算させるとかかな。
昔はよく使ってたが、最近は使わなくなったな…

2019/02/27(水) 19:19:30.96

>>527
いや、そこじゃない
cellsのデフォルトプロパティがvalueな事ぐらい皆分かっている
valueの型がヤバイんだ

2019/02/27(水) 19:31:13.45

>>527
> だから、型を意識してコード書かない奴は駄目なんだ。
そんなのわかってるからいちいちマウント取りに来なくていいよ
世の中には変数宣言すらしないやつとかもいるし使い捨てコードとかもある

2019/02/27(水) 19:35:36.50

本当によくできたプログラムっていうのは変数がどんどん減っていくものだよ

2019/02/27(水) 19:49:19.80

やっぱVBAってクソだわ

2019/02/27(水) 19:52:19.85

>>532
と罵りたいだけが為にここに来るんだろ？　　ﾌﾟ

2019/02/27(水) 20:02:27.43

やっぱVBAスレってクソだわ

2019/02/27(水) 20:17:03.40

クソレスすんなプロさん

2019/02/27(水) 21:22:24.52

>>531
デバッグはやりづらくなるけどな

2019/02/27(水) 21:48:46.20

まあやっぱり、1 & "0" とか　 "2" + 1
とかが出てきたら、エラーで落とすのが普通だろうなあ
で、プログラマはそこで、Val関数で数値にするとか逆に文字列にするとか
やっぱり型変換、確認をプログラムの中に入れながら作るのが本来の筋だと思うわ
そもそもの構文を変えないのであればね

2019/02/27(水) 22:04:09.28

どうでもいいよ
所詮VBAだし

2019/02/27(水) 23:43:00.80

>>538
そういうこと

2019/02/28(木) 00:41:55.86

質問です。お願いします。

public sub shuukei()
'集計してシートに書き出してそそのシートのコピーを別ファイルとして保存
end sub
↑
こういうコードを作りましたが、少しでも速く処理されるようにもっと工夫したいと思っています。
そこで、少し書き直しては速度に変化があるか確認したいのですが、コードの実行速度を
測る方法がわかりません。教えていただけないでしょうか？

public sub jikantest()
　　'計測スタート
　　call shuukei
　　'計測終り
　　msgbox かかった時間
end sub

↑
こんな感じでいちいち確認したいです。

2019/02/28(木) 00:46:39.13

>>540
dim st as single, ed as single
st = timer
(処理)
ed = timer
debug.print ed - st & "sec"

いつもこんな感じでやってる。

2019/02/28(木) 00:47:31.02

Debug.Print Now でもしとけ

2019/02/28(木) 00:51:18.30

>>541
ありがとうございました！

2019/02/28(木) 01:23:05.26

変数の型はトレースの時だけでもシンタックスハイライトして欲しい。
それか左辺に合うように強制キャストで。

2019/02/28(木) 02:06:55.62

>>540
早くなってもわかりにくいのはやんない方がいいぞ

2019/02/28(木) 06:51:30.57

お恥ずかしい質問ですが、もうひとつお願いします。

私は、変数の中身でもなんでも、とにかく確認したいときはmsgboxを使うんです。
そのほうが楽だし。

でも、こういう場所で回答するような人のほとんどは、>>541-542さんのように、
debug.なんとか　ってのを使いますよね？
よくわからないけど、debugって、msgboxとは違って、どこかのウィンドウに表示させるってことだけ
は知っています。
そして、msgboxよりも、そっちの方がなんとなく本格派っぽいことも感じてます。

みなさん、どうしてmsgboxよりそっちを使うんですか？本当にそっちが便利なんですか？

2019/02/28(木) 06:56:12.35

>>546
msgboxだと毎回画面が出ちゃうから

2019/02/28(木) 07:04:09.83

Debugって俺も使ったことないんだが、過去何行くらいまで遡れるの？
それとその結果ってファイルに出力できる？

2019/02/28(木) 07:09:57.92

自分はstopとローカウルィンドウ派だな

2019/02/28(木) 07:10:06.15

>>546
OK押すのメンドいし、押したら消えるし。
Printならイミディエイトウィンドウにどんどん溜まっていくから比較しやすいし。
VBE上でCtrl+Gで呼び出せる。
コード書くときは常に表示してるな。
他にもいろいろ便利に使えるからGGってみて。

2019/02/28(木) 07:28:40.77

debug.printなら開発画面を見ない他の使用者が
気付かないで済む

2019/02/28(木) 08:31:53.34

>>540
ちょっと本格的にやるなら…
https://blogs.yahoo.co.jp/yangzh_jp/26557113.html
注意！
中にも書いてあるけど使用時にコードを改変するから使うならバックアップはちゃんと取ること

2019/02/28(木) 12:28:10.25

>>531
そうとも限らない。
速度の為に変数増やすこともあるから

2019/02/28(木) 12:32:41.06

>>548
そんなに大量には残らないね。
1000行くらいか?
大量に残したいときは普通テキストファイルに書き出すだろ。

2019/02/28(木) 12:33:37.47

>>553
まああくまで傾向だな
システム開発に絶対はないから大まかに語るしかない

しかしまあプログラマって柔軟性がないから何か意見を言ったら必ず特殊な状況を想定して反論しようとする人が出てきて面倒くさいな

**デフォルトの名無しさん** (JP 0H4f-j5yB) · 2019/02/28(木) 13:23:20.67

柔軟性がある人は出世するからね

2019/02/28(木) 13:59:45.70

>>555
後々のテスト工程考えてるからじゃない？
そこまで考慮しなくても…となる気持ちは分かる

2019/02/28(木) 14:20:36.03

考慮すべき場面とするべきでない、しても意味がない場面の判断ができないとも言える

**デフォルトの名無しさん** (JP 0H4f-j5yB) · 2019/02/28(木) 14:36:57.48

だから日本は開発が遅いんだよ
アジャイルでやれ

2019/02/28(木) 14:57:38.31

想定される状況なんか結局は本人にしか分からないし、説明すんのもめんどくさい
まあ本人が気付いてないこともあるけど

2019/02/28(木) 17:57:19.76

>>555
決めつけで語って指摘されたら逆ギレかよ w

2019/02/28(木) 18:42:40.55

ーーここまで型変換関数なしーー

身内が意味がわかるっていうなら変換関数抜きにしてもいいかもしれない、けどコンテキスト的に関数噛ませたい

2019/02/28(木) 18:45:13.08

Debug.Assertも割とよく使う

2019/02/28(木) 21:21:18.29

Variant使わなきゃいい

2019/02/28(木) 22:12:12.40

>>564
いやいやいやいや
ByRef As Variant
の意味論がわかってないだろ

2019/02/28(木) 23:20:59.71

Variant型がないとそれはそれで不便
実行時にならないと変数の保持データの参照型やデータ構造が決定できないような関数を定義するときには必須
Object型では限界があるし、多態性とか考えたら特に

2019/03/01(金) 00:53:35.24

VBAにもInterfaceがあるの知らない人かな

2019/03/01(金) 08:24:19.03

だから意識して使うぶんには良いんだよ。
Variant配列で高速化は良くやるだろ。
あるいはあえていろんな型を受け付ける関数を作る場合とか。

俺はInteraceはあまり使わんね。
同じプロパティを持ったクラスを複数作ってグループとして使う場合でもそこまでしなくて良いだろと考える。

2019/03/01(金) 08:58:16.79

プログラムの基本的な良い習慣を実践すればVariantなんてそう使うことはない
使うとしてもシートIOなど僅かな用途だけだから業務ロジックまで影響することはまずない

2019/03/01(金) 09:03:46.13

プロ雑談者どものくだらん蘊蓄語り合いなんぞどうでも良いから質問者の方々は
遠慮なさらずにどうぞ～

2019/03/01(金) 12:55:03.48

コードって色々書く場所あると思うんですけど、ある程度共通の切り分けってあるんですか？
フォームにはあまりややこしいものはかかないで標準モジュールを使うとか。
逆にフォームで書けるものは複雑でもそこで終わらせたほうがいいとか。
今迷ってるのはシート1のデータを加工してシート2のデータにマージさせる場合どこに書けばいいんだろうってことです。
そのシートごとに別けるとバラけて解りにくくなるしみたいな感じです。

2019/03/01(金) 13:04:09.15

所詮VBAだしどうでもいいよ
VBAの可読性・保守性を高める唯一の指針があるとしたら、極力VBAを書かないでワークシートの機能を活用することかな

**デフォルトの名無しさん** (JP 0H4f-j5yB) · 2019/03/01(金) 13:26:59.89

>>571
標準モジュールに Sub MergeSheet1To2 とか作ってCallすれば、他人が処理部を見なくても「このボタンを押すとマージされるんだなぁ」と想像ができる。
自分はフォーム内は処理に使うデータのチェックくらいにしてる。

2019/03/01(金) 14:04:11.91

フォームモジュールって細々としたイベントのプロシージャであふれちゃって見にくい
だからできるだけ標準モジュールに切り分けてる
例えばフォーム上の複数のTextBoxに全く同じ入力規則を設けたい時なんかは
TextBox・KeyCode・Shiftを引数とするプロシージャを標準モジュールに書いて使い回ししてる
さっきもそういうの書いてた

2019/03/01(金) 17:47:45.49

>>571
シート1 IOクラス
シート2 IOクラス
コンバータークラス
マージサービスクラス

2019/03/01(金) 18:53:01.98

>>571
そのフォームで完結させたい時はフォームに全部書く。
汎用的なのは標準モジュール、汎用的でなくてもいろんな所から使い回す場合も標準モジュールだな。
シートモジュールにはシートのイベントプロシージャ以外書かないのが基本だけどそのシートのイベントプロシージャと一緒にしたい理由でシートモジュールに書くこともある。

意味論というか、何処に書くかは内容で決める。その方が後でコード見る時に視認性も良くなる。

2019/03/01(金) 20:10:20.22

俺ならスコープで書く場所変えてる

2019/03/01(金) 20:18:09.30

シート１だけでしか使わない関数はシート１
その関数の中で使う関数で他でも使う汎用関数は標準モジュール
シート１のデータを加工ってあるが、それが将来にでも他のシートでも使いそうならその加工関数は汎用化して
標準モジュール。　シート１でしか使わないのならその加工関数はシート１に書く

2019/03/01(金) 21:39:17.32

上級者の人がどう使っているかなんとなく解ったような気がします。とりあえず
【クラスモジュール】汎用性のある関数
【標準モジュール】　大きな処理
【シートモジュール】【フォーム】極力使わないが他と絡まない短いコードなら完結しても良い
という感じで試してみようと思います。
あとは関数名の最後に呼び出しする関数がある場所を付けてみようと思います。
何をやりたいかで構成も変わると思うのでそこらへんも加味しながら試してみます。
参考になりました、ありがとうございます！

2019/03/01(金) 22:34:27.56

ここに上級者なんていないぞ

2019/03/01(金) 22:48:58.94

>>579
関数名の最後になにを付けるって？

2019/03/01(金) 23:05:06.38

また一人、道に迷ってしまった
やっぱりVBAで勉強するのは非推奨ダナ

2019/03/01(金) 23:30:05.02

>>546
俺もmsgbox。
イミデは、知らないうちにウインドウが消えちゃうから。
プロパティもそう。
何で勝手に消えるんだろ。

2019/03/02(土) 01:21:31.95

>>579
汎用性のある関数を記載する場所だけど、VBAの仕様ではクラスモジュールではなく標準モジュールの方が都合が良いよ
何故なら自作のクラスモジュールに記述した関数を呼び出す場合、その自作クラスのオブジェクトのインスタンスを生成した後にそのオブジェクトのメソッドとして書くという手間が要る
つまりマシンメメモリの無駄食いになるしコーディング量も増える
標準モジュールならば関数名を書くだけで呼べるので余程気楽

適当にググったときに出てくる、OOP原理主義のJavaプログラマあたりが言うところの「汎用性のある関数はクラスに」っていう考え方は、VBAには当てはまらないので注意だよ

2019/03/02(土) 02:50:08.40

>>572
ワークシートなんて可読性最悪じゃん
セルには数式が1つしか書けないし条件付き書式も内容を確認するのが面倒

条件付き書式が設定されてる範囲を視覚化する方法ってないよな？俺が知らないだけ？

2019/03/02(土) 03:08:30.41

>>585
数式タブ→数式の表示

2019/03/02(土) 09:24:48.87

>>572
>>585
可読性を高める唯一の方針とは言わんが、正直下手に変数にブックレベル以上の参照スコープを持たせて値やオブジェクトを操作するくらいならワークシートの機能を使った方がよくねって場面はいくらでもあるな
エラーとかでプログラムが停止したときにセル値と違って変数に格納された参照ポインタは揮発するし

2019/03/02(土) 09:34:34.03

ワークシート関数の何が良いかというと副作用がないことだよ
ぶっちゃけ重要なのはそこだけ
それ以外ではセル内にだらだら式を書くと醜いなどデメリットしかない

なのでVBAで普通に副作用がない関数を書けばいい
副作用のない関数ならVBAからもセル内式からも使いやすい
しかもセル内式と違って見やすく管理しやすい

2019/03/02(土) 09:47:47.22

VBAの方が見やすくて管理しやすくてワークシート関数は見にくいって図式が成り立つかどうかは正直処理を書くやつのスキル次第だけどな

ワークシート関数は必ず内部スコープが()で括られるリスト形式だから、処理構造が簡潔に可視化できるメリットがあるとも言えるわけだし

2019/03/02(土) 10:15:37.68

自分は>>572とほぼ正反対のやり方でやってきた
シートは使い捨てのデータとちょっとした設定情報を置いたり、あとは結果を出力する場所としてしか使わないな。
使い捨てのは別だけど、ツールとして繰り返し使うブックのシートに関数はほぼ書いてない。

2019/03/02(土) 10:26:10.19

>>589
セル内数式はネスト入るとすぐに醜くなるじゃん
それに式に名前をつけて管理できないのもメンテナンス性を悪化させてる

2019/03/02(土) 10:34:03.78

>>591
式に名前を付けたければ単一値ならセルに名前付けりゃいいし、ベクトルならテーブルにしてカラム名付けりゃいい
VBAで関数自作してもいい
VBAの中でループぶん回すよりは遥かに見通し良いわ

2019/03/02(土) 10:46:06.68

>>592
そもそもセル名前自体が管理しにくいので論外
セル名と数式の関係性がパッと見てわからないし
セル名と数式がひも付けられて管理されてると言われなきゃ後任が気付かない
VBA関数ならこの関数名はこの定義って誰でも一目でわかる

本来の出力でない余計なカラムはノイズになって邪魔
名前で管理したい項目が増えたらノイズだらけになってなにを説明したい表なのかわからなくなる

2019/03/02(土) 10:57:15.96

visual studioに慣れ切ってしまってるのでVBAエディタがマジで苦手・・・

2019/03/02(土) 11:26:41.59

>>593
VBAでワークシート関数を作るのは否定しないよ
最悪なのはワークシート関数(VBA含む)でできることをVBA内でループ回す馬鹿

2019/03/02(土) 11:40:34.50

>>595
こ文脈でループを回すの意味がわからないしどっから出てきて何を意味してるんだ？

2019/03/02(土) 13:55:25.27

話変わるがセルのコピーとか移動したときに条件付き書式が壊れてやたら重くなって直すの苦労したことある

2019/03/02(土) 15:18:36.62

お前らまず、
ワークシートの機能を活用する
というのをどういうことかちゃんと合わせてから話してくれるか

2019/03/02(土) 18:22:41.70

>>598
ワークシートの機能ってのはワークシートの機能一般のことでしかないだろ
ワークシートの特定の機能を想定して話をしてるんじゃない
ワークシートの機能を使えば事足りる処理をわざわざVBAのスクラッチでやろうとするのは車輪の再発明の極みだという話

2019/03/02(土) 19:24:09.91

ワークシートって言いすぎww
Withでまとめたくなってきたわ。

**デフォルトの名無しさん** (JP 0Hdf-lo0V) · 2019/03/02(土) 19:30:50.79

With ワークシート
.の機能ってのは
.の機能一般のことでしかないだろ
.の特定の機能を想定して話をしてるんじゃない
.の機能を使えば事足りる処理をわざわざVBAのスクラッチでやろうとするのは車輪の再発明の極みだという話
End With

2019/03/02(土) 20:23:41.79

ワークシートの機能って単独のワークシート関数で実現できることなの？
それをVBAでやるのは確かに馬鹿らしい。
そうじゃないならVBAのほうがいいな。