VBAなんでも質問スレ Part3 (137レス)
上下前次1-新
リロード規制です。10分ほどで解除するので、他のブラウザへ避難してください。
1: 2021/09/09(木)19:46 ID:zfiF925t(1/3) AAS
VBAを使った質問ならなんでもござれ
本来の対象であるオフィスアプリを操作する以外の話もOK
ゲーム作り、Webアクセス、外部アプリの操作
COM(ActiveX)、Win32API、.NET Framework、DirectXなどなど
VBAで実行するものであればなんでも質問してください
VBAを開発環境としていろいろ作っちゃいましょう
前スレ
省4
57(1): 2022/06/18(土)11:58 ID:pdXNHIfJ(1) AAS
ここはVBAなら何でもありだと思うけどな
「Excel VBA」スレと間違えてないか?
58: 2022/06/18(土)12:55 ID:hicnRT7U(2/2) AAS
>>57
まさにそっちと間違えてた
ごめんなさい
59: 2022/06/18(土)13:38 ID:T0WefD6f(1) AAS
>>54
あるあるだね
とくに若手に作らせるとそんなもんだよ
命名規則とかインデントとか、とにかく余裕がなくて勉強してるヒマがない
納期に追われて、とりあえず動く物を作るのでせいいっぱい
まあ自分の担当になったんなら、気長に直していくこったな
俺はひどいコード直すの嫌いじゃない
省2
60: 2022/06/18(土)18:52 ID:59smDk8e(1) AAS
購入品なら不具合出たら責任取らせればそれで済む話
リファクタリングなんて自分の勉強目的以外は無意味
自分の勉強目的ならここに愚痴だか何だかわからない書き込みをするのも無意味
61: 44 2022/06/18(土)22:31 ID:yLkug1TW(1) AAS
書いてみて反応がなければよし、あれば語らう。
自由な空間で試行錯誤をすることを否定するなよ老人脳。
62: 2022/06/19(日)10:16 ID:MMGrL0A+(1) AAS
スレも理解できない奴が他人を批判するのもどうかと思うけどな
そもそもソースすら満足に直せない奴も低能なのではないか
63: 44 2022/06/19(日)13:49 ID:ZfwUc+SV(1) AAS
ソースは差し障りがないように改変して皆さんに相談してみたいと思います
64: 2022/06/19(日)14:32 ID:umGSPst7(1) AAS
>Option Explicitの有無でサブフォームの選択の仕方
選択の仕方ってのがどういった状況を指してるのかわからんけど
正常に動作してる状況で宣言の有無でそれが変わる例が思いつかんわ
そこだけでもコード曝せ
65: 44 2022/06/19(日)14:36 ID:7hrQJOKY(1) AAS
私も非常に驚いたので晒したいです。
今日は家族サービスでできないので近いうちに。
66: 2022/06/19(日)14:56 ID:Avfsw1Xy(1) AAS
>>44
それは解決とは言えんのだな
バグり上等でとりあえず動けばいいなら
67: 2022/06/19(日)17:19 ID:Mrl+aHBB(1) AAS
さしあたり1200以上のモジュールってのは行数のことだよね
68: 2022/06/19(日)17:50 ID:r9O1Cbix(1) AAS
オプエクで動かなくなるのって、デフォルトプロパティあたりのタイプミスとかじゃないのかなあ
晒せるように改変してたらあっさり解決したりして
69: 2022/06/20(月)12:29 ID:Kyf/A8dE(1/3) AAS
若手って何歳を指しているのよ?
まさか40代を指して若手とか定義しているのか?
70: 2022/06/20(月)12:49 ID:qN1xu+JG(1) AAS
年齢でも勤続年数でもないのは確か
何ができたら一人前とか定義するのも不可能だし
71(1): 2022/06/20(月)12:58 ID:KWqGfZyo(1) AAS
初心者の定義ならできそう
マニュアルを読まない
型を適切に使い分けない
コーディングルールを意識しない(インデントやコメント、命名規則も含む)
エラーメッセージを読まない
とにかくググらない
72: 2022/06/20(月)13:20 ID:+4siy80v(1/3) AAS
いきなりあのマニュアルは敷居が高すぎる
とは思う。
73: 2022/06/20(月)13:30 ID:6co1WthA(1) AAS
マニュアルってどれ?
74(1): 2022/06/20(月)13:49 ID:+4siy80v(2/3) AAS
外部リンク:docs.microsoft.com
とか。
75: 2022/06/20(月)14:10 ID:cxkBtu38(1) AAS
>>71
それは初心者でなくバカなだけでしょ
自分ができない事の原因にそれがあったら直せといいたい
76: 2022/06/20(月)17:54 ID:Kyf/A8dE(2/3) AAS
ググるっつても、見るのは当然MSヘルプのみ。
上級者はこれ。
他の訳の分からないサイトは一切見ないと聞いた
77: 2022/06/20(月)18:15 ID:+4siy80v(3/3) AAS
それは構文なんかのお作法が頭に入っているから出来る話
78: 2022/06/20(月)20:25 ID:+SBlN13D(1) AAS
>>74
リファレンスマニュアルのことをマニュアルって呼んだり読むっていう文化無かったからびっくりした
リファレンスって呼んでたし見るって言ってる
確かにマニュアルだけど
79: 2022/06/20(月)22:02 ID:Kyf/A8dE(3/3) AAS
上級者はMSヘルプだけで解決と聞いた
訳の分からないサイトは参考にしないと
80: 2022/07/27(水)10:15 ID:llycacgt(1) AAS
PowerPointのVBAについてご教示ください
・達成したいこと
社内作成のファイルを顧客に送付するための処理としてスライドに表示されている情報以外(個人情報、非表示スライド、ノート)を削除したい
・うまくいかないところ
ノートのスライドイメージを残しつつ、それ以外を削除すること
・試したこと
NotePage.Shapesを全削除→スライドイメージごと削除されてしまう
省1
81(1): 2022/08/06(土)17:28 ID:11wPPJ/9(1/2) AAS
ワードVBAでの質問です.
ワードの連番フィールド(SEQフィールド)の結果を文字列で固定したいのですがどうすればいいでしょうか?
多くのフィールドは
ActiveDocument.Fields.Unlink
で固定化できるのですがSEQフィールドは対象外です.
よい方法があれば教えてください.
82: 2022/08/06(土)17:36 ID:11wPPJ/9(2/2) AAS
>>81
自己レスです。
Ctrl + a、Ctrl +shift +F 9でできました。
マクロでCtrl +shift +F 9の操作を記録したのですが何も記録されませんでした。VBA には対応するコマンドはないようですね。
お騒がせしてすいませんでした。
83: 2022/09/20(火)17:19 ID:Y1fqDNiq(1) AAS
今日ろくに考えずに書いたのが
上手く動いて驚いた
しかも期待する以上の働きを
してたわ
本当に大丈夫か心配だけど
じっくり見る気力がないわ
84: 2022/09/20(火)23:12 ID:E6px8L9o(1) AAS
良かったね
85(1): 2022/11/05(土)23:23 ID:q1vpSefi(1) AAS
WORD VBAでハイパーリンクをクリックする処理はどうすればいいでしょうか.
ハイパーリンクをクリックしたときに処理Aを同時に実行したいのですが,エクセルVBAはのようにハイパーリンクのクリックイベントがWORDVBAにはないので,逆にボタンに処理Aと塀パーリンククリックの処理を書こうとしています.
ご存知ならば教えてください.
86: 2022/11/06(日)11:57 ID:YZhV7ZFA(1) AAS
こことか詳しいんじゃね?
外部リンク:www.tipsfound.com
VBA絡みならこっちとかも
外部リンク:draft.ecophysical.com
87(1): 2022/11/06(日)13:00 ID:mzFwuoQr(1) AAS
>>85
環境ないから試せてないけど follow じゃないの?
外部リンク:learn.microsoft.com
88: 2022/11/06(日)13:33 ID:BQYduCLI(1) AAS
>>87
ありがとう
followで上手くいきました
89(1): 2023/01/15(日)17:27 ID:L0piBEvX(1/4) AAS
a=Application.InputBox(”英数字を入力して下さい”,“~を入力“)
この入力の時に、全角モードになっていても半角英数字の入力に自動で変更する方法はないでしょうか?
sendkeys “%{kanji}“を使用すると、半角英数字になっていた時に全角モードにされてしまいます。
よろしくお願いします。
90(1): 2023/01/15(日)17:32 ID:oiU86Xgn(1/2) AAS
>>89
外部リンク:infith.com
91: 2023/01/15(日)17:42 ID:L0piBEvX(2/4) AAS
>>90
ありがとうございます。
ここのページも見て試したのですが、実行した後に手動でセルに直接入力する場合には確かに半角英数字になるのですがinputboxからの入力ではIMEの方が強いみたいです
92(2): 2023/01/15(日)19:16 ID:2OoagcjS(1) AAS
a=strconv(input…じゃだめ?
93(1): 2023/01/15(日)19:45 ID:wWThixkU(1) AAS
if IMEStatus=vbIMEModeOn then
sendkeys “%{kanji}“
end if
でどうですか?
94: 2023/01/15(日)21:24 ID:L0piBEvX(3/4) AAS
ありがとうございます
>>92
試してみますね
>>93
そのやり方と
If IMEstatus<>vbIMEModeOff then
Sendkeys “%{kanji}“
省5
95(1): 2023/01/15(日)21:28 ID:L0piBEvX(4/4) AAS
>>92
入力後の半角英数字化ではなくて、入力時には半角英数字になっている状態にしたいです
96: 2023/01/15(日)21:34 ID:oiU86Xgn(2/2) AAS
>>95
外部リンク[htm]:officetanaka.net
97: 2023/01/16(月)21:05 ID:/FEcft61(1) AAS
ユーザフォームで作るのはだめなのか?
98(3): 2023/01/26(木)00:20 ID:gEJbNrm3(1/2) AAS
初心者です。
Excelシート上に、activeXコントロールのボタン、コンボボックス、テキストボックス貼り付け
そのプロパティ見ても、タブインデックスが見当たらない?
Excelシート上では、タブインデックスは設定不可なのですか?
教えて先輩方
99(2): 2023/01/26(木)01:01 ID:XU6i0xq0(1) AAS
>>98
自動でやるのは不可能
Tabが押されたらカーソルを移動するプログラムを1つずつ自分で書く必要がある
100: 2023/01/26(木)09:05 ID:gEJbNrm3(2/2) AAS
>>99
ありがとうございます
101(1): 2023/01/29(日)18:23 ID:MSlBVOmY(1) AAS
アクセスVBAの質問です。
目的のフォルダーにカレントフォルダ―を変更してからファイル選択ダイアログを開こうとしていますが、カレントフォルダーが変更されません。
ChDir "C:\" & 目的フォルダー名
With Application.FileDialog(msoFileDialogOpen)
If .Show = True Then
フルパスのCSVファイル名 = .SelectedItems(1)
Else
省4
102(1): 2023/01/29(日)21:03 ID:CDZO9Bih(1) AAS
>>101
.InitialFileName
103: 2023/01/30(月)10:59 ID:pg83Lxmz(1) AAS
>>102
ありがとうございました。
できました。
ChDir "C:\" & 目的フォルダー名
はいらないのですね。
104: 2023/02/04(土)13:27 ID:ILEoM5pM(1) AAS
ニワかAccess使いか
105(1): 98 2023/02/05(日)00:51 ID:x+/z83/X(1/2) AAS
>>99
フォーカスのセットができないですね
うーん
106(1): 2023/02/05(日)09:32 ID:kGhYs+bB(1) AAS
>>105
フォーカスの移動だけならこのへんがヒントになるかな
外部リンク[html]:excel-ubara.com
ただしEnterでクリック(確定)はまたちょっとハードルが高い
107: 98 2023/02/05(日)11:03 ID:x+/z83/X(2/2) AAS
>>106
ありがとうございます
調査してみます
108(1): 2023/02/07(火)02:06 ID:HGM7cRGk(1) AAS
VBAが壊れたファイルってもう駄目ですか?
何か壊れた時の対策はしてますか?
109: 2023/02/07(火)02:14 ID:u80ccXtt(1) AAS
VBAに限った話では無いけどデータ破損に備えてファイル履歴残しておくのは最低限の心構えだと思うけどな
110: 44 2023/02/07(火)14:59 ID:PRRTh57q(1/2) AAS
>>108
何か改造する度にコピーを作成してクラウドで二重化しているなあ。
コマンドボタンを1個置いただけでmdbが壊れて途方に暮れてからそうしている。
111(1): 44 2023/02/07(火)15:17 ID:PRRTh57q(2/2) AAS
外国のサイトを巡っているときに壊れたmdbを修復すると謳うユーティリティーソフトを見た覚えがあるなあ。
フリーの奴をダウンロードして使った記憶がある。俺の場合は役に立たなかったけど、試す価値はあると思う。
112: 2023/02/07(火)20:55 ID:uVJ5qMcc(1) AAS
昔に比べりゃだいぶ減ったよねブック破損やマクロ破損は。
113: 2023/02/07(火)22:11 ID:n590V07Z(1) AAS
俺生まれてないや
114: 2023/02/08(水)02:12 ID:k9oPh+Xg(1) AAS
歳いくつよ?
115: 2023/02/08(水)07:56 ID:XG6Lxj8v(1) AAS
5chは年寄の巣窟ですよ。
子供は他所で遊んだ方が良いですよ。
116: 2023/02/08(水)08:52 ID:8aAMf1oY(1) AAS
>>111
バックドアが結構入ってるから会社ではやらん方がいいよ
117(1): 2023/02/08(水)16:38 ID:WlEF04f4(1) AAS
BEアイコン:u_sii_naname.gif
1.CommandButton1_Click
ウインドウ作成
GetWindowLongPtr→RegisterClassEx→CreateWindowEx
作った窓のウインドウハンドルはパブリック変数に格納
2.CommandButton2_Clickで削除
ウインドウ破棄
省4
118(1): 2023/02/09(木)15:34 ID:1BKoKxeD(1) AAS
>>117
「何で」がどこを差しいているかわからんが、 2で破棄したからじゃね
119: 2023/02/09(木)18:57 ID:7UZecPSw(1) AAS
>>118
自己解決したわ
手順3でDestroyWindowの後、UnregisterClassを入れないと駄目らしい
120(3): 2023/02/27(月)17:10 ID:GEmICUaj(1) AAS
購入さたパソコンはオフィス非搭載
VBAは以前簡単なモノは作ってましたが、すっかり忘れてます。
再び勉強してみようかと思ってますが、
無料ソフトのカルクでVBAがある程度学習できるとネットでみつけましたが、これは本当に可能ですか?
pythonは大学が無料テキストを公開してますが、VBAの無料テキストは検索しても見つかりませんでした。
どこか無料テキスト公開しているサイトを知りませんか?
121: 2023/02/27(月)19:15 ID:O7Tjun9K(1) AAS
>>120
外部リンク:learn.microsoft.com
外部リンク:learn.microsoft.com
122(1): 44 2023/04/20(木)13:04 ID:b7y+tf5m(1) AAS
みなさん、Accessに外部からLoadFromTextを行うときに出てくる 「この操作を実行するとプロジェクトがリセットされます。実行しますか?」 を出なくする方法を知ってますか?
1000以上のモジュールをインポートしないと行けないので、1000回以上ボタンをクリックするのが面倒くさいです。
123: 2023/10/12(木)00:31 ID:DQl6JD4W(1) AAS
>>120
私もVBAの勉強中です
こちらのサイトは軽くて読みやすい気がします
外部リンク:www.tipsfound.com
124: 2023/10/12(木)13:57 ID:UgjJPXcW(1) AAS
>>120
MSのサイトでリファレンス公開されてるじゃん
125(3): 2024/02/11(日)15:33 ID:xHqPXMK5(1/2) AAS
VBAが廃止予定とマイクロソフトから予告めいたことが出てるらしいですが、実際はどうなんでしょうか?
126(1): 2024/02/11(日)17:45 ID:XgIjLyiU(1) AAS
>>125
その予告によるとVBAの移行先は何処と言ってるの?
127: 2024/02/11(日)18:01 ID:RI7D2x7j(1) AAS
>>125
それ5年前にも10年前にも聞いたけど、10年たってもあんまり進んでないからあわてる必要は全然ない
128: 2024/02/11(日)18:03 ID:ESz2cAkb(1) AAS
>>122
そもそも、手動で1個ずつインポートして「ダイアログを出なくする方法」を探すこと自体が間違ってる
1回で済むようにまとめるか完全自動化するのが正解
129: 2024/02/11(日)20:19 ID:xHqPXMK5(2/2) AAS
>>126
Office系がWebView I/Fになり、
JavaScriptになると言ってます
130: 2024/02/12(月)08:25 ID:RQTXNg3h(1/2) AAS
>>125
VBA廃止してPythonにすっからよろしくな!
↓
Python導入辞めるわ、使いたかったら優れたアドオン2つあるから使ってな!
って前科もあるし
131(1): 2024/02/12(月)08:37 ID:B2pA3A78(1) AAS
Python導入辞めるって公言したの?
132: 2024/02/12(月)08:51 ID:RQTXNg3h(2/2) AAS
>>131
大分前に公式フォーラムで開発者が発言してる
MS広報としての発言ではないけど
133: 2024/10/15(火)12:50 ID:deB0cZxN(1) AAS
Python上げVBA下げしてる気持ち悪い奴ら
2chスレ:tech
134: 02/03(月)22:35 ID:HhGdF8Qe(1) AAS
そもそもPython導入って正式にアナウンスされたのか?
135: 05/05(月)04:29 ID:Q8K4+hk+(1) AAS
されてない
中の人がブログに個人の感想を書いたら勝手に尾ヒレが付いて噂が広まっただけ
136: 05/05(月)08:07 ID:nZUz3osk(1) AAS
Pythonは別の形で導入済み
py関数に生まれ変わった
137: 05/07(水)23:13 ID:5rQjCI4p(1) AAS
VBA廃止とPythonでの機能追加は関係のない話
VBAを廃止したいのは当然のこと
上下前次1-新書関写板覧索設栞歴
スレ情報 赤レス抽出 画像レス抽出 歴の未読スレ AAサムネイル
ぬこの手 ぬこTOP 0.017s