Excel VBA 質問スレ Part79(ﾜｯﾁｮｲあり)

2023/01/28(土) 12:12:12.41

!extend:checked:vvvvv:1000:512
!extend:checked:vvvvv:1000:512
↑同じ内容を3行貼り付けること

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

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

※前スレ
Excel VBA 質問スレ Part77
https://mevius.2ch.net/test/read.cgi/tech/1658009255/
Excel VBA 質問スレ Part78
https://mevius.2ch.net/test/read.cgi/tech/1667104996/

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

2023/05/28(日) 22:26:37.23

カスタムなんかしてないよ。
推奨が150%なんだわ。
会社で支給されたノートPCがフルHD、
自分が持ってるサブモニターが4Kなのでそんなことになってる。
しょうがないから4Kの方を100%にして合わせてるんだけど、んまー文字が小さいこと。

2023/05/29(月) 07:42:06.26

>>371
高解像度PC使ったことなさそう
Surfaceなんかもデフォルト150%だぞ

2023/05/29(月) 10:35:10.47

どーもすいませんでした　ボタンが押せないとかいう症状から勝手に憶測で書きました
じゃあ4KでExcel側を400%とか500%とかにしてもボタン押せない？
押せるような工夫が必要なんだから、押せる方のモニタ使うのとは別の解決が必要なんだろうし

2023/05/31(水) 07:32:30.31

🐈

2023/05/31(水) 08:49:25.09

すごーく初歩的な事を聞いて申し訳ないですが
エラーが発生した時にどこで発生しているのか、どこで処理が止まっているのかを必ず表示させるにはどうしたらいいでしょうか？

2023/05/31(水) 11:31:20.55

>>376
VBEを開けばエラーの場所が黄色くなってるはずだけど、そのVBEを開く作業まで自動化したいって質問ならそれは不可能

2023/05/31(水) 12:41:48.22

プログラムが正常に動かないからエラーがでる
入力ミスなら入力時チェックを入れればいい

2023/05/31(水) 12:43:14.88

on error ～もあるか

2023/05/31(水) 16:14:37.52

>>376
エラー処理を何も書かない。
そうすれば実行した際に
エラーが発生した箇所が黄色くなって止まっているはず。

エラー処理を付けたいのであれば、
エラーが発生した際の表示文言に
エラー内容、モジュール名、関数名等を
記載するようにする。
コードの何行目で発生したのかは
以前色々試したことがあったけど
結局上手く出来なかった。

なのでエラー行を捕まえることが出来たら
その方法をむしろこちらが教えて欲しいくらい。

2023/05/31(水) 19:46:37.97

度々すみません
mac os でsaveusメゾットを実行するにはファイル毎にアクセス権を付与する必要があると聞いたのですが本当なのでしょうか？

2023/05/31(水) 19:55:27.32

>>381
saveusじゃなくてSaveAs
メゾットじゃなくてメソッド

2023/05/31(水) 21:42:18.20

Application.Wait (Now + TimeValue("0:00:05"))でデータを随時取得すると
その間、エクセルでほかの作業が出来ないことが困っています。
他の作業をやりながらデータを定期取得する方法はありますか？

2023/05/31(水) 23:30:04.64

>>383
Excelだけでは同時進行は無理
Googleスプレッドシートとか別の方法と組み合わせるしかない

2023/06/01(木) 08:10:10.71

>>384
無理ですか。別でPC使用してやってみます。
ありがとうございました。

2023/06/01(木) 08:24:47.14

alt押しながらExcelを別インスタンスで起動すればできるんじゃね

2023/06/01(木) 16:19:44.21

じゃね　じゃなくてできるけど、誰かさんが嘘を回答してしまったので、質問者は去ってるな
同じファイルだと読み取り専用に成っちゃうけど
活発なスレならすぐさま誰かがいちゃもん付けてくれるけど、寂れてるとそれも叶わない
そんなのが繰り返されると雪だるま式に過疎ってしまう　諸行無常って奴か
アホの子が建ててる方のスレだと雑談だらけだけど、稀にまともな質問回答も混ざって来る　こちらを活性化すべき

2023/06/01(木) 19:57:38.15

>>386
>>387
まだいます。
別インスタンスというワードを初めて聞きました。
ググってみたら色々出てきたので調べてみます。
分からないことがあればまたお願いします。ありがとうございました。

2023/06/01(木) 20:41:09.09

>>388
別インスタンスはタスクマネージャ見るとわかるけどExcel.exeを複数起動する話
普通はブックをダブルクリックなんかで開くと1つのプロセスで複数ブック開くからブック間のシート移動なんかができるけど
複数のプロセスになるとそれができない
それとダブルクリックで開くとWait中のブックで開こうとしたりするから開くときはファイルを開くで開かないとだめとか注意が必要
まあVBAの話というよりExcelそのものの話だからソフトウェア板のExcelで聞いたほうがいいかもね

2023/06/01(木) 21:47:01.00

相談されたのでここで相談させてください。
毎日製造部の自動画像判定機のデータが3000枚くらいjpgで排出される
OK、NGの判定をjpgのデータ名に取得してくれればまだいいのに
まさかのこっちは判定するだけ、こっちは写真取るだけという連動してないゴミ仕様
jpgは日付時刻のみ、
抽出やふるい分けをするのに
画像の特定の部分の色が赤か緑かでRGB処理させるのは化石すぎるかな？

素直にpythonや他のツール使うべき何だろうけどVBAで何とかしてきたおじさんだから今更新しいのは頭に入らない、、

2023/06/01(木) 22:04:21.98

そうね
excelには.Netで言うBackgroundWorkerみたいな機能がないからマルチスレッド処理みたいなのやるにはちょい頭使わないといけない。
比較的お手軽なのはVBS立ち上げてそっちから今開いているお目当てのEXCELに書き込んでやることかな？
VBSなら文法はVBAと一緒だし、変数はスカラー変数だったりVBAみたいにトレースが出来なかったりとかちょい面倒な面もあるけど、
こなれた言語だからググれば方法はすぐ出てくると思うよ。

2023/06/01(木) 22:25:20.11

>>390
その自動画像判定機メーカーお薦めのアプリとかあるんじゃないのか？　新旧メーカー雑多に混在してるとか？
毎日3000枚を一枚ずつシートに読み込んで判定してくとか考えてる訳じゃあるまい？
そもそも、NGをその場でハネるために撮影してるんじゃないのか？　OK・NGまとめて流して、後で画像で判定？
非効率も甚だしい　社長に直談判して専用アプリ入れるのが長期的な目で見ても賢明
　あと、出来もしないことは請けないように　まだ相談の段階だからいくらでも断れる

https://vbasokkou.dokkoisho.com/bmp.html
https://vbaexcel.slavesystems.com/vba/?p=404
https://mamesand.com/image/image_processing_j.html　こういうのに目を通して容易に理解できそうなら引き留めないが

2023/06/01(木) 22:36:33.54

>>390
相談相手がお前しかいない会社なの？

2023/06/01(木) 22:46:12.33

VBAしか知らないような半端な知ったかに業務システムを組ませるとロクなことはない

2023/06/01(木) 22:52:25.93

>>390
残念ながら君には無理
引き返す勇気も必要

2023/06/01(木) 23:42:56.50

>>392
ありがとう
これ使えるわVBAでいけると確信

2023/06/02(金) 11:45:15.15

待て待てw　あくまでもVBAで画像ファイルを扱うサンプルってだけだぞw
実務に載せるにはこれを踏まえたうえでとんでもない工数必要なのを、この時点で予想できんのか？
日に3000枚だろ？　まあ、やりたきゃどうぞだけど、またこれでひとつの企業の発展が遠退くわ

2023/06/02(金) 12:55:53.88

VBAしかわからんくせに自信を持ってるような奴に何を言ってもむだ

2023/06/02(金) 13:47:19.23

＞化石すぎるかな？
質問はこれなんだからYesかNoを返してやればいいんじゃね
VBA自体は化石言語（ツール）でもなんでもないからNoだろ

そもそも今までどうやって（どの程度の時間で）3000枚/日のjpegを処理してたかわからんけど
それが大幅に改善できるならなんでもいいんじゃね

2023/06/02(金) 14:21:36.48

いや、今まで作ったプロシージャと応用したら出来たわ
社内での正式運用するソフトの提案は情シスに投げといた
自部内の常用してない共用パソコンで動かしたらいつの間にかふるい分け全部出来てた
最適ではないけどVBAおじさんでいいわ

2023/06/02(金) 15:10:31.04

実は優秀だったってことかなw

2023/06/02(金) 16:20:00.31

いや、実験レベルなら組めても実務で使うのとはことなる
そもそもエクセルなんか使ってはダメな例

2023/06/02(金) 16:36:38.41

よく見ろ　自演だ　しかもどーせ成りすまし
例示のリンク先も自分で見付けられないようなレベルで、教えられた翌日、半日で仕上げられる訳も無い
情シスに投げた？　情シスの仕事は？w　VBAロートルじじいに相談して、そ奴がこしらえたVBAをベースに
開発するのがお仕事か？　社内から要望 → 情シス → じじい → 情シス　なんちゅう経路だっつーの　そら、ITも衰退する訳だ

2023/06/02(金) 17:13:27.84

>>403
確かに自演だな
こういう奴が一番厄介
まあ、困るのはこんなのの言うことを信じる会社だからな
こうやって日本の品質が落ちていく

2023/06/02(金) 17:54:53.55

え？自演？そもそもどれが自演なんだ…
まさか>>402の人が書いた皮肉レスを文面通り受け取ってるのか…
トヨタグループティア1の品管だけど
情シスなんて社内の部署の細かい要望なんて聞いちゃくれんぞ
情シス仕事はこっちが聞きたいわ
勤怠システムや文章システム管理してるぐらいだぞ
中小は知らんが、自演なぁ…変なの

**401** (ｱｳｱｳｳｰ Sa8f-Nnh9) · 2023/06/02(金) 18:34:08.20

同じauだが別人な

2023/06/02(金) 18:40:49.45

問題解決に至るレスも満足にしないくせに難癖だけつける奴がこのスレ多すぎだよな
お前の方がスレの中で見たら無能なんだぞってわかれって感じ

2023/06/02(金) 19:28:50.89

触らない方が良い
触って貰うと嬉しくなって繰り返す、
話し相手のいないおじいちゃん達だから

2023/06/02(金) 20:39:35.69

>>408
女子高生かもしれんだろ

2023/06/02(金) 21:27:52.13

お願いします。
今日の日付を取得し、A列から一致する日付を探したいのですが上手くいきません。
表示形式を画像のように mm/dd(aaa) としているのが原因のようですが変更方法がわかりません。
ttps://i.imgur.com/yryvsxM.png

currentDate = Date

Set foundCell = ws.Range("A1:A" & lastRow).Find(What:=currentDate, LookIn:=xlValues, LookAt:=xlWhole)

2023/06/02(金) 21:51:56.45

>>410
Set foundCell = ws.Range("A1:A" & lastRow).Find(What:=DateValue(currentDate), LookIn:=xlFormulas, LookAt:=xlWhole)

2023/06/02(金) 22:21:57.45

>>411
出来ました。ありがとうございます。

2023/06/04(日) 20:38:17.04

初歩の質問ですが、シート増やしたりするマクロ組むと一瞬画面がガチャガチャして結果が表示されるんですが、何かバックで動作して結果だけ表示される方法はないですかね？

2023/06/04(日) 20:41:35.88

アプリケーションスクリーンアップデーティングファルス

2023/06/04(日) 20:56:59.39

>>414
ありがとうございました！できました。スッと表示されるようになりました。

2023/06/04(日) 21:02:56.12

>>414
ファルスってなんだ？滅びの言葉か？

2023/06/04(日) 22:08:59.86

falseをファルスと読む文化かな
nullをヌルと読むみたいな

2023/06/04(日) 23:43:18.94

>>416
滅びよ画面更新！という呪文

2023/06/05(月) 20:11:28.00

昔にこのスレかExcelスレか忘れたけど、フォルズなのかファルスなのか軽く揉めた事無かったっけ？

2023/06/05(月) 20:36:58.07

Appleをアップルなんて読むのはダサいみたいな？エポゥってか

2023/06/05(月) 20:40:41.18

ダークファルス「また俺かよ」

2023/06/05(月) 22:29:42.89

[　false　読み方　] Google

フォールス、またはフォルス

2023/06/06(火) 10:26:40.88

Elseも揉めた記憶
エルスと呼んでいる

2023/06/06(火) 10:51:50.21

それはw　小学生の英語ぢゃねーか　どうやったら間違えるんだ
独仏伊蘭どの言語でも無く英語でしか使わないってのに　耳文字でエウスってか？　それ言い出したら全部違うけど

2023/06/06(火) 12:26:16.59

あえて初心者のまねしてるだけだし

2023/06/06(火) 13:24:20.68

>>420
ウィンドウズωもかなり恥ずかしい表記

2023/06/06(火) 13:25:24.97

>>422
warning 読み方

2023/06/06(火) 13:36:23.12

Warning incoming missile!
ウォーニンインカミンミッソー！
で覚えた

2023/06/06(火) 13:56:33.46

Countif＝コウントイフと言ってるようなもんか？？

2023/06/06(火) 19:20:42.66

なかなか俺のファルス発言で盛り上がってるじゃないか

コンピューターに英語で話しかけてるわけではなく、所詮記号なんで覚えやすいファルスで頭の中は統されてるわ

それに Falseって普通の文章や会話で使ったことないし、フォルスを使わなくて困ったことないわ

2023/06/06(火) 21:23:43.30

兎に角
なんだかよくわからない
長ったらしい英単語は
アイエニューメラブルってよんどけ

2023/06/06(火) 21:43:42.66

https://www.youtube.com/watch?v=3H4y5ExBofk

2023/06/06(火) 22:03:14.44

>>430
托

2023/06/07(水) 00:19:01.88

>>433
？

2023/06/07(水) 01:40:06.04

托
ｷﾓ
キモ

2023/06/07(水) 12:26:38.14

旧中山道＝いちにちじゅうやまみち

2023/06/07(水) 12:43:49.08

>>435
ありがとうそういう意味だったんですね

>>433
托をキモと読ませるのはFalseをファルスと読む100倍斜め上いってるとおもわんかい？
まあそのあたりに気づくほどのオツムがあれば433のような書き込みはしないだろうけどな(笑)

2023/06/07(水) 16:57:56.82

ﾜｯﾁｮｲなしスレから誘導されてきました

t検定で「範囲」にCOUNTIFやAVERAGEIFみたいな感じで対象とするセルをIF指定することはできませんか？
検定したい群を最初から整列して2群に分けておく必要があるでしょうか？

2023/06/07(水) 18:47:39.61

それのどこにVBAが？

2023/06/07(水) 19:53:14.11

>>438
WorkseetFunction使ったらいかんの？

2023/06/07(水) 23:28:59.63

>>438
ここは何のスレかわかってる？

2023/06/08(木) 03:12:22.48

そもそもt検定なら元データが2群でないと成り立たないだろ

2023/06/08(木) 11:10:53.59

>>437
キモいのはファルス自体じゃなくそういうところ

2023/06/08(木) 19:34:47.21

みんなは重複をなんと呼ぶ？
ちょうふく？じゅうふく？

2023/06/08(木) 19:40:21.93

かさかさ

2023/06/08(木) 19:41:37.46

昔はじゅうふくって言ってた
今はまちまち

2023/06/08(木) 19:41:38.42

仕事を引き受ける時には
今までした事のない事、やった事のない事、実績のない事は
「やった事がないので出来ません」
とハッキリ言って断るべきなんですよね？

2023/06/08(木) 19:41:52.90

>>443
苦しいな

2023/06/08(木) 19:42:49.87

>>444
スレ違い
漢字について語るスレ 2
https://lavender.5ch.net/test/read.cgi/gengo/1534748118/

2023/06/08(木) 19:46:13.14

>>447
やったことないということは伝えるべきだが、断るべきかどうかは違う

2023/06/08(木) 19:53:15.66

>>448 托過ぎて草

2023/06/08(木) 19:57:37.22

>>451
ID 変えてもワッチョイで身元バレバレの托托ちゃん(笑)

2023/06/08(木) 20:00:05.44

>>450
職場の私よりお偉いさんたちは
出来もしない事はするな
とか
できるのか出来ないのかわからない事はできると言うな
とか
出来ると言って出来なかったら嘘つきとか詐欺師とか
そんな事を言ってきます
なのでやった事のない事、実績のない事は　やるな
という事なのだと理解しました

どうして未経験者に経験や実績が最初からあるのでしょうね

会社は学校じゃないらしいです

2023/06/08(木) 20:11:07.38

>>453
仕事頼まれて内容を確認しないでこんなの簡単とかすぐできるとか言う奴もいるからな
そのつもりで頼んだのに後になってうまく動かないとかなったら上司の責任問題になる

2023/06/08(木) 20:19:16.31

>>454
私はそう言う事が初めての経験で全く何が何だかさっぱりわからなくて理解が出来ていません

それを言うならば未経験の事はするな、引き受けるな、出来ると言うな
という話になると思います
それにOJTとはなんですか？

2023/06/08(木) 20:20:21.37

あなたが欲しい答えはこうでしょう。
誰々が断れと言ったので断ります。

2023/06/08(木) 20:28:49.61

私は今まで働いてきて聞いた限りの話では
出来ない事を安請け負いするな、仕事だから
みたいな話なのでこれからはやった事がない事は全て断ろうと思います

2023/06/08(木) 20:33:09.84

>>452
セルラー通信だから勝手に変わってるだけで、
ID:Snmtqfef0とID:Wxh+dghv0みたいな丁寧な自演と比べちゃダメでしょｗ

2023/06/08(木) 20:55:57.80

>>458
日付が変わってるから ID が勝手にしろ変わるだけでそれを自演と言われちゃな
やっぱ妄想がひどいわ(笑)

2023/06/08(木) 21:21:22.44

>>457
もし何もできないのであれば全ての仕事を断ればいい
それで給料もらえるのかは知らんが

2023/06/08(木) 21:30:46.15

>>460
出来ない事やわからない事を出来るというな、とか引き受けるなとか言うなら
何にも引き受けられませんよー

2023/06/08(木) 22:17:36.82

>>461
俺はできる側だから関係ない

2023/06/08(木) 23:03:31.49

>>462
素敵🥹

2023/06/09(金) 01:41:19.35

出来るか出来ないか分からないときは調査費用見積もればいい
身内相手でも時間くれでいい
話通じないならもう無理でええやろ、次に行く

2023/06/09(金) 07:51:36.36

>>459
遠回しに言っても理解できないみたいだから丁寧に言うと、
> なかなか俺のファルス発言で盛り上がってるじゃないか
匿名掲示板で自己顕示欲を発露させてるのがまずキモい
それも誇れるどころかむしろ恥である読み間違いにおいてってところがまたキモい

> コンピューターに英語で話しかけてるわけではなく、所詮記号なんで覚えやすいファルスで頭の中は統されてるわ
>
> それに Falseって普通の文章や会話で使ったことないし、フォルスを使わなくて困ったことないわ

誰も聞いてないのに間違いの言い訳始めるのがキモい
角行間に改行入れてるのがキモい
隙あらば自分語りがキモい
それらを踏まえた上での托
要するに間違いそのものより精神性が気持ち悪い

2023/06/09(金) 07:55:56.79

やったとこがない仕事を勉強してやる事さえ否定的な考えの人たちが世の中には多いみたいなので
やった事がない事は何もするべきではないのでは
私が色々聞いた話の理解では、例えば医療従事者は例えどんな些細なミスでも許されない、という様な話でした

2023/06/09(金) 09:06:25.43

>>465
本当に全部しょうもない理由で他人をキモ呼ばわりしてるわけだ
その偏狭な精神性がキモいわ
NG 登録しとくからさよなら

2023/06/09(金) 10:51:38.01

>>466
仕事しない会社員は会社辞めるしかないんじゃね

2023/06/09(金) 11:22:56.72

ワッチョイなしもありも雑談スレに成り下がってほんと不快だな
どういう生き方したらこんなゴミみたいな人間出来るんだろ

2023/06/09(金) 11:35:57.88

雑談専用スレ立てるとか言って何年経つんだよ？

2023/06/09(金) 12:37:16.30

雑談スレを作っても誰も使わないから無駄
ここの惨状を見てみ

【質問不可】Excel総合相談所スレの雑談・議論スレ5
https://mevius.5ch.net/test/read.cgi/bsoft/1624005735/

2023/06/09(金) 14:23:04.85

簡単なユーザー定義型（2～3値を格納しておくだけの構造体）をtypeじゃなくクラスで作って、dictionaryオブジェクトのitemに9万個ぐらいインスタンスを紐付けたら、
コード終了時のオブジェクト解放にめちゃくちゃ時間がかかるようになった（数十秒）
やっぱこういうときは配列にするしかないのかな？