Excel VBA 質問スレ Part71

2021/05/25(火) 12:48:01.06

!extend:checked:vvvvv:1000:512
↑同じ内容を2行貼り付けるナリ

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

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

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

2021/06/15(火) 22:21:19.07

>>392
別に人に見せるもんじゃなきゃどう作ってもいいとは思うけど、
何かどう書いてあるか想像するだけで頭が痛ーくなりそうな感じだね。
俺はそういうの見たくはないわ。

2021/06/15(火) 23:05:45.51

田中信者はすぐ宣言が～とか言い出す
まーダメだあのオッサン
VBAの話より上から目線で説教の方が長い位だわ

2021/06/16(水) 01:37:47.41

確かに、これから屁をしますっていちいち宣言しないよな。

2021/06/16(水) 02:46:45.21

a for

2021/06/16(水) 04:49:12.21

VBAは消えるかと思ってたけど消えなかったな、PowerオートメイトでExcelはVBAでやってちょうだいって仕様になってる。
てかVBAの言語をいい加減強化してほしいよな、メモリー不足やら宣言やらガチガチすぎ

2021/06/16(水) 04:53:08.08

メモリーは32GB積んでるが
計算で32GBのメモリーが不足するとは思えない。
明らかに嘘だろう

2021/06/16(水) 08:18:34.18

うちのDELLのPCどう数えても消費メモリの計算が合わない
自宅の軽快なのとあんまりにも違いすぎる
裏で何走ってんだ

2021/06/16(水) 08:19:00.13

Dellって名前のついたサービス片端から止めてもまだ焼け石に水状態

2021/06/16(水) 08:19:41.28

VBAスレか

2021/06/16(水) 13:04:22.62

>>392
それ。このスレだから上の方さがしてこい

2021/06/16(水) 13:08:18.72

あ、ごめ、option使ってないってことね

2021/06/16(水) 14:17:22.31

いつまでやってんのよ～

2021/06/16(水) 20:54:56.15

来週、急な体調不良により休暇をいただきます

2021/06/16(水) 21:54:32.97

訳「じじいなんでコロナワクチンの順番が回って来たので行ってきます。その3週間後にも休むつもりです。でもその前にアナフィラキシーショックや脳卒中や心筋梗塞で死ぬかも知れません」

2021/06/16(水) 22:13:53.78

ゲーム会社とかなら一人プログラマーが欠けた所で代わりはいくらでもいるだろうけど

VBAを使ってる現場は
周りは誰も使えなくて
そいつが抜けた引き継ぎ不能、効率ガタ落ちの地獄になりそう
とかいうイメージ

2021/06/16(水) 22:26:51.42

youtubeの某チャンネルでもそんな話あったな
便利に使ってたくせに開発できるやつが辞めたら誰も直せなくて
「余計なことしてくれるから」とほざく上司

2021/06/16(水) 22:34:53.65

まあ引き継ぎ時にはしっかり周りに合わせてファイルのレベルを下げましょうね

2021/06/16(水) 22:36:29.63

>>407
いんや
ゲーム会社ってデザイナーとか多いけど
普通プログラマーって実はそんなにいないんだよ。

チーフ、こっちの業界ではリーダーだね。
そのレベルの人が辞めたらそのゲームはぽしゃるぐらいのこともあり得るし実際あるんだよ。

2021/06/16(水) 23:14:49.27

いわゆる属人化ってやつ？
マクロはそうなりやすいよね

2021/06/17(木) 00:28:58.54

うちの会社だとそうなることは目に見えてるから
俺がいなくなることを見越して、可能な限りをシート上で設定できるようにしてる
こういう事をしても、設定の仕方を理解しようとする人がいなければ終わるんだけど
まぁそうなりつつあるが、俺はヤレルだけやった

2021/06/17(木) 03:39:58.22

動けば何でもいいんだよ　

おれは毎日残業して仕事してるぞ、
ただしその仕事内容は数時間かけて右の表から左の表へ1セルずつコピペを手でひたすら繰り返しやってるだけて奴よりはね。

2021/06/17(木) 06:13:51.80

１セル１文字の横書きしてるよりまし

2021/06/17(木) 07:19:32.62

引き継ぐ側からすると
大体の詳細設計残しておいて貰えればどういう動きすんのか分かるしまぁ大丈夫だよ。
プログラムもキチンと書いてあるならヘッダ部分のモジュールコメントと関数コメントしか基本要らない。
何か深い意味合いが有って特殊なことをやってるところだけ何のためにやっているか書いといてくれれば。

けど残念ながら大概仕事場から去るような人は意味もなく1関数に何十行にも渡るコード書いてたり、コメントに何のためにやってるかではなく、何をやってるかを書いている人の方が多い

何をやってるかなんてコード見りゃ分かるしそんなコメント要らない。
そしてよく分からないことやってる部分は概ね何らかしらの経緯をへてそうなっているからそう言うのをコメントに残して置いて欲しい。

2021/06/17(木) 07:52:14.35

関数は品質を下げる
関数作成禁止

2021/06/17(木) 08:22:18.61

VBAわかる人材が複数いるようなところは楽そうでいいね

2021/06/17(木) 08:40:50.83

人材

2021/06/17(木) 08:46:34.94

>>416
ボタンくっつけて押せばまず走るのは
関数とかメソッドなんだけど大丈夫？

2021/06/17(木) 09:09:44.79

関数はプロパーが部長の承認をもらい予算を計上して稟議の上作成する
派遣がやるのは１００年早い。

2021/06/17(木) 09:10:23.35

派遣はマクロ禁止

2021/06/17(木) 09:33:13.76

>>420
何やよう分からんけど
普通ツールやシステム組むときって
要件定義、基本設計、詳細設計、コーディング、UT、IT、ST、UAT及びレビューや戻り等の何か有ったときの余裕部分を持たせたものの工数を算出して
そこから金額的な見積もりを算出して予算を決めるもんじゃないの？
そう考えると「コーディング部分は派遣にやらせてはいけない」となるとVBAを出来る人材として派遣を雇った場合、どこを任せるのかな？
関数部分って言うからEXCELのガワでも作らせるのかな？
そんなのコーディングの中で一々分けて工数立ててんの？
大変だねぇ。

2021/06/17(木) 11:59:50.03

なぜだ？
部署全員、Excelのエキスパートで固めるとどうなる？
最強だろ？

2021/06/17(木) 12:03:07.26

マ板でやれ

2021/06/17(木) 13:14:56.38

>>423
人件費の方が高くなる

2021/06/17(木) 22:34:01.24

EXCELのツールごときに予算取れんと一蹴
ホント日本て効率化の基礎すらないよね

2021/06/17(木) 22:38:47.24

そもそも政府からして
大金かけて中抜きしてゴミみたいなシステム作り上げるからな

2021/06/17(木) 23:14:34.47

全員が田中の爺さんみたいになる必要なんか無いんだよ
かえって喧嘩になるわ

2021/06/18(金) 13:14:05.55

最近365のインスコデフォが64Bitなのか知らんが
やたら64Bit入れてるとこ多くてAPIの宣言で苦労するわｗ

2021/06/18(金) 14:31:11.45

官公庁や地方の役所は excel 禁止にするべきだと思う
マイナンバーと一緒にコピペしたゴミファイル対象に存在してそう

2021/06/18(金) 16:16:04.51

>>429
822 名無し~3.EXE sage 2021/06/16(水) 09:36:00.33 ID:mfWEfGUc
https://support.microsoft.com/ja-jp/office/2dee7807-8f95-4d0c-b5fe-6c6f49b8d261?ui=ja-jp&;rs=ja-jp&ad=jp

>インストールプロセスを始める前に、明示的に 32 ビット版を選択しなければ、64 ビット版の Office が自動的にインストールされます。

826 名無し~3.EXE sage 2021/06/16(水) 10:36:08.09 ID:mfWEfGUc
64ビット版Office
https://i.imgur.com/f4XX4AR.png

2021/06/19(土) 21:17:20.75

Wordファイルをフォルダから選択して開く方法がわからないので教えてください
Documents.open filename:＝.selectedItems(1) でエラーになってしまいます

Dim myFD As FileDialog
　Dim myFolderPath As String
My folderPath ="C:\Users\ユーザ名\Desktop\test"
　Set myFD = Application.FileDialog(msoFileDialogFilePicker)
　With myFD
　.Title = "Wordファイルを選択してください"
AllowMultiSelect = False
　With .Filters
.Clear
.Add "すべてのWordファイル", "*.doc; *.docx"
End With
.initialFileName = myFolderPath
If .Show = -1 Then
Documents.Open FileName:=.SelectedItems(1)
End If
.Filters.Clear
　End With
　Set myFD = Nothing
End Sub

2021/06/19(土) 22:01:06.86

>>415
「リーダブルコード」の丸写し？

何をやってるかはコード見りゃわかるだろって、それが
わからないからコメントって概念があるんだろ。

2021/06/19(土) 22:48:12.33

>>432
とりあえず見つけた間違いが2箇所だけど、これで動くかどうかまでは未検証

正 MyfolderPath = "C:\Users\ユーザ名\Desktop\test"
誤 My folderPath = "C:\Users\ユーザ名\Desktop\test"

正 .AllowMultiSelect = False
誤 AllowMultiSelect = False

2021/06/20(日) 04:10:19.34

>>432
>Documents.open filename:＝.selectedItems(1) でエラーになってしまいます
..selectedItems(1) の部分をpath付きでファイル名直接指定してみ

あとエラーの内容書かないで動かないとか言ってんじゃねーよ

2021/06/20(日) 04:48:09.25

>>433
＞何をやってるかはコード見りゃわかるだろって、それが
＞わからないからコメントって概念があるんだろ。

別に書いてあっても「親切な人だなぁ」とは思うけどきちんと単一責任原則に沿って書かれていればひとつひとつの関数やメソッドは基本そんなに長くなるもんじゃなし、ヘッダコメントに「こんなことやってます」的なことが書かれていれば必要ないよ

コードに対する読解力がないのか
コード書いてる奴が可読性低いコード書いてるのか知らないけど
自分とこの仕事場の能力の低さを棚に上げて俺に言われても困る

2021/06/20(日) 06:35:27.96

>>432
> Documents.open filename:＝.selectedItems(1) でエラーになってしまいます
エラーメッセージを書けよ…
あとそこにブレークポイント掛けて、debug.print myFD.selectedItems(1)
ってやってみて

2021/06/20(日) 07:31:37.47

>>434>>435
レスありがとうございます
エラーは実行時エラー429
ActiveXコンポーネントはオブジェクトを作成できませんです。
>>437
外にいるので後で確認します

Wordをファイル指定なら開けるのですがダイアログボックスのフォルダからファイルを選択して開くのは難しいんでしょうか

2021/06/20(日) 08:27:01.55

>>433
>>415 が言ってるのは極端な例だと
i = i + 1 ' i を１つ増やす
みたいな奴のことだろ

2021/06/20(日) 10:40:04.96

なるほどそりゃ確かに見りゃわかるわってなるな

**デフォルトの名無しさん** (ｽﾌｯ Sdba-hhAf) · 2021/06/20(日) 11:44:28.54

そんなん普通はincとdecを作るだろ

Sub inc(ByRef i)　'1増やす
　　i = i + 1
End Sub

Sub dec(ByRef i)　'1減らす
　　i = i - 1
End Sub

2021/06/20(日) 11:58:27.02

VBAらしくない

2021/06/20(日) 13:29:47.77

>>441
普通？
そんなのみたこともないけど、それを作るメリットは？

2021/06/20(日) 14:10:12.41

>>441
forループできるのにそれする意味は？

2021/06/20(日) 15:16:43.19

リーダブルコードはコードの要約よりも、意図とか疑問点とか全体としての位置付けとかを書くといいぞって主旨だった気がするが

2021/06/20(日) 15:17:08.78

ネタだぞお前ら

2021/06/20(日) 15:32:17.18

>>446
>>441のことを言ってるのか？
ネタならもう少し面白い奴にしてくれ

2021/06/20(日) 15:44:58.90

>>432
>>432
参考にしていると思われるサイト
　https://ameblo.jp/gidgeerock/entry-12059401800.html

上記に書かれているのは Word用のマクロが書かれているので
そのままでは Excelのマクロとしては実行できません

参照設定とかオブジェクトとか指定する必要があるのでExcelで動かすならExcel用のマクロを
見つけて参考にしてください

2021/06/20(日) 16:44:41.50

エクセルで何故か散布図の最大値が35になってしまうんだけどどうすればいいのかな？

2021/06/20(日) 16:54:50.18

横軸の最大値が三十五になってしまう

2021/06/20(日) 16:54:54.50

エクセルで何故か散布図の最大値が35になってしまうんだけどどうすればいいのかな？

2021/06/20(日) 16:57:32.03

VBAで散布図作ったのか？

2021/06/20(日) 17:01:39.70

>>452
そう
横軸だけ何故か35になる

2021/06/20(日) 17:12:29.90

選択したフォルダの絶対パスを取得したいと考えているのですが、下記のフォルダ選択を実行すると
Dim shell As Object
Dim p As Object
Set shell = CreateObject("Shell.Application")
p = shell.BrowseForFolder(&O0, "フォルダを選択してください", &H1 + &H10, "C:\")
オブジェクト変数がセットされていないか、Withブロックがセットさせてないとエラーが出ます。
型がオブジェクトにするといけないのでしょうか？

2021/06/20(日) 18:36:22.06

自決しました

2021/06/20(日) 19:07:41.63

Excel板で、勉強するならよねさんかインストラクターのネタ帳がオススメと言われましたが他にオススメありますか？

2021/06/20(日) 20:09:32.61

インストラクターのネタ帳はいいよね

2021/06/20(日) 22:15:33.98

>>439
ああ、なるほどｗ

それなら俺も「わかるわ。そんなもん！！」と言いたくなるな。

**デフォルトの名無しさん** (JP 0Hff-19dE) · 2021/06/20(日) 23:21:02.61

いや、iが数値型とは限らんぞ？
文字列だったらどうする

2021/06/20(日) 23:58:31.05

ところで俺はbooleanやbyteでセコセコメモリ稼いでるんだが
これ今のPCでやる意味あるんかな

**デフォルトの名無しさん** (JP 0Hff-19dE) · 2021/06/21(月) 01:46:50.36

まあ処理内容によるけど、ほぼ無意味
巨大な配列とか数億回ループとかやるとさすがに差が出てくる

2021/06/21(月) 07:09:00.41

あっやっぱり？

2021/06/21(月) 22:25:26.02

>>455
成仏してください

2021/06/22(火) 11:40:45.71

オフィス365でデーターを保存したときにウインドウの上のバーの箇所のタイトルに
「ファイル名＋保存しました・・」って表示になるけど、
これ出さないように出来ないのかな？

ウインドウのタイトルが変わるとRPAが誤作動をおこすので
いらない機能をつけるなよといつも思います。

2021/06/22(火) 11:53:10.81

｢データー｣と伸ばすのはだいたい馬鹿

2021/06/22(火) 15:05:16.35

ハーゲーと伸ばすのはたいていハゲ

2021/06/22(火) 16:22:04.60

六本木をギロッポンて言うのはバブル世代

2021/06/22(火) 17:33:55.87

コンピュータとか最後の長音を省略する文化が浸透しすぎて勘違いしたお爺ちゃん達がメールをメイルって書き始めてから数年が経ちました

**デフォルトの名無しさん** (ｽﾌｯ Sdba-19dE) · 2021/06/22(火) 17:38:24.50

メード喫茶

2021/06/22(火) 17:40:58.43

デエタベイス
コンビュウタア
ワアプロ

2021/06/22(火) 17:43:44.45

めゑる

**デフォルトの名無しさん** (JP 0Hff-C2Ex) · 2021/06/22(火) 17:52:33.69

ヱクセルヴァイオレットナンバーワン

2021/06/22(火) 18:10:38.33

VBE使いにくいです。
皆さんは何か別のものを
使っていますか？

2021/06/22(火) 18:14:32.32

一晩寝たら意外と簡単にプログラム書ける不思議
昨日あんなに悩んだのに

2021/06/22(火) 18:17:45.56

おぢーさん達はWordの事を「ワアド」と発音するね

2021/06/22(火) 18:29:06.95

放置したら頭がスッキリするんだな

2021/06/22(火) 18:29:22.48

放置したら頭がスッキリするんだな

2021/06/22(火) 18:38:41.16

猫杓子ビールス

2021/06/22(火) 19:05:13.17

放尿したら頭がスッキリするんだな

2021/06/22(火) 19:21:16.66

これって何だったっけ？
確か昔は変数に持たせられる文字列数に制限があって末尾の棒線を取って記載するのが流行って今に至ってるって話の奴だっけ？
まぁ何かデータとかメモリとか書くのが当たり前になっちゃってるし俺もそう書くけど
別にどっちでもいいんじゃないの？
むしろ今はそんな制限殆どないんだし、最近の人の方が末尾に棒線付けて書いてるかもね。

2021/06/22(火) 19:43:01.98

>>480
こういう英語のわからない馬鹿は黙ってろよ

2021/06/22(火) 20:39:14.51

>>480
内閣告示・内閣訓令が出てるので今は付ける方が多くなってる、省略したがるのは知識が更新できない爺
ちなみにデーターとか言うのは単なるアホ
https://www.bunka.go.jp/kokugo_nihongo/sisaku/joho/joho/kijun/naikaku/gairai/honbun06.html

2021/06/22(火) 20:40:18.28

「棒線」で素人丸わかり

2021/06/22(火) 20:46:35.31

しようもないマウント

2021/06/22(火) 20:47:21.44

伸ばし棒だよな！

2021/06/22(火) 20:48:45.83

VBAスレらしくプログラムの知識でマウント取れよ

2021/06/22(火) 21:09:02.39

せめて変数のネーミングセンスでマウントとってください

2021/06/22(火) 21:46:11.98

マイクロソフトが周辺機器メーカーも巻き込んで表記ルールを作っている

2021/06/23(水) 00:05:56.27

ルールーには従わないとな

2021/06/23(水) 00:19:56.88

ルールははじめる前に作れ
あとからいうな

2021/06/23(水) 05:00:42.54

メモリ？メモリー？

2021/06/23(水) 08:36:39.57

ルール一　質問するな