Excel VBA 質問スレ Part83

**デフォルトの名無しさん** · 2025/06/08(日) 11:06:42.20

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

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

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

**デフォルトの名無しさん** · 2025/06/26(木) 12:54:13.79

以前から報じられていたけど、シートに配置したActiveXコントロールが既定で機能しなくなったね

**デフォルトの名無しさん** · 2025/06/26(木) 13:54:18.86

バージョンによるけど

**デフォルトの名無しさん** · 2025/06/26(木) 23:09:29.85

沢山の回答、本当にありがとうございます🐜
大量の業務を指示されるにも関わらず、肝心のやり方は誰も何にも教えてくれないので困っていました。

**デフォルトの名無しさん** · 2025/06/26(木) 23:27:04.86

自分が出来ますって嘘ついて入社したからでしょ？

**デフォルトの名無しさん** · 2025/06/27(金) 00:06:22.99

>>258
死ねよ

**デフォルトの名無しさん** · 2025/06/27(金) 01:32:00.89

フォーマットに固執する人には一度Accessのレポートを触らせてデータ本体と閲覧用のフォーマットを分離する概念を身に着けさせたいな
Excelはそこら辺をごっちゃに出来るのが強みでもあり欠点でもあるよね

**デフォルトの名無しさん** · 2025/06/27(金) 04:12:57.30

まだ印刷してる会社があるのか。
VBAをAIに相談しながら作ってたらどんどん破壊された。
VBAのバージョン管理ってどうやってますかお前ら。前のに戻す機能ってありますか？orz

**デフォルトの名無しさん** · 2025/06/27(金) 04:31:43.59

>>260
ハゲるな🦲

**デフォルトの名無しさん** · 2025/06/27(金) 05:10:19.38

>>262
どんどん破壊される要素ありますか？

**デフォルトの名無しさん** · 2025/06/27(金) 05:11:58.20

>>259
言ってないです
HTMLは一切知らないです
一言も喋っていない
せいぜいタグがあって、直書きするくらいですね
動的なサイトとか言われたらアウトです

**デフォルトの名無しさん** · 2025/06/27(金) 05:34:45.13

>>251
私は本当に全くの無知だからAIに聞くこともできなければ回答の正誤の判断もできないんです
例えばXpathが出てきますが、PADでどうやれば使えるのか知りません。
IDも動的なのであまり使えなさそうな

**デフォルトの名無しさん** · 2025/06/27(金) 06:13:21.76

>>265
スレチって言われてるのに居続けるあたり、
無能な上人の話聞かないのがよく分かる

**デフォルトの名無しさん** · 2025/06/27(金) 06:15:32.61

>>262
そりゃあるよ
常に電子機器を前にできる仕事だけじゃない

**デフォルトの名無しさん** · 2025/06/27(金) 06:32:19.98

>>267
私は人の要望しか聞いていないです
自分がこうしたいと言う話はしていない

**デフォルトの名無しさん** · 2025/06/27(金) 06:42:55.07

>>269
死ねよ

**デフォルトの名無しさん** · 2025/06/27(金) 08:31:17.40

わたしたちもあなたの不平不満愚痴ボヤキを読んでるだけで
解決策を提示できる・答えを知ってるとはひとことも言ってませんが悪しからず

**デフォルトの名無しさん** · 2025/06/27(金) 08:31:36.13

無知を全面に出す人苦手
だから何？君の親でもないけどって内心モヤッとしてる

スレチですまん

**デフォルトの名無しさん** · 2025/06/27(金) 09:13:02.10

最近はここに質問された内容をAIに聴いて
AIの返事をまたここにpostする行為が流行ってる

**デフォルトの名無しさん** · 2025/06/27(金) 09:46:35.02

そのAIの解答を評価してみりゃいいんでね？

**デフォルトの名無しさん** · 2025/06/27(金) 10:25:38.18

>>269
私も人の要望をよく聞きます
聞くだけなので答えませんがね

**デフォルトの名無しさん** · 2025/06/27(金) 10:28:46.75

AIと喧嘩したいんだけど
許可されたら死んでしまうかもしれないからここで加減を調節している段階にいるんだけど

**デフォルトの名無しさん** · 2025/06/27(金) 10:45:24.90

>>273
マトモな回答だとつまんないからズレた面白いAI回答を選んで貼ってください

**デフォルトの名無しさん** · 2025/06/27(金) 12:38:13.98

>>277
ChatGPTに大喜利を考えてもらってみた。
なんか微妙

【大喜利お題】「エクセルがついに自我を持った！さて、最初に言ったひと言とは？」

【回答】
Sub ExcelNoJiga()
MsgBox "ねぇ、また無駄な関数使ってるよね？"
End Sub

**デフォルトの名無しさん** · 2025/06/27(金) 17:23:06.62

chatGPTでもcopilotでもいいけどまともなコードが返ってこないなら自分のブロンプトが絶望的なのを認識したほうがいい
そう言い切っていいほど精度高いわ

**デフォルトの名無しさん** · 2025/06/27(金) 18:10:56.90

検索したら出てくるレベルの質問なら確実に答えてくれるが、どこにも例題がないやつは嘘しか言わない
結局はGoogle代行でしかない

**デフォルトの名無しさん** · 2025/06/27(金) 18:55:03.45

かつて誰も考えなかったすごい質問する俺様にAIはついてこれない
マッタク使えないZE

**デフォルトの名無しさん** · 2025/06/27(金) 20:46:54.00

例えばどんなこと？

**デフォルトの名無しさん** · 2025/06/27(金) 21:38:05.72

>>280
おい言ってみろよ
それっぽいこと適当に言ってると低年収バレバレで失禁するぞ？

**デフォルトの名無しさん** · 2025/06/28(土) 10:20:06.70

逃げたな

**デフォルトの名無しさん** · 2025/06/28(土) 10:56:57.35

>>280
ほんそれ
回答の末尾にしらんけど付けてくれ
知らないなら答えないで下さいうざいだけです

**デフォルトの名無しさん** · 2025/06/28(土) 15:34:30.03

会話の終わりに知らんがななんか付けたら関西人に成ってしまうだろ
そう言えば、関西系のシステムって見たことも触ったことも無いけど
やっぱあれかな？　[はい][いいえ]ボタンなんか配置したら｢何東京人ぶってんねん！｣とか
罵られるから[そうでおま][ちゃいまんねん]とかなのかな？　キャンセルは[やめときますｂ偰とか
いっぺん見てみたい

**デフォルトの名無しさん** · 2025/06/28(土) 16:39:30.47

VBAスレ史上でもワースト3に入るつまらなさ

**デフォルトの名無しさん** · 2025/06/28(土) 17:20:22.34

>>286
昔々IT企業の同期のコンピューターに疎いやつ（文系）が言ってたことに似てる

プログラムの命令って何でIFとかなん
JKの日本語で「もし～"だったら～"xxする」（"ら～"と伸ばすのまでが語w）とか書ければいいのにとw

バカにしたけどまあ文系の素朴な疑問なんやろなとは思った
日本語BASICとかがこの命令体系だったら、一部のマニアに流行ったのかもしれんなと思ったり

ちなみに大阪にある有名企業（の開発現場）で「もし」とかプログラム書いてたとこは存在した。そこで仕事したことある
今そう書いてるかは不明

**デフォルトの名無しさん** · 2025/06/28(土) 18:58:07.89

日本語のようなハイコンテキスト言語はプログラミング言語に向かない

**デフォルトの名無しさん** · 2025/06/28(土) 19:31:48.97

形式言語としてのプログラミング言語の記号列に用いる記号をどのような記号集合から取ってくるかというだけの話で、ASCIIが便利だったってだけだと思うけど。
だから、自然言語としての日本語・英語の性質はあんまり関係ないと思う。構文論・意味論は個々のプログラミング言語で定義されるわけだし。仮に「もし～だったら」みたいに書けたとしても、期待に反して大して書きやすくはならないはず。

**デフォルトの名無しさん** · 2025/06/28(土) 19:52:26.97

なでしこ言語（泣）

**デフォルトの名無しさん** · 2025/06/28(土) 20:13:15.90

もしもあしたが晴れならばの歌詞は色々と論理が破綻してる

**デフォルトの名無しさん** · 2025/06/28(土) 20:35:26.86

財源が無いはずなのに消費税で上振れしている税収の財源があるのも論理破綻している

**デフォルトの名無しさん** · 2025/06/28(土) 20:44:32.94

>>290
その通り
普通にIF書いてたプログラマーからしたら全然書きやすくはない
しかし当時プログラマーなんて少ない時代に、わかりやすく書ける、読めることはメリットあった

例えば東京特許許可局という変数があったとき、これを英字にしたら読みやすさが激減する
苦肉の策な時代でした
（省略英字の日本語辞書を使って、ソースを読みやすくする現場もあった。SYH-ZEIを消費税とするような）

**デフォルトの名無しさん** · 2025/06/28(土) 20:45:50.18

俺は変数の宣言は日本語にしてる
ひらがな、カタカナ、漢字
それでトラブったことがないの

**デフォルトの名無しさん** · 2025/06/28(土) 21:46:41.03

だが日本語変換の切替えがだるい

**デフォルトの名無しさん** · 2025/06/28(土) 22:01:41.58

>>296
変換をon、無変換をoffにしておくと楽

**デフォルトの名無しさん** · 2025/06/28(土) 22:05:51.33

一応こんなのはある
C++言語によるお嬢様コーディングがブームの兆し!?
https://forest.watch.impress.co.jp/docs/serial/yajiuma/1419370.html

**デフォルトの名無しさん** · 2025/06/29(日) 02:34:13.89

こんなのも
https://eetimes.itmedia.co.jp/ee/articles/2506/27/news072.html

**デフォルトの名無しさん** · 2025/06/29(日) 08:26:19.87

改ページの点線を手動で移動させて1ページに収まる様に指定するのと（実はこれが自動改ページ）
横1ページ指定するのと（全列を1ページに収まる様に指定）
印刷した時の文字の大きさに差はありますか？

**デフォルトの名無しさん** · 2025/06/29(日) 12:48:03.11

シート上で指定した改ページはデータをページで区切るための指定
プリンター設定で拡大縮小できるし、紙が数ミリずれることもあるのでギリギリを狙うと失敗する

**デフォルトの名無しさん** · 2025/06/29(日) 17:00:44.93

>>301
プリンターの設定で必ずこの行から2ページ目にする
という設定ができるのでしょうか？

とりあえず今日調べてなんとなく挙動がわかった様な気がします
考えれば当たり前の話ですが、行を追加すると余分なページが挟まれる可能性があるのと、空白だけど（何かしら書式設定された痕跡があるからか）印刷対象になってしまっている行を削除しないといけない

**デフォルトの名無しさん** · 2025/06/29(日) 18:14:38.13

印刷画面で1ページだけを5枚印刷とか
3,5～7ページだけを印刷とか指定できるので好きなページだけ印刷すればいいんじゃね

**デフォルトの名無しさん** · 2025/06/29(日) 18:29:48.73

印刷すること自体をマクロでやったこと無いが
プレビューを確認してよければ印刷するくらいにしないと
インクや紙が無駄になるぞ
1万件のデータ印刷したら100ページとかw

**デフォルトの名無しさん** · 2025/06/29(日) 18:43:03.87

マクロから直接印刷はさすがにしてないです
pdf出力するのをしています
ちなみにどうしても縮尺指定にこだわりたい人の為に、縮尺指定→印刷プレビュー→印刷プレビュー閉じる→左右のページ数確認→ループのコードを書きました。

**デフォルトの名無しさん** · 2025/06/30(月) 06:28:01.78

Excelの知識がなさすぎるひと向けに作るのはやめた方がいい

**デフォルトの名無しさん** · 2025/06/30(月) 11:45:51.43

つかExcelVBAは使うのやめた方がいい
トラブルの元

**デフォルトの名無しさん** · 2025/06/30(月) 11:49:50.48

このスレで言うことか？

**デフォルトの名無しさん** · 2025/06/30(月) 18:11:33.26

印刷やろうとしてる人に向けてだろ…
でも明らかにセンスも作り込みスキルもなさそうだから同意

**デフォルトの名無しさん** · 2025/06/30(月) 20:01:12.87

>>309
センスも作り込みスキルも無さそうでしょうか？

**デフォルトの名無しさん** · 2025/06/30(月) 20:48:43.72

>>310
ごめん、そんなことはないけど
印刷のVBA化に無理に固執するもんじゃない
マジで
昔経験したからわかる

**デフォルトの名無しさん** · 2025/06/30(月) 20:54:02.73

>>311
ありがとうございます
vbaで直接プリンターに飛ばすわけではありません
とりあえず改ページの仕様はいくらか理解できたと思います

**デフォルトの名無しさん** · 2025/07/01(火) 00:25:06.97

Chatさんに聞いてみたけど面倒くさそう。

' 例：20行目の上に改ページ（21行目から新しいページ）
余白2cm
Sub 印刷設定サンプル()

Dim ws As Worksheet
Set ws = ThisWorkbook.Sheets("Sheet1")

With ws
.ResetAllPageBreaks
.HPageBreaks.Add Before:=.Rows(21)

With .PageSetup
.PrintTitleRows = "$1:$3"
.Zoom = False
.FitToPagesWide = 1
.FitToPagesTall = False
.Orientation = xlPortrait
.PaperSize = xlPaperA4
.LeftMargin = Application.CentimetersToPoints(2)
.RightMargin = Application.CentimetersToPoints(2)
.TopMargin = Application.CentimetersToPoints(2)
.BottomMargin = Application.CentimetersToPoints(2)
.CenterHorizontally = True
End With
End With

MsgBox "印刷設定を適用しました。"
End Sub

**デフォルトの名無しさん** · 2025/07/01(火) 00:32:33.67

続き。こういうのも多分いるよね。

指定した行数がA4印刷1ページに収まるかを調べ収まらない場合は改ページを設定する

各行の高さを合計して、ページ内に収まるかを判定。A4の印刷可能範囲の高さ（ポイント単位）と比較。オーバーするならその直前に改ページを入れる。 A4用紙の印刷可能な高さ（おおよそ）
A4縦の高さ：29.7 cm = 約842 pt
上下余白（例）：2cm + 2cm ≒ 113 pt（計）
⇒ 実質印刷可能範囲：約729 pt
※余白・ヘッダー・フッターにより変動
コード例
Sub 自動改ページ_行数と印刷高さを基準に()
Dim ws As Worksheet
Dim i As Long
Dim rowHeightSum As Double
Dim printHeightLimit As Double
Dim lastRow As Long
Set ws = ThisWorkbook.Sheets("Sheet1")
ws.ResetAllPageBreaks
' 印刷可能な高さを計算（A4縦：842pt - 上下余白約113pt）
printHeightLimit = 842 - 113
rowHeightSum = 0
lastRow = ws.Cells(ws.Rows.Count, 1).End(xlUp).Row
For i = 1 To lastRow
rowHeightSum = rowHeightSum + ws.Rows(i).RowHeight
If rowHeightSum > printHeightLimit Then
' この行の直前で改ページを入れる
ws.HPageBreaks.Add Before:=ws.Rows(i)
rowHeightSum =ws.Rows(i).RowHeight ' 次ページの高さリセット
End If
Next i
MsgBox "改ページを設定しました。"
End Sub

**デフォルトの名無しさん** · 2025/07/01(火) 07:51:53.41

>>313
このコードは何をしているかというと、
21行目の上　つまり20行目と21行目に改ページを設定して
上にヘッダー？を設定して
縮尺解除
全列を1ページに収める
行のページ数は自動
用紙サイズはA4
という設定をしています
しかし、改ページの設定は
改ページビューの青い点線（実はこれが自動改ページ）ではないから
1ページと2ページに余分な空白のページが挟まる

**デフォルトの名無しさん** · 2025/07/01(火) 12:47:55.21

インスパイアされて作ってみた
関西のコミュニケーションの多様性にはリスペクトしか無い
https://89.gigafile.nu/0706-cf0368763b1caf00c266d1efc563aea36
ネィティブでは無いので誤りが有ったら指摘もらえば改良もやぶさかではない
Captionだけじゃ物足りないので喋らせてみたが、これが結構ドツボ
ExcelでのSpeakは、まだまだ途上らしい

**デフォルトの名無しさん** · 2025/07/01(火) 21:04:55.51

>>316
何をお作りになられたのでしょうか？

**デフォルトの名無しさん** · 2025/07/01(火) 23:30:56.43

俺氏、VBAで去年社内最優秀賞30万
今年はちょびちょび改善で出して1万6500円
抜群のセンスだわさ

**デフォルトの名無しさん** · 2025/07/02(水) 00:01:46.59

そう思うならさっさと転職して本職のITエンジニアになった方が稼げるよ

**デフォルトの名無しさん** · 2025/07/02(水) 02:51:17.71

AI時代にここの質問スレは盛況なのは何故だ

**デフォルトの名無しさん** · 2025/07/02(水) 03:40:33.29

AIがイマイチだから

**デフォルトの名無しさん** · 2025/07/02(水) 07:59:03.99

AIに書かせることはできても、それの検証はどのみち必要だから

**デフォルトの名無しさん** · 2025/07/02(水) 08:13:15.57

ガイジだけど質問ある？
死にたいガイジ…空気読めないガイジ…死にたいガイジ…

**デフォルトの名無しさん** · 2025/07/02(水) 08:19:12.11

AIはうそつきだし
適度に事実も混ぜてくるから一番やっかい

**デフォルトの名無しさん** · 2025/07/02(水) 08:29:36.52

やっかいだと思うなら使わなけりゃ良いだけなのに、
他人にもそうさせようとするのはなんで？

**デフォルトの名無しさん** · 2025/07/02(水) 08:36:59.95

>>317
[はい][いいえ]を関西弁で、という話題にインスパイアされて
･一つのユーザーフォームを使い回しできる方法
･セルの文字をボタンやラベルのキャプションにしてしまう方法
･何ならしゃべらせる方法
関西弁に限らず、広島弁でも博多弁でもかごんま弁でもとーほぐ弁でもご随意に
リンク先の[ダウンロード開始]ボタンで落とせる
うかつに開くといきなりダイアログが出てきてしゃべりだすので音量注意

OSに入ってるナレーターは、Haruka、Ayumi、Sayaka、Ichiroと選べるはずが
Wordと違ってExcelだとデフォルトのHaruka限定にされて変えられないとのことで
そこがドツボだった　まぁ幸い解決方法を指南してくれてるサイトに辿り着けた
喋ってる間は全リソース奪われて他の操作は一切出来なくなるのは、如何ともし難いのか

**デフォルトの名無しさん** · 2025/07/02(水) 08:47:20.48

関西弁のyes/no
それはええ／それはええ

**デフォルトの名無しさん** · 2025/07/02(水) 08:49:18.32

>>325
個人の中で完結ならいいけど、AIの嘘回答でドヤってくるのが迷惑

**デフォルトの名無しさん** · 2025/07/02(水) 08:52:51.46

>>328
嘘回答でドヤってきた奴に言えよ
十把一絡げに迷惑って言い散らかすのも充分迷惑だと気付かないのか？

**デフォルトの名無しさん** · 2025/07/02(水) 09:23:01.60

AIにも種類あるからなぁ
問い方にもよるし

**デフォルトの名無しさん** · 2025/07/02(水) 09:28:17.31

AIにテストとバグ取りまでやらせろ

**デフォルトの名無しさん** · 2025/07/02(水) 11:09:29.63

>>327　ww

**デフォルトの名無しさん** · 2025/07/02(水) 12:42:29.90

AIに作らせて出来てなかったら投げかけるだけだろ
こんなIT音痴な奴がVBA触ってる事にビビる大木

**デフォルトの名無しさん** · 2025/07/02(水) 19:40:08.71

AI使って嘘の回答だったら質問変えたりコード直せばいいだけでしょ。
実際自分で調べるよりもめちゃくちゃ早いし便利に使えてるよ。

人間は平気で嘘つくのにAIに嘘つくなって求めるのはおかしいでしょ。

**デフォルトの名無しさん** · 2025/07/02(水) 20:01:38.68

VBAの場合は他のメジャーなプログラミング言語と比べて平均的な人間とAIの差が大きすぎるから、いきなりゼロショットで指示すると期待通りの結果が得られにくい
もちろんAIの方が上だ
AIに対して予め既存のコードをサンプルとして与えてあげてレベル感を知ってもらうと、いい感じに合わせてくれるよ

ころころ · 2025/07/03(木) 10:04:12.85

｢嘘の回答だったら｣
そもそも嘘かどうか知ってるなら聴く必要が無い
結局嘘じゃないことを調べるのにそれ以上に時間がかかる

**デフォルトの名無しさん** · 2025/07/03(木) 10:05:56.29

｢人間は平気で嘘つくのに嘘つくなって求めるのはおかしい｣
判らんのに平気で嘘回答するネラーも多い罠

**デフォルトの名無しさん** · 2025/07/03(木) 10:16:58.13

政治家の財源がないは嘘

**デフォルトの名無しさん** · 2025/07/03(木) 10:28:29.92

學歴も嘘

**デフォルトの名無しさん** · 2025/07/03(木) 10:37:23.12

>>337
だから話半分に聞くだろ？
AIの回答もそういう姿勢で、参考にはするけど盲信しないことが大事
全部鵜呑みにするならそいつももはやAIと変わらん

**デフォルトの名無しさん** · 2025/07/03(木) 10:44:24.00

340
どうみてもAI以下です

**デフォルトの名無しさん** · 2025/07/03(木) 20:41:52.66

こんなAIの本質をわかってないような奴らが作るVBAなんてたまらんよ

**デフォルトの名無しさん** · 2025/07/03(木) 20:45:28.43

>>342
AIのプロフェッショナル様だ！
我らに叡智を与えたまえ！

**デフォルトの名無しさん** · 2025/07/03(木) 21:14:39.37

どこの誰がなにをどう作ろうとも、その成果物に実際に触る訳でも無いし
それに依って迷惑を被る訳でも無いだろ？
ナニを上から目線で大口叩いてんだか
偶々そのソースを目にすることがあろうとも、評価してくれと頼まれた訳でも無いし
VBA評議会の高位評議員という立場でも無いだろ　何がしたいん？

**デフォルトの名無しさん** · 2025/07/03(木) 22:51:34.02

>>336
AIに質問すればコードの１行ずつ丁寧に解説してくれるけどそれでも正しいかどうか調べるのに時間がかかるの？

**デフォルトの名無しさん** · 2025/07/03(木) 22:55:11.76

それをAIに１行ずつ丁寧に解説させて、その内容をさらにAIに解説させて.....以下略

**デフォルトの名無しさん** · 2025/07/03(木) 23:14:39.22

どんだけAIに質問投げるの下手なんだよマジでよー

**デフォルトの名無しさん** · 2025/07/03(木) 23:19:49.48

人間と同じで相性なんですかね。
合わないものは合わないのかなぁ。

**デフォルトの名無しさん** · 2025/07/04(金) 08:07:10.89

>>345
AIだろうと人だろうと成果物のテストするだろ
何のためにテストすると思ってるの？

**デフォルトの名無しさん** · 2025/07/04(金) 09:00:20.43

AIに投げる質問を造るのがうまいと言うことは既にAIに聴く必要が無いんだわ

**デフォルトの名無しさん** · 2025/07/04(金) 13:21:56.31

それは違う
プロンプトエンジニアリング能力と他の能力は別物

**デフォルトの名無しさん** · 2025/07/04(金) 15:02:13.77

だったらAIにでも話してろよ

**デフォルトの名無しさん** · 2025/07/04(金) 18:27:01.53

一生懸命コードの基礎学んだのにセンスが無い奴は必死になるよなそりゃ

**デフォルトの名無しさん** · 2025/07/04(金) 19:13:39.58

>>353
？

**デフォルトの名無しさん** · 2025/07/04(金) 21:05:20.15

>>349
言いたいことがよくわからないです。

おっしゃってるようにAIでコードを書いても人で書いてもテストはします。
ただAIで書いたコードのテストは人のコードより時間がかかるというお話ですか？
丁寧にAIに教えてもらえても？
AIは関係ないと思うけど違うのかな。