Excel VBA 質問スレ Part81

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

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/
Excel VBA 質問スレ Part80
https://mevius.5ch.net/test/read.cgi/tech/1685489018/

**デフォルトの名無しさん** · 2024/11/29(金) 13:11:46.28

レス分けたら詳細書けました
クリップボード経由してPasteSpecialメソッドを用いると、
テキストとしての"2024-12-31"もセルに入れることができる
Excelの仕様の問題のような気がしてきました

**デフォルトの名無しさん** · 2024/11/29(金) 18:10:43.05

先にセルの書式を文字列 @ にしてみては？

**デフォルトの名無しさん** · 2024/11/29(金) 18:36:49.21

>>852
うまくいきました！
>>840のアドバイスを試す際、
コード内に@と明示せずGeneralにして試したのも間違いでした
お二人とも本当にありがとうございました！

**デフォルトの名無しさん** · 2024/11/29(金) 21:22:22.42

>>844

苔で出来ました。

**デフォルトの名無しさん** · 2024/11/29(金) 22:54:45.08

a=(hoge>75)*100+(hoge>50)*10+(hoge>25)*1
on log10(a)-1 goto 処理3,処理2,処理1

こういうイメージは嫌われるんですかね。

**デフォルトの名無しさん** · 2024/11/29(金) 23:05:46.40

>>853
うまくいってよかった
＠予め指定するのが肝でしたから
今回は文字列固定でのコピーでしたけど、他の書式も混在になることが予想されるならコピー元の書式をコピー先に設定するようにしといてもいいかもしれません

**デフォルトの名無しさん** · 2024/11/30(土) 09:08:08.19

Int(hoge / 25)

**デフォルトの名無しさん** · 2024/12/05(木) 11:53:46.88

甲斐はいらん。巨人に来るな。

**デフォルトの名無しさん** · 2024/12/07(土) 11:24:04.60

私が作ったVBAがうまく動かないんですがどこにバグがありますか？ご教示おねがいします

**デフォルトの名無しさん** · 2024/12/07(土) 14:05:32.60

知能にバグ

**デフォルトの名無しさん** · 2024/12/07(土) 14:45:24.46

知恵袋より酷い質問だな

**デフォルトの名無しさん** · 2024/12/07(土) 17:34:43.76

だな

**デフォルトの名無しさん** · 2024/12/07(土) 18:08:11.98

>>859
あなたが低脳猿なところに問題がある。

**デフォルトの名無しさん** · 2024/12/07(土) 23:19:44.56

RubyのようにVBAを作った？

**デフォルトの名無しさん** · 2024/12/09(月) 11:28:04.58

知恵袋もそうだが、まずはソースコードを見せてもらわないと話にならん事が分からんのか？

**デフォルトの名無しさん** · 2024/12/09(月) 12:17:07.04

ネタにマジレスという愚かな事が分からんのか？

**デフォルトの名無しさん** · 2024/12/09(月) 13:00:32.05

バグバグで抜いた

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

COM考えたやつってもしかして天才なんです？
20年以上前のシステムがいまだに第一線で原液だとか

**デフォルトの名無しさん** · 2024/12/10(火) 13:23:10.76

>>868
COMファイルはMS-DOS時代の産物

**デフォルトの名無しさん** · 2024/12/10(火) 13:45:36.94

>>868
バイナリレベルのオブジェクト指向、インターフェース指向は素晴らしかったと思うよ

**デフォルトの名無しさん** · 2024/12/10(火) 15:02:21.25

>>869
メモリにそのまま展開される危険なファイル

**デフォルトの名無しさん** · 2024/12/10(火) 17:16:10.86

逆に移行を妨げてるんだろね、現行システムからの反発激しくて

**デフォルトの名無しさん** · 2024/12/11(水) 01:28:47.06

「反発激」という用語なのかと思った

**デフォルトの名無しさん** · 2024/12/21(土) 09:32:36.56

画像サイズが変わってしまい困っています。
メモの編集→コメントの書式設定→色と線タブ→塗りつぶし効果で画像を挿入しています。
サイズタブ→原型のサイズ→リセットを行うにはどうしたら良いでしょうか？

**デフォルトの名無しさん** · 2024/12/21(土) 10:48:06.83

>>868
昔の人は明らかに頭が良かった

>>872
遺構を妨げてるんじゃなくて以降がスムースに逝ってる証拠だよ

**デフォルトの名無しさん** · 2024/12/21(土) 11:27:23.27

>>874
それはVBAの話しなのか？

**デフォルトの名無しさん** · 2024/12/21(土) 13:33:30.79

>>874
画像のサイズが変わってしまった場合、元のサイズにリセットする方法についてお答えします。

1. **メモの編集**モードに入ります。
2. **コメントの書式設定**を開きます。
3. **色と線タブ**を選択します。
4. **塗りつぶし効果**で画像を挿入します。
5. **サイズタブ**を開きます。

ここで、以下の手順を試してみてください：

- **リセットボタン**がある場合、それをクリックして元のサイズに戻します。
- リセットボタンがない場合、手動で**元のサイズ**に調整する必要があります。挿入した画像の元の幅と高さの値を入力します。

これにより、画像のサイズが元に戻るはずです。もし他にもお困りの点があれば、教えてください。

**デフォルトの名無しさん** · 2024/12/21(土) 15:52:44.31

マクロでわからないことがあったらCHatGPT に聞くようになった。
すごいのは、やりたいことを書いてEXCELファイルを添付すると、マクロを組んでくれること。
問題はCHatGPT 頼りになるので、自分のスキルが向上しないことw

**デフォルトの名無しさん** · 2024/12/21(土) 16:31:15.48

>>876
>>877
上記の動作をVBAで行う方法が知りたいです
LockAspectRatio、TextFrame.AutoSize等を試しましたがうまくいきませんでした
マクロ記録もやってみましたがリセットの動作は記録されないようです
メモ内の埋め込み画像の元サイズを取得する方法ってありますか？

**デフォルトの名無しさん** · 2024/12/21(土) 21:28:57.26

自己解決しました

**デフォルトの名無しさん** · 2024/12/22(日) 16:36:05.08

昔の人ってすげぇスキル高いと思うわ。ネットや書籍が無い時代に手探りで立派なソースコード書いていたと思うとな

**デフォルトの名無しさん** · 2024/12/22(日) 16:52:27.65

Sendkeysが上手く動いてくれない。。
DoEventsも入れているのに。。

**デフォルトの名無しさん** · 2024/12/22(日) 17:09:07.17

>>882
Sendkeysは最後の手段
できるだけ使うな

**デフォルトの名無しさん** · 2024/12/22(日) 17:51:48.04

windows apiのsendkeyをdeclareして使う方が良いとか

**デフォルトの名無しさん** · 2024/12/22(日) 18:04:03.23

対象が何なのかで切り分けが必要だよ
SendInputが確実な場合もある

**デフォルトの名無しさん** · 2024/12/22(日) 18:11:28.97

やりたいことは「このエクセルファイルのこのシート上で方向キー↓を押しなさい」とマクロの定義をエクセルシート上に書いておくと、その定義どおりに動いてくれるマクロを作りたいだけなんだけどな。。

**デフォルトの名無しさん** · 2024/12/22(日) 21:26:34.16

ファイルを開いた瞬間に開始してるからシートのほうが準備できてないとかなんじゃね
知らんけど

**デフォルトの名無しさん** · 2024/12/22(日) 23:01:29.25

range("A1").select
sendkeys "{DOWN}"
でA2になるぞ
操作したいもの（例えばシート）がアクティブになってないんじゃないかと

**デフォルトの名無しさん** · 2024/12/25(水) 15:25:06.92

sendekysはpopup出てると死ねる

**デフォルトの名無しさん** · 2024/12/28(土) 00:58:35.34

そういうのは、VBAからVBSを起動して、そっちにクリッコさせるんだぜ

**デフォルトの名無しさん** · 2025/01/03(金) 18:15:22.43

変数名に漢字を使うのってどう？
使えるかもしれないけど気持ち悪いと感じる

**デフォルトの名無しさん** · 2025/01/03(金) 18:23:18.68

専門用語とか漢字の利点を感じられるなら

**デフォルトの名無しさん** · 2025/01/03(金) 18:25:04.66

業務用語は下手に英語とかローマ字にせず業務用語そのままの漢字変数
ただ頭にアルファベットの接頭辞つける

**デフォルトの名無しさん** · 2025/01/03(金) 18:45:00.49

変数に限らず、定義名やクエリー名、シート名を日本語にしておくと、
なぜかWindowsのupdateの機会でもおかしくなるときがあって、
それ以来、アルファベット表記に変えてしまった。

**デフォルトの名無しさん** · 2025/01/03(金) 18:45:23.61

Unicodeのせいかしら？

**デフォルトの名無しさん** · 2025/01/03(金) 20:26:13.30

趣味でしてるし日本語も使う

**デフォルトの名無しさん** · 2025/01/03(金) 22:04:30.99

>>893
接頭辞は型名?

**デフォルトの名無しさん** · 2025/01/03(金) 22:07:46.64

フォームを作るときオブジェクト名をそのまま使うか変更するのか悩む
後からオブジェクト名を変えるのは避けたほうがいいのはわかる

**デフォルトの名無しさん** · 2025/01/04(土) 16:29:41.54

自治体とか業務に使うの書いてると、その用語使わないとやってられない
可読性が段違い
なのでそれ以外でももちろん漢字も使う
i とかはもちろん別だ

**デフォルトの名無しさん** · 2025/01/04(土) 16:50:34.89

漢字使おうかな
使えるものは使っておけと思い始めた

**デフォルトの名無しさん** · 2025/01/04(土) 17:12:28.42

>>897
colとか適当だけどCTRLspaceのオートコンプリートで候補探すとき便利

**デフォルトの名無しさん** · 2025/01/04(土) 17:43:19.80

漢字は漢字で弊害があったような
昔それでやっぱ変な事はやめとこってなった

**デフォルトの名無しさん** · 2025/01/04(土) 21:06:46.91

>>901
CTRLspaceのオートコンプリート初めて知った
あざす

**デフォルトの名無しさん** · 2025/01/05(日) 09:58:57.13

半角でも「0」「O」「1」「l」みたいなことが漢字でも起きるからな

**デフォルトの名無しさん** · 2025/01/05(日) 10:52:44.56

名前は文字コードで一意を確保してるだろうから
観掛けが同じでも違うコードなら違う変数やオブジェクトと看做される
百害有って一利無し

**デフォルトの名無しさん** · 2025/01/05(日) 14:47:02.49

VBA漢字変数問題は決着つかないみたいね
他にもVBAで論争ってある？

警備員[Lv.1][新芽] · 2025/01/05(日) 15:11:29.01

論争はないかもしれないけど、英字の大文字と小文字を同一視するのが堪らなくイヤ
Enumで宣言したときは大文字始まりで、ローカル変数は小文字始まりにしたいときなど、同じ名前だとどちらかに寄ってしまうのがイヤ

(以下うろ覚え)
あと、Enumで宣言した識別子をタイプするとき、宣言した大文字・小文字の列(パスカルやキャメル)にならないのがイヤ
その他はたとえすべて小文字でタイプしても宣言のとおりに大文字・小文字に統一されるのに

警備員[Lv.1][新芽] · 2025/01/05(日) 15:17:04.83

Enumのときだけ、メンバをタイプすると、タイプした側に寄せて宣言側が変わってしまうような

Typeのメンバや他の変数宣言では、使用時にどうタイプしても宣言したとおりの大文字・小文字の列になる
(以上うろ覚え)

**デフォルトの名無しさん** · 2025/01/05(日) 16:23:41.91

従うことが推奨するレベルのコーディング規約などあればうれしいと思って調べてみた
最近は結構盛り上がっているとの記事を見つけた
素人としては助かるとおもった

**デフォルトの名無しさん** · 2025/01/05(日) 17:44:25.49

そんなもん丸ごとAIに投げてレビューさせりゃいいよ
VBA使い同士よりも遥かに有用なアドバイスをくれる
まあ基本的にVBAでは人間のリテラシーもコードに求められる品質も低いので、一般的なプログラミング作法の視点でAIにまともに指摘させると
逆に一般的なVBA使いのレベルでは扱いにくいようなコードを推奨してくるから、ちょっとレベルを下げるようにプロンプトを工夫する必要はあるが

**デフォルトの名無しさん** · 2025/01/05(日) 18:08:41.24

OK/NGの結果を○×で判断しようとしてオーと丸、バツとエックスが混在したり
海外のテストで正解をㇾ点、不正解に○　が書かれるとか
PSのボタンで×が決定、○がキャンセルみたいなことが起きるのが世の中

**デフォルトの名無しさん** · 2025/01/05(日) 19:12:09.31

>>911
○〇

**デフォルトの名無しさん** · 2025/01/05(日) 19:13:51.36

>>911
PS5は世界の主流派に合わせただけ
PS4までは日本人仕様をゴリ押ししていた

**デフォルトの名無しさん** · 2025/01/05(日) 19:14:56.59

「プレイステーション」、「ウォークマン」という変な英語も許容してくれたアメリカ合衆国に感謝しろよ。

**デフォルトの名無しさん** · 2025/01/05(日) 19:25:49.40

>>913
世界でも×は決定じゃないし〇も間違いじゃない
レ点と×は区別され使われてる
×が決定って文化のソースを出してくれ

**デフォルトの名無しさん** · 2025/01/05(日) 19:27:19.60

>>914
商品名に変な英語もクソもあるかよ

**デフォルトの名無しさん** · 2025/01/05(日) 20:35:02.16

MACの✕○
Winの○✕
MSの意地だね

**デフォルトの名無しさん** · 2025/01/06(月) 09:58:12.70

ワンボタンマウスなんてクソに引っ張られなくてwinに感謝してる
独立した△□三なAndroidに感謝してる

**デフォルトの名無しさん** · 2025/01/06(月) 13:18:15.88

馬鹿はMacがワンボタンマウスだと思ってる

**デフォルトの名無しさん** · 2025/01/06(月) 13:37:03.49

ハゲもMacがワンボタンマウスだと思ってる

**デフォルトの名無しさん** · 2025/01/06(月) 13:56:37.51

2000年過ぎてもワンボタンだったなんてバカ過ぎるw

**デフォルトの名無しさん** · 2025/01/06(月) 14:13:55.27

>>921
馬鹿はまだ気付かないのかよ

**デフォルトの名無しさん** · 2025/01/06(月) 19:49:43.48

>>922
ニホンゴワカラナイ奴は絡んでくるなよw

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

アップルは間違いに気づいて
ウィンドウズと同じ方式にした
あれだけこき下ろしてたのに

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

現行マックのマウスは言わば無限ボタン
表面全体がセンサーでタッチパッドぽく使えるようになってる
これに慣れると普通のホイールマウスが不便すぎて使えなくなる

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

>>925
無限ボタンｗ
信者って面白いこと言い出すな

**デフォルトの名無しさん** · 2025/01/08(水) 09:45:47.27

無限ぷちぷちシートを思い出した

**デフォルトの名無しさん** · 2025/01/09(木) 12:38:58.06

そしてすぐ忘れる

**デフォルトの名無しさん** · 2025/01/09(木) 16:04:35.97

最近Excel関連スレはどこも過疎すぎ。みんなどこに飛んだ？

**デフォルトの名無しさん** · 2025/01/09(木) 17:29:47.26

>>929
回答してくれるExcelの神様たちが
ハゲたり死んでしまったんじゃないか?

**デフォルトの名無しさん** · 2025/01/09(木) 19:48:52.41

AIに聞いてるんじゃね？

**デフォルトの名無しさん** · 2025/01/09(木) 19:57:46.66

AIはアカン。回答に魂が籠もっていないから。
やっぱりこのスレの回答者みたいに喜怒哀楽感情全開な回答が良い。

警備員[Lv.4][新芽] · 2025/01/09(木) 20:07:46.11

>>932
そのとおり
あと、VBAで業務を自動化するのは真心がこもってないし、一生懸命手作業している人のことを思い遣って控えるべき

**デフォルトの名無しさん** · 2025/01/09(木) 21:08:18.79

>>933
同意。
それから、エクセルで書類を電子化して画一化するのは冷たい印象を与えるから、手書き書類の暖かみを改めて考えるべき。

**デフォルトの名無しさん** · 2025/01/09(木) 21:34:09.45

>>933,934
つまんね

警備員[Lv.6][新芽] · 2025/01/09(木) 21:40:57.86

>>935
君、なかなか見所があるぞ

**あれ？** · 2025/01/09(木) 23:47:00.74

>>932
いちいち感情なんか込めんわアホ

**デフォルトの名無しさん** · 2025/01/09(木) 23:51:59.37

デジタル行財政改革ということか

**デフォルトの名無しさん** · 2025/01/10(金) 22:59:39.20

>喜怒哀楽感情全開
ディスられて完結するのがなw

**デフォルトの名無しさん** · 2025/01/13(月) 14:21:57.39

Copilotに作って貰ったマクロが誤ってPERSONAL.XLSBにシートを追加してしまったSheet*の解放がグレイアウトしていて消せない

**デフォルトの名無しさん** · 2025/01/13(月) 14:34:32.42

>>940
GUIで消せなくなってもマクロを使えばたいがい消せる

**デフォルトの名無しさん** · 2025/01/13(月) 14:47:05.26

>>941
Workbooks("personal.xlsb").Sheets("Sheet1").Deleteでいけた

**デフォルトの名無しさん** · 2025/01/13(月) 14:56:52.88

最後のシートだけは削除できないっぽい

**デフォルトの名無しさん** · 2025/01/13(月) 16:42:45.15

個人用マクロブックのシートは元々非表示になってるだけ
なんらかの理由で非表示が解除されるとそうなった様に見える
表示→ウインドウグループ→表示しない
そのあとファイル閉じる操作で保存すれば元に戻る

**デフォルトの名無しさん** · 2025/01/13(月) 18:41:32.17

全部のシートを削除するのはブックの削除と違うのか？

**デフォルトの名無しさん** · 2025/01/13(月) 19:14:38.54

もうパソコンを下取りに出せよw

**デフォルトの名無しさん** · 2025/01/13(月) 22:57:41.44

イズアドインがトルーにでもなってるんジャマイカ?

**デフォルトの名無しさん** · 2025/01/14(火) 01:46:39.36

一枚くらいシート残っててもエエやろ
ちなみにオプションやパーツ置きに使ってるけどな

**デフォルトの名無しさん** · 2025/01/14(火) 06:32:04.78

そうすると他のブック開くときにいちいちpersonal.xlsxのワークシートも表示されかなりウザくなる

**デフォルトの名無しさん** · 2025/01/14(火) 17:12:36.65

>>949
>>944

**デフォルトの名無しさん** · 2025/01/14(火) 17:14:06.12

個人用マクロ便利なのに使ってない人多いのかもね