Excel VBA 質問スレ Part80

**デフォルトの名無しさん** · 2023/05/31(水) 08:23:38.97

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

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

関連スレ
Excel VBA 質問スレ Part79(ﾜｯﾁｮｲあり)
https://mevius.5ch.net/test/read.cgi/tech/1674875532/

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

**デフォルトの名無しさん** · 2024/03/30(土) 06:29:54.44

on error resume next

**デフォルトの名無しさん** · 2024/03/30(土) 08:02:30.31

アンドゥでーきない
もーどれーなーいー♪

**デフォルトの名無しさん** · 2024/03/30(土) 08:50:08.03

人生はリセットもセーブもできない糞ゲー

**デフォルトの名無しさん** · 2024/03/30(土) 09:05:49.69

>>788
尊敬します
本来そうあるべきでした
大学で一番真面目だったのは、研究室入ってからだな
徹夜で没頭したこともあった。世の中に無いもの、一歩未来なものを作るのは楽しかった（工学部）

**デフォルトの名無しさん** · 2024/03/30(土) 09:31:49.81

そおやって、毎度あきらめてばかりだから何にも変わらない･変われない
人生、いくつになってからでも発奮すればやり遂げられる
客先の社長だが、50代半ばぐらいだったと思うが、俺のブラインドタッチ見て触発されてか
それから4～5ヶ月後に行った時には見事なブラインドタッチでメール書き込んでた
「すごいですね」「あんたの見て悔しかったからなｗ必死で覚えたよｗ」と笑ってた　年商5億ぐらいの会社
おかしいな？　じゃあ、おれも年商5億に成れてもいいはずなのに

**デフォルトの名無しさん** · 2024/03/30(土) 15:03:17.95

>>771
亜空間でポン

**デフォルトの名無しさん** · 2024/03/30(土) 15:03:21.22

>>771
亜空間でポン

**デフォルトの名無しさん** · 2024/03/30(土) 17:48:22.36

金融機関ではいまなおCOBOLが現役だ

とある金融機関がCOBOLからモダン言語に移行させようと膨大な予算を使ったが大失敗し
全国のATMが動作停止する重大事故を何度も何度もおこし、毎週末はかならずメンテンナンスでATMが使えなくなるという最低最悪の醜態を晒した
これを受けて他金融機関は、COBOLからモダン言語への移行を必死に避けるようになったという

さて、このCOBOLだが、ローカル変数がなく、すべてグローバル変数になるという言語仕様である
1950年代当時はそれが当たり前だった
身近なものでは、1980年代マイコンに内蔵されていた行番号つきBASICだってすべてグローバル変数しかなかった

そこでCOBOL開発現場では、EXCELでグローバル変数を管理しているという
変数管理が面倒なため、ここでVBA言語がしっかり活用されているらしい

VBA言語が、COBOL言語を支え、日本の金融期機関を支えているのだ
つまりVBA言語なくして、ATMすら使えないということだ
VBA言語は偉大なり

**デフォルトの名無しさん** · 2024/03/30(土) 18:35:04.54

まぁ地方では昔の98がまだ現役で使われてるところもあるって話聞いたことあるしね

**デフォルトの名無しさん** · 2024/03/30(土) 21:51:53.56

>>798
また知ってるかぶりの嘘付きかよ

**デフォルトの名無しさん** · 2024/03/30(土) 22:32:47.73

派遣にしかありつけないのは氷河期世代。当時、新卒からして派遣社員とかザラにいたからね。

**デフォルトの名無しさん** · 2024/03/31(日) 01:50:59.18

>>798
＞活用されてる「らしい」
w
合体するまえの一つは、COBOL以外も使ってたのよね
外野の浅い記事程度のことならリンク貼る方がいい。あなたがここに書くより信憑性あるから

**デフォルトの名無しさん** · 2024/03/31(日) 09:24:30.62

少しく興味もをって軽くググってみたけど、日本国内だけの問題じゃあ無さそう
アメリカでも六～七割のBANKがいまだにCOBOLだと　民間企業ならまだしも政府機関でも使ってて
あろうことか予算削減の筆頭に祭り上げられてて、コロナの失業給付の時には想定外の申告件数でパンクしたとか
レガシー過ぎるのも厄介

しかし、銀行内にメインフレーム用に専門のシステム開発部門を作るものだろうか？
専門部署があるとしたら、一年365日毎日COBOLつこてられるんだから、そこまで戸惑うものだろうか？
大抵は外注でなんとかとかかんとかとかの大手IT企業に丸投げではないのだろうか？
そういった専門部門がグローバル変数ごときを把握しきれていないのは大問題では無いだろうか？
よしんば膨大なグローバル変数だとして、それをExcelで？　いやいやいや、データベースに入れとけよ、と
大手IT企業の名折れだろ、と　月次のアプデで思わぬ動作したらどうすんねん、と

COBOL専用の開発支援とかもあるだろうに（ものっそ古いけど）
https://www.hitachi.co.jp/Prod/comp/soft1/cobol/product/function/function_dev02.html
ソース解析だってお手の物だろうに（古いけど対象も古いからちょうどいいかも知らん）
https://www.hitachi.co.jp/Prod/comp/soft1/cobol/product/function/function_dev01.html
どこの銀行の与太話真に受けてるか知らんけど、事実だとしたらとんでもないんだけどな
　万が一にも、委託された側が個人的にそんな使い方してたとしても、大問題

**デフォルトの名無しさん** · 2024/03/31(日) 12:45:15.04

>>803
知ったかぶりのスレチ馬鹿は消えろ

**デフォルトの名無しさん** · 2024/03/31(日) 14:39:33.42

>>803
＞しかし、銀行内にメインフレーム用に専門のシステム開発部門を作るものだろうか？
バカが何想像してもムダ
グローバル変数……そんな程度のこと問題になってると考えてることさえバカ

**デフォルトの名無しさん** · 2024/03/31(日) 14:45:11.54

COBOLの話なら現役COBOLERの俺に聞け

**デフォルトの名無しさん** · 2024/03/31(日) 14:56:22.57

コボちゃん

**デフォルトの名無しさん** · 2024/03/31(日) 18:13:12.17

COBOLなら俺に聞けスレがあたったきがしたけど見たらなかった

**デフォルトの名無しさん** · 2024/03/31(日) 18:28:07.34

なんだなんだ？　>>798　のご高説が眉唾だったから、軽くググった、と書いておいたんだが？
無知蒙昧のおれでさえ、ちょっと・・なおハナシだと確信したから反論のつもりで書いたが
反論を反論するってぇことは >>798 の一味なのか？>>798 を擁護する側に成るんだがいいのか？
それとも、いつものバカって書きたいだけの人達なのか？　よっぽど追い詰められてンだな、人生

**デフォルトの名無しさん** · 2024/03/31(日) 19:47:53.45

>>809
馬鹿が悔しくて言い訳

**デフォルトの名無しさん** · 2024/03/31(日) 20:29:01.32

>>809
文章内全部が反論になってると考えるバカ

**デフォルトの名無しさん** · 2024/03/31(日) 21:58:46.19

人格への攻撃はまあ、心が広いから見逃してやるけど、書かれてる「内容」に対しての
意見･修正･注釈･反論･異論とかは書けないのかな　
バンクシステムの中の人なんてそんなもんだとでも言うのかな　
文章内全部が反論←何言ってるか分からない　全部反論じゃなきゃいけないのか？
疑問やらに辿り着くための経緯を書いて無きゃ、唐突に結論だけ書いても話は通じないだろうに

**デフォルトの名無しさん** · 2024/03/31(日) 22:18:18.48

馬鹿は語彙力が無いから無駄に文章が長いよね

**デフォルトの名無しさん** · 2024/03/31(日) 23:27:08.41

バカは日本語わかってないからな
省略を補完する知識もないから全部解説してもらわないといけない
そんな輩にイチイチ説明せんよな

**デフォルトの名無しさん** · 2024/04/01(月) 02:21:25.98

昔COBOLを見て、なんだBasicと大して変わらないじゃないかと思った事がある。
でも最近思ったんだよ。
俺がCOBOLだと思っていたそれは、実はBasicだったんじゃないかって。

**デフォルトの名無しさん** · 2024/04/01(月) 08:53:33.84

>>815
まあ命令語が変わる+αと考えればそうだったかもね
しかし、それを動かすのが大変だったろ？
だったらBASICじゃない
（マシン（実行環境）が何だったかにもよる）

**デフォルトの名無しさん** · 2024/04/01(月) 11:08:50.73

>>807
植田まさし

**デフォルトの名無しさん** · 2024/04/01(月) 11:56:34.35

>>815
変数を定義する場所が決まってたりBASICとはかなり違ってる印象だけどな
第二種情報技術者をCOBOLで取った世代だけど

**デフォルトの名無しさん** · 2024/04/01(月) 17:11:07.20

なんでいつも話が大きく脱線するのだ？

**デフォルトの名無しさん** · 2024/04/01(月) 18:32:56.33

ほかに話題がないから

**デフォルトの名無しさん** · 2024/04/01(月) 21:27:32.79

コボルコボレバナシ

**デフォルトの名無しさん** · 2024/04/01(月) 23:37:02.65

話題ないのか？じゃあおまいらのパソコンのスペッコ教えれ

**デフォルトの名無しさん** · 2024/04/01(月) 23:43:29.21

それはプログラム関係ないから却下だ
一番最初に覚えたプログラミング言語（初級レベルで可）なら教えてやってもいい

**デフォルトの名無しさん** · 2024/04/02(火) 00:23:27.67

BASICを覚えたのは1980年
こんなに使い続けるとは思わなんだ

**デフォルトの名無しさん** · 2024/04/02(火) 09:45:20.99

オレも82年に N60-BASIC
BASICはずっと使えてコスパ最高ですな

**デフォルトの名無しさん** · 2024/04/02(火) 10:06:57.38

NECはマイクロソフト製のBASICを採用してたから、ローカルルールがVBAに似てるんだよな
$記号で文字列型を指定できたり、複数のNextがカンマ区切りで1行に書けたり

**デフォルトの名無しさん** · 2024/04/02(火) 11:10:33.24

いまだにそれを使う場面って、どんなとこ？
そして、それを稼働させる環境って、最新のマシン上でも動作すンの？ロートル機器を労わりながら？
ほんとに趣味とかで極プライベートなことで動かしてるってだけなら聞きたくも無いけど

**デフォルトの名無しさん** · 2024/04/02(火) 11:32:36.70

>>758
Pythonは導入されているぞ？
古いバージョンに追加するとは発表していない。

**デフォルトの名無しさん** · 2024/04/02(火) 11:33:29.31

>>826
BASICのほとんどはマイクロソフト製だぞw

**デフォルトの名無しさん** · 2024/04/02(火) 11:34:56.92

使い捨ての関数をさっと書くときにタイプ数を減らせるから重宝してるよ
dim a%,b$
みたいに書ける
これは
Dim a As Integer, b As String
と等価
ほかにも省略できる記法がたくさんあるけど、そこらの参考書にはまったく書いてない

**デフォルトの名無しさん** · 2024/04/02(火) 11:39:41.20

>>829
8bit時代に大きなシェアを持っていたSHARPは独自のBASICを内製してたから互換性が低かった

**デフォルトの名無しさん** · 2024/04/02(火) 11:51:03.47

>>828
py関数の話じゃないぞ

**デフォルトの名無しさん** · 2024/04/02(火) 12:01:13.72

>>831
独自も何もBASICに標準なんてないからシェアが正義だよ

**デフォルトの名無しさん** · 2024/04/02(火) 12:16:11.00

>>831
ハドソンの奴？

**デフォルトの名無しさん** · 2024/04/02(火) 16:54:07.31

下の2つのコードをそれぞれ試しましたが空のブックが残ります。エクセル自体を閉じるにはどうすればよいですか。
office2021です

Application.Quit

ThisWorkbook.Close

**デフォルトの名無しさん** · 2024/04/02(火) 17:07:48.71

>>835
この2行を続けて実行
Application.DisplayAlerts = False
Application.Quit

**デフォルトの名無しさん** · 2024/04/02(火) 17:15:40.14

>>836
回答ありがとうございます。

実行しましたがまだ空のブックが残ってしまいます。

**デフォルトの名無しさん** · 2024/04/02(火) 17:27:56.14

強制セーブは？
ThisWorkbook.Save

**デフォルトの名無しさん** · 2024/04/02(火) 18:13:48.75

excelが2つ起動してるんじゃねーの？

**デフォルトの名無しさん** · 2024/04/02(火) 20:40:32.94

>>839
そうです。複数のブックを保存して閉じるコードを書きました。
wbPaths = Array( _

これだと上手くいかなかったので、最後のブックだけ分けて保存したらブック自体を閉じることが出来ました。
ActiveWorkbook.Save
Application.Quit

相談にのっていただきありがとうございます。

**デフォルトの名無しさん** · 2024/04/03(水) 14:46:45.88

おめでとう。良回答で良かったな

**デフォルトの名無しさん** · 2024/04/04(木) 00:35:12.90

ネタ途絶えたので二番目に覚えたプログラミング言語（初級レベルで可）
（引き続き最初の言語もどうぞ）
Z80アセンブラ
最初のBASICと合わせてプログラムとはを本当によく知ることができたよなとつくづく思う
インタプリタがいかに遅いのか、CPUは本当は早いwのがよくわかった
レポート用紙にハンドアセンブルしてた。学生で金なかったから(泣)
2種試験はアセンブラで簡単だったな…
大学研究室では68000でアセンブラ書いたな… 書きやすい。8086は糞w（懐かしい…遠い目）

**デフォルトの名無しさん** · 2024/04/04(木) 00:38:40.34

で？っていう見るからに仕事出来なさそうな駄文

**デフォルトの名無しさん** · 2024/04/04(木) 10:08:26.20

ただの歴史にで？って頭悪いのバレてっぞ

**デフォルトの名無しさん** · 2024/04/04(木) 11:32:12.29

何よここ？50代から60代しかいないの？　80年代とかのキーワードで驚いた

**デフォルトの名無しさん** · 2024/04/04(木) 11:41:34.55

5chはジジイの巣窟ですよ。
子供は他所で遊んだ方が良いですよ。

**デフォルトの名無しさん** · 2024/04/04(木) 11:43:58.29

はーい！　おぢさん達バイバイ

**デフォルトの名無しさん** · 2024/04/04(木) 12:03:56.89

加齢臭キツいのは仕方無いけど、だからって初々しいコ達を貶めるのはどうなんだ？
えびばでぃ Welcome な好々爺を演じるぐらいの配慮は必要だろうに
演じる事すら出来ずに、残り少ない自分の人生悲観して、その八つ当たりをしてるにしか見えんが
それは老害でしか無いし、そんな言動しかできないんなら、その辺の土手で黄昏てろ、としか

**デフォルトの名無しさん** · 2024/04/04(木) 12:08:43.05

自分語りが歴史って…

**デフォルトの名無しさん** · 2024/04/04(木) 13:10:30.34

5chは老害の巣窟ですよ。
子供は他所で遊んだ方が良いですよ。

**デフォルトの名無しさん** · 2024/04/04(木) 13:13:10.26

>>848
5chは老害の巣窟ですよ。
あきらめて他所で遊んだ方が良いですよ。

**デフォルトの名無しさん** · 2024/04/04(木) 13:27:25.58

なんでVBAスレでやるんだ…

**デフォルトの名無しさん** · 2024/04/04(木) 17:11:49.58

まあ、それは　他のスレッドだとじぶんが付いていけないからなんだろうな
唯一自慢できるのがVBAなんだろう、たぶん　人生の勲章がVBA　
退役軍人が懐かしい酒場に入り浸って昔語りし続けてお互いの傷を舐め合ってるような景色
前世紀の遺物だよ　死に掛けのヨボヨボじじい共
しかし、地球の危機が宇宙の彼方からやって来たとき、彼らが！！・・　　VBAじゃ出番無ぇな

**デフォルトの名無しさん** · 2024/04/04(木) 19:00:38.70

例の零細企業でワープロを使えるのを自慢していた馬鹿じゃないの？

**デフォルトの名無しさん** · 2024/04/04(木) 19:42:32.02

なんでBASIC絡みのスレって>>842みたいなアセンブラ爺さんがたまに沸くんだろう。いや、俺もジジイだけどさ。

**デフォルトの名無しさん** · 2024/04/04(木) 20:07:52.96

PythonやChatGPTのこと書くやつと同じ

**デフォルトの名無しさん** · 2024/04/04(木) 20:12:45.88

そりゃBASICの高速化といえば機械語しかないからでしょ

**デフォルトの名無しさん** · 2024/04/05(金) 01:36:03.98

>>842
インテル8086のように移行期の互換性を考えていないCPUがデファクトスタンダードになることはない

インテル自身も64ビット化では失敗作を作って、AMDのx64規格に救われた。

**デフォルトの名無しさん** · 2024/04/05(金) 01:47:51.05

課で唯一のVBA使い
要望に応えてどんどん部内で共有する処理システムを強化してしまっている
土台で処理するtxtデータが12万を越えた
ライセンス料払ってたソフトをやめて社内運用でコスト削減
時代に逆行しすぎ

**デフォルトの名無しさん** · 2024/04/05(金) 01:51:03.71

12万とは何の単位なのか？

**デフォルトの名無しさん** · 2024/04/05(金) 01:53:07.08

テキストデータが12万というのは、ギニュー隊長の戦闘力のことでも言っているのか？

**デフォルトの名無しさん** · 2024/04/05(金) 06:52:24.70

12万bit

**デフォルトの名無しさん** · 2024/04/05(金) 07:42:42.14

わざわざ糞つまらん事を連投して面白いとか思ったのかな

**デフォルトの名無しさん** · 2024/04/05(金) 23:47:42.85

暇やからつまらん事するしかないやろ

**デフォルトの名無しさん** · 2024/04/06(土) 01:42:11.33

12万文字でも12万行でも多くないし、12万といういまとなっては大きくないサイズは、いったいなんなんだ？

**デフォルトの名無しさん** · 2024/04/06(土) 09:04:45.81

IoTとかで取り込んだCSVとかのテキストデータが12万行とかだろ　まだ88万行おｋ
すぐにパンクしそうではあるが　そんな時こそ前処理でPowerQuery！　とか、当人は意気込んでるんだろうな
いずれにしろ部内の要求に応じてるなら、現状ではハリキリマンということで、評価はアゲアゲ
それをやっかんで戯言吐きにきた、と

**デフォルトの名無しさん** · 2024/04/06(土) 09:53:06.53

Windowsとエクセルのバージョンが上がったら今まで使ってたVBAマクロが動かなくなったっていう経験ある人いますか？
そんなことは普通起こらない？

**デフォルトの名無しさん** · 2024/04/06(土) 10:16:11.14

12万個、件、レコード、人とか

**デフォルトの名無しさん** · 2024/04/06(土) 11:02:30.83

12 まんこ

**デフォルトの名無しさん** · 2024/04/06(土) 11:07:00.81

ある。
基本的な機能使ってるだけならまずないが、
参照設定使うとか、特殊なことやってるとよく起きる。

**デフォルトの名無しさん** · 2024/04/06(土) 11:12:06.99

ここのやつらって年収低そう

**デフォルトの名無しさん** · 2024/04/06(土) 11:35:14.95

>>867
同じバージョンでも再インストールとかで今まで32ビット版だったExcelを64ビット版に変えるとちょっと凝ったマクロでエラーになる事がある。
ググれば結構例は出てくるので修正は出来る。

**デフォルトの名無しさん** · 2024/04/06(土) 11:36:01.79

>>871
よう低年収！

**デフォルトの名無しさん** · 2024/04/06(土) 12:40:35.84

>>871
脱税やってそう

**デフォルトの名無しさん** · 2024/04/06(土) 20:14:35.01

いやでも80年代からおぢさん達は飽きずに挫折せずに続けている事には尊敬できる。
昭和の人って忍耐力半端ないイメージがあります。

**デフォルトの名無しさん** · 2024/04/06(土) 22:02:47.52

新しいことを学ぼうという気がないだけ

**デフォルトの名無しさん** · 2024/04/06(土) 22:35:57.72

確かに、スピルとか言う他のセルにも影響を及ぼす計算式(？)には驚いた。
自分は某福祉NPOでパソコンの助っ人みたいなことをしているが、パソコンの更新が進まず、エクセル2010がまだ多数残っているので新しい機能を使わずに(勉強せずに)済んでる。

**デフォルトの名無しさん** · 2024/04/06(土) 23:23:43.06

新しいPCに変えたら、SendKeysを使うとNumLockが解除されてしまうようになった
普通にNumLockを押すようにコードを足せばいいんだが、
問題は今までNumLockを押したらIMEがオフになるようにしていたから他のキーに変えないと駄目になったのが辛い

**デフォルトの名無しさん** · 2024/04/06(土) 23:36:24.49

Static WshShell As Object
Set WshShell = CreateObject("WScript.Shell")
Shell pathname:="notepad.exe", windowstyle:=vbNormalFocus
WshShell.SendKeys "^V", True
WshShell.SendKeys "^(+S)", True
Set WshShell = Nothing

こんな感じで回避した

**デフォルトの名無しさん** · 2024/04/07(日) 00:00:09.34

実際は３行目に
Application.Wait Now + TimeValue("00:00:02")
を入れてる。メモ帳が立ち上がってしばらくしないとメモ帳自体がSendKeysを受け付けなかったので。

**デフォルトの名無しさん** · 2024/04/07(日) 00:00:32.79

3行目のあとにだった

**デフォルトの名無しさん** · 2024/04/07(日) 00:04:05.73

ちなみにメモ帳の受付開始のタイミングがWindows 10と11とで違っていて、
Wait Nowは11に対応するための処置。

**デフォルトの名無しさん** · 2024/04/07(日) 01:01:22.26

やはり、メモ帳の受付開始のタイミングがWindow10と11では違うよな
俺は新メモ帳が嫌なのでサクラエディタでやる事にした
どちらにせよwaitは必須だけど

**デフォルトの名無しさん** · 2024/04/07(日) 01:27:19.85

もしかしたらタブ形式を使用停止すれば一緒になるかな？

**デフォルトの名無しさん** · 2024/04/07(日) 09:33:49.99

テキストファイルなんて直接イジれば良かろうなのだよ
WordやTextBoxなんかもあるし

**デフォルトの名無しさん** · 2024/04/07(日) 09:40:38.97

VBAでSendkeysは使うな、が鉄則
機種･環境依存、送るタイミングの遅延等など、開発時どんなに検証して安定させたつもりでも、利用者の
機器構成・起動させている他アプリとの相性・アプデ・えｔｃ　で容易に不安定に成る
不安定だけならまだしも、思わぬアプリに予定していないキーを送って誤動作の事態に陥ったりまで

自分だけで使うなら兎も角、他のマシンでも使う可能性が1㍉でもあるなら、それは以降のメンテ対応に
頻繁に追われる要因を埋め込んでるも一緒に成り果てる　楽で便利を求めてムダな苦労をする
ネットに繋いでいないスタンドアロンとか、ごく限られた利用環境とかならまだしも
　って、15年ぐらい前にタガミ君が言ってた　それ以来ボクはその教えに従ってる

**デフォルトの名無しさん** · 2024/04/07(日) 10:04:47.31

別のアプリをコントロールしたいならAPIを使え

ウィンドウが開いたかどうかもAPIなら確実にチェックできるし、OSやパソコンの性能が違ったり、途中で誰かが触っても大丈夫なように作れる
それこそメモ帳を起動して文字入力程度ならぐぐればいくらでもサンプルが出てくる

**デフォルトの名無しさん** · 2024/04/07(日) 10:29:52.88

sendkeyで苦労した層からしたら全力回避だな
昔は情報も技術も無かったから使ったことあったけど、今ならRPA（使えるなら）とかもあるし、ウィンドウが開いたかwinapiでも確定できるし

**デフォルトの名無しさん** · 2024/04/07(日) 13:07:27.72

てかお前らたまには外出しろよ
今日は桜が綺麗だぞ

**デフォルトの名無しさん** · 2024/04/07(日) 18:16:55.54

案件になるからやめとく

**デフォルトの名無しさん** · 2024/04/07(日) 20:24:17.34

それを言うなら事案では