- 1 名前：デフォルトの名無しさん [2023/01/28(土) 12:12:12.41 ID:UjlIZ1Ov0.net]
- !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
- 321 名前：デフォルトの名無しさん (ﾗｸｯﾍﾟﾍﾟ MM7f-zI38) mailto:sage [2023/05/15(月) 09:43:33.62 ID:aWbkU9SeM.net]
- Excelじゃ無理
- 322 名前：デフォルトの名無しさん (ｽﾌﾟｰﾌﾟ Sd1f-kDbr) mailto:sage [2023/05/15(月) 10:32:40.13 ID:TS5z6+d2d.net]
- >>317
.exe叩くことすら不可能なら諦めろ
AutoHotKeyはAS/400のターミナル操作で右ctrl無いノートPCで右altで右ctrl操作したり、
テンキーがないノートPCでてんきーのEnter押下操作したりした実績がある
- 323 名前：デフォルトの名無しさん (ｱｳｱｳｳｰ Sa67-0O/8) [2023/05/15(月) 11:57:22.16 ID:SjuerCeea.net]
- 上司にできませんって言うのも勇気
- 324 名前：デフォルトの名無しさん (ｽﾌﾟｰﾌﾟ Sd1f-kDbr) mailto:sage [2023/05/15(月) 12:25:24.97 ID:hNhS+OV4d.net]
- >>317
どうしてもVBAでやりたいならWin32APIのkeybd_event関数使え
さっき言ったPRTSCでスクショできない問題も解決できてるから、
恐らくターミナル操作もできると思う
- 325 名前：デフォルトの名無しさん (ﾜｯﾁｮｲ a32d-Q5z4) mailto:sage [2023/05/15(月) 13:00:05.62 ID:Rm921WLC0.net]
- コレ(>>315)は仕事の話だけど、別に上司に言われてやってるんじゃなくて、仕事の効率を上げる為に自分が勝手にやってるだけ。
俺はExcelを使ってるけど、他の人は画面を見て手打ちしたり紙に書き写したり、何なら電卓叩いてる。
で、今は会社のシステムのマクロ(Excelで操作を記録するのと同じ様なモノ)にEntを登録して、画面上部にあるそのアイコンをVBAでマウスを操作してクリックすると言う、無理矢理なやり方でやってる。
やっぱりWin32APIでやってみるかな。
みんなありがとう。
長文でスマン。
- 326 名前：デフォルトの名無しさん (ﾜｯﾁｮｲ 13da-Np+b) mailto:sage [2023/05/15(月) 13:53:06.37 ID:+mRHKUjh0.net]
- いくつか疑問が ：
(黒バックに緑の字)で“数字→Ent”で画面表示を切り替えて行く ここは実際のキーを叩いてる？
ユーザーフォーム上とかの数字をクリックしてEnterボタンとかを押してる？
“｛ENTER｝”でも“~”でも ENTERには｛｝付けてるのに ～には｛｝付けないのは単なるタイポ？
(黒バックに緑の字) それってPower Shell とか コマンドプロンプトとかで無くて？
どうしてもSendkeyでEnt(テンキー側)が押せない テンキー側である必要は？ メインのENTERキーが押せれば充分なのでは？
- 327 名前：デフォルトの名無しさん (ﾜｯﾁｮｲ 6393-kDbr) mailto:sage [2023/05/15(月) 14:07:11.48 ID:hcGmEYCb0.net]
- >>323
一部のターミナルエミュレータ（IBM iSeriesとか）ではテンキーのEnterとテンキーではないEnterや、
右ctrlと左ctrlなんかに別々の動作が割り当てられてるからでしょ
PSやコマンドプロンプトなら別の動作ではないし、
画面の配色もデフォルトで黒地に白文字でわざわざ変えるとも思えない
- 328 名前：デフォルトの名無しさん (ﾜｯﾁｮｲ 13da-Np+b) mailto:sage [2023/05/15(月) 14:27:07.62 ID:+mRHKUjh0.net]
- あぁ、「会社のシステム」ってのが別にあって、他の社員はその画面上だけで処理してるけど
相談者はそこに別途起動したExcelでキー操作したい ってことか？
だからメインのENTERキーとテンキーのENTERキーは区別して使いたいと？(メインだとベースのシステム側が
反応しちゃうから とか) 結構無理やりな使い方のような
Sendkeysはプレーンの状態しか想定してないような もうひとつのシステムとのアクティブが問題とか？
https://learn.microsoft.com/ja-jp/office/vba/language/reference/user-interface-help/keycode-constants
Sendkeysはやめて、ここのキーコードでコード書いた方が安全安心なような
- 329 名前：デフォルトの名無しさん (ｱｳｱｳｳｰ Sa67-0O/8) [2023/05/15(月) 15:18:05.10 ID:n5uW0pS1a.net]
- >>322
指示されたとか業務を請け負ったわけでもなく
自力でできない改造を勝手にやって周りに困ってるとか言い出してるのね
他に優先する仕事無いの？
- 330 名前：デフォルトの名無しさん (ﾜｯﾁｮｲ a32d-+/XS) [2023/05/16(火) 13:42:46.21 ID:eYLYq0u20.net]
- >>315です。
もうSendkeys以外でやろうと思っていましたが、323さんが疑問を持ったままだとモヤモヤするでしょうし、一応返信しておきます。
注意：長文・駄文になるので、興味の無い方は無視してください。
(レスアンカーが多過ぎたので、レス番号のみにしています。)
まず会社のシステムをソフトウェア名で検索したら、まさに324さんが言っているモノでした。
今やっているのは、その操作をExcel_VBAからSendkeysで叩かせてメニューを操作し、必要なデータをExcel側に持って行って処理しようとしています。
(会社のシステム上では、現状その処理が出来ない為。)
主に毎日出るデータから必要な数値を関数を使って抜き出して計算する為です。
現在その作業をやっている人があまりにも時間が掛かり過ぎていて、作業効率をUPする為にやっています。
(画面上の数値を目視で探して紙に書き留め、電卓で計算してExcelに手入力すると言うアナログな方法です。)
テンキー側のEnterが押せない以外は出来ていて、作業時間は1/3の以下に出来ました。
自分も323さんが325で言っている様に、無理矢理な使い方(特にEnterの入力法)をしているとは思っています。
もう一度調べ直して、325のリンクのキーコードに切り替えてみます。
ありがとうございます。ヒントになりました。
- 331 名前：デフォルトの名無しさん [2023/05/16(火) 16:04:00.86 ID:/kT0iQ0Cd.net]
- 無知な人は無知だから解決方法のアプローチすら間違う
IBMのCOMオブジェクトがあるだろ
- 332 名前：デフォルトの名無しさん [2023/05/16(火) 16:15:00.01 ID:/kT0iQ0Cd.net]
- 少し囓ったレベルでそもそも何を使ってるかすらわからなかったようなレベルの奴が変に弄くり回すなよ
- 333 名前：デフォルトの名無しさん mailto:sage [2023/05/16(火) 17:06:14.83 ID:3pcpoJhK0.net]
- 無知は恥じることじゃ無い 怯むことでも無い 懸命に解を見付けようとするのは悪いことでも無い
ただ、敵(IBM iSeriesとか)の壁は高そうだ 敵を知り己を、って奴が遠回りでも結果的には近道なのか
IBMのCOMオブジェクトというヒントだけでゴールに辿り着けそうなら進んでもいいかも知らんし(やめとけ)
エミュレータで運用しなきゃいけないほど投資も出来ず利用者も不平不満を言えないような環境なら
それ壊したら損賠しきれない被害になるだろうから、ヘタに横からアドバイスも出来ないんだな(やめとけ)
結論はいぢくりまわすのはやめとけ てことで
- 334 名前：デフォルトの名無しさん mailto:sage [2023/05/16(火) 18:47:42.45 ID:KioSfVLt0.net]
- >>330
> エミュレータで運用しなきゃいけないほど
今時ダム端末なんて使ってるところ無いよ
というよりそもそも作ってすらないでしょ
それともサーバを直接叩けっていう意味？
知ったかぶりでマウント取るより素直に質問や礼ができる>>327の方が将来性があるよ
- 335 名前：デフォルトの名無しさん mailto:sage [2023/05/16(火) 22:45:00.74 ID:3pcpoJhK0.net]
- いや、>>324が例をあげて質問者が「それだ」っつーから「なにそれ？」でググったら
https://ja.wikipedia.org/wiki/IBM_i#/media/%E3%83%95%E3%82%A1%E3%82%A4%E3%83%AB:Ibmi-main-menu.png
こんなんが出てきて、そういやどっかで見掛けたことあるな、とか思って、これだとフル画面だけど別途Excel開けるだけの
スペースが画面上にある様子だし、ターミナルエミュレータって書かれてるし「いぢるな」に成ってもおかしくないだろ？
Win11でもWindows3.1のゲームが出来る(どころかスーパーマリオまでできる)
https://archive.org/details/softwarelibrary_win3_games みたいなもんだろ(ちがうか)
リモートデスクトップやTeamViewerみたいに、キーボード操作もマウス操作も別画面に吸い込まれる みたいなもんだろ 違うのか？
- 336 名前：デフォルトの名無しさん [2023/05/16(火) 23:38:51.78 ID:3Jn4PeXnM.net]
- そもそも開発環境が用意されてるわけでもなく本番環境でやろうとしてるのは明らかだろ
それも無断で
- 337 名前：デフォルトの名無しさん (ﾜｯﾁｮｲ 835f-3DBk) mailto:sage [2023/05/17(水) 01:30:45.81 ID:XWrmBJfr0.net]
- >>332
無知は恥じることじゃ無い
- 338 名前：デフォルトの名無しさん (ﾜｯﾁｮｲ 1310-bKQp) mailto:sage [2023/05/17(水) 03:34:15.76 ID:dtCX3F+n0.net]
- ここ何のスレだ？(笑)
- 339 名前：デフォルトの名無しさん (ｽﾌﾟｰﾌﾟ Sd1f-kDbr) mailto:sage [2023/05/17(水) 08:10:58.74 ID:4R4WjBjgd.net]
- >>332
全然違う
ググらなきゃ分からない程度の知識でマウントかよ
- 340 名前：デフォルトの名無しさん (ﾜｯﾁｮｲ 13da-Np+b) mailto:sage [2023/05/17(水) 10:40:39.29 ID:edeIW3zk0.net]
- マウントマウントうるせーよ 何でもマウントだと思うその僻み根性直せよ
どこがマウントなんだよ 忠告っつーんだろが 引き留めてんだ
つまんねコト書いてねーで、知ってんなら対策と傾向教えてやれや できねんか？
- 341 名前：デフォルトの名無しさん (ﾗｸｯﾍﾟﾍﾟ MM7f-zI38) mailto:sage [2023/05/17(水) 10:51:01.19 ID:ayW9U2wIM.net]
- 改行とエンターキー別にほしいよねー
あとバックタブも必要だわ
- 342 名前：デフォルトの名無しさん (ｽﾌﾟｰﾌﾟ Sd1f-kDbr) mailto:sage [2023/05/17(水) 11:41:51.42 ID:8WDvU+6md.net]
- >>337
無知は恥じることじゃ無い
忠告の前提が間違った知識あるいは勘違いに由るものなら
その忠告は間違っているかもという自認はしておくべき
俺は自分の環境（iSeriesの前身AS/400、ターミナルエミュレータはiSeriesと同じ）で使えたAHKって代替策と、
Win32API叩けばできるって代替策案内した
あなたはマウント取ろうとする以外に何かしたっけ？
- 343 名前：デフォルトの名無しさん (ﾜｯﾁｮｲ 13da-Np+b) mailto:sage [2023/05/17(水) 12:45:51.36 ID:edeIW3zk0.net]
- どこをどう読んでも新人のヒラ社員(歳が若いかどうかまではわからんけど)が悪戦苦闘してる風 と、
方や、それなりに業務をこなしてきただろう人物が経験則を元に導き出した解で効率化を成し得た のと、
そういう読み方をしたんで、やめとけ・無理すンな、と
そのAHKとかWin32API叩く方法が、左程メインのシステムに影響を及ぼさず問題無く解決できる手段だとするなら
相談者もそっちにすがった方がいいんだろう どちらを選ぶかは相談者次第 とりまkeycodeのリンクは貼った
- 344 名前：デフォルトの名無しさん mailto:sage [2023/05/17(水) 13:12:55.03 ID:Ga
]
- [ここ壊れてます]
- 345 名前：5ufIzN0.net mailto: 今来てよくしらんけど、ExcelでRPAもどきなんてするもんじゃねえなと思いましたまる []
- [ここ壊れてます]
- 346 名前：デフォルトの名無しさん mailto:sage [2023/05/17(水) 13:35:49.51 ID:edeIW3zk0.net]
- 予めリスクのコストを計れるならやらない手は無いだろうけど、住人の指摘で「まさにそれ」って応じてるレベルなら
後先顧みずに無鉄砲な操作が先走ってるということでもあり、めくら蛇に動じずの喩えにハマってるようなもの
本職だって他社のシステムと云われた途端にそれなり身構えるものだろ？
リスクコストそっちのけで「こうしろ」だの「ああしろ」だの無責任に言い募れない だからやめとけと
うん、こう書いた方がかっちょ良かったかも 上のカキコは無しで
- 347 名前：デフォルトの名無しさん mailto:sage [2023/05/17(水) 13:57:52.40 ID:PligybPra.net]
- そもそもSendkeysってキーボードの操作をアクティブなウィンドウに送信してるだけなのに『いぢくりまわす』ことになるの？
リスクって何？
それがダメなら手入力での作業も出来ないでしょ。
あと作業時間が1/3になってるんだから実際に効率UPしてるワケで『それなりに業務をこなしてきただろう人物が～効率化を成し得た』は意味不。
手書きと電卓のどこが効率的なの？
まぁ～やり方が強引なのは間違いないけど。
- 348 名前：デフォルトの名無しさん mailto:sage [2023/05/17(水) 16:25:11.69 ID:ayW9U2wIM.net]
- comがあるならセンドキーは愚策でしょ
しらんけど
- 349 名前：デフォルトの名無しさん [2023/05/17(水) 16:30:50.87 ID:WTJnQ5K1d.net]
- ちょっと囓っただけの知ったかが色々やらかしてくれるのはよくある
- 350 名前：デフォルトの名無しさん [2023/05/17(水) 19:06:16.88 ID:Rj02nJNFM.net]
- >>343
素人が勝手に作ったマクロをその内容も知らずに別の素人が使ったらどうなると思う？
- 351 名前：デフォルトの名無しさん mailto:sage [2023/05/17(水) 20:35:36.27 ID:gNzv1Kdtd.net]
- >>346
そんなのマクロに限った話じゃない
素人がシュレッダーで書類切っちゃったらどうするとか、
素人が容量超えてるコンセントにプラグ刺しちゃったらどうするとかいちいち考えてるの？
- 352 名前：デフォルトの名無しさん mailto:sage [2023/05/17(水) 21:03:27.97 ID:edeIW3zk0.net]
- 師匠がSendkeysは使うなって言い残してたからそれに倣ってたけど、他アプリにも使える
https://excel-ubara.com/excelvba1/EXCELVBA421.html みんな大好き神髄サイト
>>340 は一行目が相談者で、二行目は経験者の>>324 を対比させてる
操作する相手のアプリが見知ってるモノなら万が一を回避できるかも知らんが、業者が納めたガチガチのシステムだと
どんな仕様かも不明の上、どのキーに何が割り振られてるか知れたもんじゃ無い
メンテ用とかで隠しコマンドとか埋め込まれてた日にゃあ(まあ、キー１個に割り振る事は無いだろうとは言え)
たまたま1/3で済ませられてても、イレギュラーな運用には違いない 壊した時のことを懸念してるだけ
キチンと上司上長の許諾を得てからの改良なら >>324 が手取り足取り教えてくれるかも知れない
- 353 名前：デフォルトの名無しさん [2023/05/17(水) 21:34:13.85 ID:Q9NzDdvVM.net]
- >>347
こういう馬鹿が問題を引き起こす
- 354 名前：デフォルトの名無しさん mailto:sage [2023/05/17(水) 22:03:25.31 ID:aLcxvAiGd.net]
- >>349
世のユーザーRPAほぼ全否定することになるじゃん
- 355 名前：デフォルトの名無しさん mailto:sage [2023/05/17(水) 22:40:10.64 ID:dtCX3F+n0.net]
- 最近はVBAユーザーは神髄さんのサイトに移行しつつあるみたいね。
どこかのちょいちょいやらかし有名老舗サイトが超されるのも時間の問題
- 356 名前：デフォルトの名無しさん (ｽｯｯﾌﾟ Sd1f-+Xfm) [2023/05/18(木) 00:44:58.59 ID:Lo9/fXs8d.net]
- >>350
だから、「ノウハウもない能力もない素人が勝手に」が問題なんだろ
- 357 名前：デフォルトの名無しさん (ｽﾌﾟｰﾌﾟ Sd1f-kDbr) mailto:sage [2023/05/18(木) 02:00:11.23 ID:evSCpenWd.net]
- ユーザーRPA製品の売り文句知らなそうだな
誰でも簡単に作れるのをウリにしてるってのにｗ
- 358 名前：デフォルトの名無しさん (ｽｯｯﾌﾟ Sd1f-+Xfm) [2023/05/18(木) 02:32:12.49 ID:Lo9/fXs8d.net]
- >>353
馬鹿はRPAがそれが理由で下火になって撤退が相次いでいることを知らんのだな
結局素人が作ったものは使い物にならないとか問題を引き起こすことがわかったからだぞ
- 359 名前：デフォルトの名無しさん mailto:sage [2023/05/19(金) 18:19:33.08 ID:PQ/SGKnqa.net]
- >>354
うちの会社でも馬鹿が一生懸命量産してるよ
これが自動で出来るようになりました！
って画像認識たっぷり含んでてHTML・CSSも知らないもんだから
サイトのフォントがちょっと変わっただけで
ストップするようなRPAが大量に作られてる
- 360 名前：デフォルトの名無しさん mailto:sage [2023/05/19(金) 18:58:32.43 ID:7WObf+m10.net]
- >>355
そいつがその実績()を活かして転職して、残ったやつが嘆く姿が見える
- 361 名前：デフォルトの名無しさん (ｽｯﾌﾟ Sd1f-fNc9) mailto:sage [2023/05/19(金) 19:25:48.13 ID:69LLabS5d.net]
- >>356
そういうやつの例が>>353というわけだ
この手の「素人でも～」というツールは結局素人とか素人に毛が生えただけの知ったかが使って混乱を引き起こすだけ
わかる人が作っても、ツールの仕様を他の誰かが理解していないとメンテ不可能になって終わる
- 362 名前：デフォルトの名無しさん mailto:sage [2023/05/19(金) 21:52:10.05 ID:tiNQX/qmd.net]
- スレタイ読めない奴に比べればみんな玄人よ
- 363 名前：デフォルトの名無しさん [2023/05/19(金) 23:28:52.13 ID:4QMqiQyZM.net]
- 自分でRPAの話しを出しておいて悔しかったからと捨て台詞
- 364 名前：デフォルトの名無しさん mailto:sage [2023/05/20(土) 01:03:14.01 ID:BOzq7zOsa.net]
- 皆、キャノンのWebPerformer の仕事は嫌がる
この技術を覚えても、使い道がないから
- 365 名前：デフォルトの名無しさん [2023/05/20(土) 02:10:46.12 ID:g4ASJdAna.net]
- 毒吐きw
- 366 名前：デフォルトの名無しさん mailto:sage [2023/05/21(日) 05:14:29.94 ID:m2ueigJd0.net]
- 黒画面に緑文字ってAS400じゃないの?
元からマクロ機能あるでしょ
- 367 名前：デフォルトの名無しさん mailto:sage [2023/05/21(日) 07:46:37.80 ID:dQxPf7wod.net]
- >>362
あるしコードはVBS使えるからスレの内容は必ずしも無駄にはならない
- 368 名前：デフォルトの名無しさん mailto:sage [2023/05/21(日) 21:40:01.65 ID:8HKNvpDq0.net]
- AS400ってまだ現役なんだ
- 369 名前：デフォルトの名無しさん [2023/05/21(日) 22:08:02.77 ID:JkAFBIVPd.net]
- 名前が変わったことも知らないにわか
- 370 名前：デフォルトの名無しさん (ﾜｯﾁｮｲ 5ebb-Nc0r) [2023/05/22(月) 20:51:05.95 ID:kSQcnoWG0.net]
- 行数が同じ配列A,Bがあります
VBAで、ワークシート関数で言うとhstack(A,B)みたいな事がしたいのですがどう書けば良いですか
- 371 名前：デフォルトの名無しさん mailto:sage [2023/05/22(月) 21:11:33.19 ID:gYYX/Vimd.net]
- Function hstack()
- 372 名前：デフォルトの名無しさん mailto:sage [2023/05/27(土) 20:53:59.53 ID:itVWVmnLp.net]
- >>366
二次元配列の列方向に連結したい、と。
配列AとBが同じ行数という前提なら、
こんな感じのコードで実現可能かと。
Dim C() As Variant
ReDim C(1 To UBound(A, 1), 1 To UBound(A, 2) + UBound(B, 2))
For i = 1 To UBound(A, 1)
For j = 1 To UBound(A, 2)
C(i, j) = A(i, j)
Next j
For j = 1 To UBound(B, 2)
C(i, j + UBound(A, 2)) = B(i, j)
Next j
Next i
これでCがAとBのhstack(A, B)に
相当する配列になるはず。
- 373 名前：デフォルトの名無しさん (ﾜｯﾁｮｲ 9f10-HeY/) mailto:sage [2023/05/28(日) 01:44:19.65 ID:Y6pndVpt0.net]
- 拡大率が違う画面を複数使ってるとコマンドボタン押せなくなるのはどうにかならんの?
100%と150%で使ってると、後者ではボタンがきかず、エクセル画面を前者側に持っていくときくようになる。
- 374 名前：デフォルトの名無しさん (ﾜｯﾁｮｲ 0fda-S+HU) mailto:sage [2023/05/28(日) 03:17:02.66 ID:t/0Z2SUe0.net]
- それで解決でいいんじゃね
- 375 名前：デフォルトの名無しさん (ﾜｯﾁｮｲ 1bda-/RYi) mailto:sage [2023/05/28(日) 20:56:12.40 ID:aECve9cA0.net]
- おおかた、モニターがスクエアだった時分のを未だに使わざるを得ない環境なんだろうが
150%になんかしないといけない環境を、いち早く改修することのが先決
そもそもディスプレイのカスタム スケーリングをしようとすると「テキストやアプリを読み取ることができなくなる云々」と
メッセージされる それを突破して設定してンだから、文句を言う筋合いじゃ無い
それとも、Excelの画面だけ150%にしてる？ それだとちゃんとボタン押せるが？
- 376 名前：デフォルトの名無しさん mailto:sage [2023/05/28(日) 22:26:37.23 ID:Y6pndVpt0.net]
- カスタムなんかしてないよ。
推奨が150%なんだわ。
会社で支給されたノートPCがフルHD、
自分が持ってるサブモニターが4Kなのでそんなことになってる。
しょうがないから4Kの方を100%にして合わせてるんだけど、んまー文字が小さいこと。
- 377 名前：デフォルトの名無しさん mailto:sage [2023/05/29(月) 07:42:06.26 ID:saGif22id.net]
- >>371
高解像度PC使ったことなさそう
Surfaceなんかもデフォルト150%だぞ
- 378 名前：デフォルトの名無しさん mailto:sage [2023/05/29(月) 10:35:10.47 ID:4Pg0mNi+0.net]
- どーもすいませんでした ボタンが押せないとかいう症状から勝手に憶測で書きました
じゃあ4KでExcel側を400%とか500%とかにしてもボタン押せない？
押せるような工夫が必要なんだから、押せる方のモニタ使うのとは別の解決が必要なんだろうし
- 379 名前：デフォルトの名無しさん [2023/05/31(水) 07:32:30.31 ID:Akn6fcLj0.net]
- 🐈
- 380 名前：デフォルトの名無しさん [2023/05/31(水) 08:49:25.09 ID:NbDCLN/4d.net]
- すごーく初歩的な事を聞いて申し訳ないですが
エラーが発生した時にどこで発生しているのか、どこで処理が止まっているのかを必ず表示させるにはどうしたらいいでしょうか？
- 381 名前：デフォルトの名無しさん mailto:sage [2023/05/31(水) 11:31:20.55 ID:zw3Mw+mP0.net]
- >>376
VBEを開けばエラーの場所が黄色くなってるはずだけど、そのVBEを開く作業まで自動化したいって質問ならそれは不可能
- 382 名前：デフォルトの名無しさん mailto:sage [2023/05/31(水) 12:41:48.22 ID:8Ff+xV1b0.net]
- プログラムが正常に動かないからエラーがでる
入力ミスなら入力時チェックを入れればいい
- 383 名前：デフォルトの名無しさん mailto:sage [2023/05/31(水) 12:43:14.88 ID:8Ff+xV1b0.net]
- on error ～ もあるか
- 384 名前：デフォルトの名無しさん [2023/05/31(水) 16:14:37.52 ID:5IfBNuLp0.net]
- >>376
エラー処理を何も書かない。
そうすれば実行した際に
エラーが発生した箇所が黄色くなって止まっているはず。
エラー処理を付けたいのであれば、
エラーが発生した際の表示文言に
エラー内容、モジュール名、関数名等を
記載するようにする。
コードの何行目で発生したのかは
以前色々試したことがあったけど
結局上手く出来なかった。
なのでエラー行を捕まえることが出来たら
その方法をむしろこちらが教えて欲しいくらい。
- 385 名前：デフォルトの名無しさん [2023/05/31(水) 19:46:37.97 ID:Akn6fcLj0.net]
- 度々すみません
mac os でsaveusメゾットを実行するにはファイル毎にアクセス権を付与する必要があると聞いたのですが本当なのでしょうか？
- 386 名前：デフォルトの名無しさん mailto:sage [2023/05/31(水) 19:55:27.32 ID:zw3Mw+mP0.net]
- >>381
saveusじゃなくてSaveAs
メゾットじゃなくてメソッド
- 387 名前：デフォルトの名無しさん mailto:sage [2023/05/31(水) 21:42:18.20 ID:XRB5mG0o0.net]
- Application.Wait (Now + TimeValue("0:00:05"))でデータを随時取得すると
その間、エクセルでほかの作業が出来ないことが困っています。
他の作業をやりながらデータを定期取得する方法はありますか？
- 388 名前：デフォルトの名無しさん (ﾜｯﾁｮｲ 9bce-/RYi) mailto:sage [2023/05/31(水) 23:30:04.64
]
- [ここ壊れてます]
- 389 名前： ID:zw3Mw+mP0.net mailto: >>383
Excelだけでは同時進行は無理
Googleスプレッドシートとか別の方法と組み合わせるしかない [] - [ここ壊れてます]
- 390 名前：デフォルトの名無しさん mailto:sage [2023/06/01(木) 08:10:10.71 ID:Gfjlh7Ly0.net]
- >>384
無理ですか。別でPC使用してやってみます。
ありがとうございました。
- 391 名前：デフォルトの名無しさん mailto:sage [2023/06/01(木) 08:24:47.14 ID:xfE5V8Fnd.net]
- alt押しながらExcelを別インスタンスで起動すればできるんじゃね
- 392 名前：デフォルトの名無しさん mailto:sage [2023/06/01(木) 16:19:44.21 ID:F7uugm6A0.net]
- じゃね じゃなくてできるけど、誰かさんが嘘を回答してしまったので、質問者は去ってるな
同じファイルだと読み取り専用に成っちゃうけど
活発なスレならすぐさま誰かがいちゃもん付けてくれるけど、寂れてるとそれも叶わない
そんなのが繰り返されると雪だるま式に過疎ってしまう 諸行無常って奴か
アホの子が建ててる方のスレだと雑談だらけだけど、稀にまともな質問回答も混ざって来る こちらを活性化すべき
- 393 名前：デフォルトの名無しさん mailto:sage [2023/06/01(木) 19:57:38.15 ID:Gfjlh7Ly0.net]
- >>386
>>387
まだいます。
別インスタンスというワードを初めて聞きました。
ググってみたら色々出てきたので調べてみます。
分からないことがあればまたお願いします。ありがとうございました。
- 394 名前：デフォルトの名無しさん mailto:sage [2023/06/01(木) 20:41:09.09 ID:XMwKl3Eud.net]
- >>388
別インスタンスはタスクマネージャ見るとわかるけどExcel.exeを複数起動する話
普通はブックをダブルクリックなんかで開くと1つのプロセスで複数ブック開くからブック間のシート移動なんかができるけど
複数のプロセスになるとそれができない
それとダブルクリックで開くとWait中のブックで開こうとしたりするから開くときはファイルを開くで開かないとだめとか注意が必要
まあVBAの話というよりExcelそのものの話だからソフトウェア板のExcelで聞いたほうがいいかもね
- 395 名前：デフォルトの名無しさん mailto:sage [2023/06/01(木) 21:47:01.00 ID:atoxlyuQ0.net]
- 相談されたのでここで相談させてください。
毎日製造部の自動画像判定機のデータが3000枚くらいjpgで排出される
OK、NGの判定をjpgのデータ名に取得してくれればまだいいのに
まさかのこっちは判定するだけ、こっちは写真取るだけという連動してないゴミ仕様
jpgは日付時刻のみ、
抽出やふるい分けをするのに
画像の特定の部分の色が赤か緑かでRGB処理させるのは化石すぎるかな？
素直にpythonや他のツール使うべき何だろうけどVBAで何とかしてきたおじさんだから今更新しいのは頭に入らない、、
- 396 名前：デフォルトの名無しさん [2023/06/01(木) 22:04:21.98 ID:54ogaD2/0.net]
- そうね
excelには.Netで言うBackgroundWorkerみたいな機能がないからマルチスレッド処理みたいなのやるにはちょい頭使わないといけない。
比較的お手軽なのはVBS立ち上げてそっちから今開いているお目当てのEXCELに書き込んでやることかな？
VBSなら文法はVBAと一緒だし、変数はスカラー変数だったりVBAみたいにトレースが出来なかったりとかちょい面倒な面もあるけど、
こなれた言語だからググれば方法はすぐ出てくると思うよ。
- 397 名前：デフォルトの名無しさん mailto:sage [2023/06/01(木) 22:25:20.11 ID:F7uugm6A0.net]
- >>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 こういうのに目を通して容易に理解できそうなら引き留めないが
- 398 名前：デフォルトの名無しさん [2023/06/01(木) 22:36:33.54 ID:3L8c5P4r0.net]
- >>390
相談相手がお前しかいない会社なの？
- 399 名前：デフォルトの名無しさん mailto:sage [2023/06/01(木) 22:46:12.33 ID:uXJBLYQCd.net]
- VBAしか知らないような半端な知ったかに業務システムを組ませるとロクなことはない
- 400 名前：デフォルトの名無しさん [2023/06/01(木) 22:52:25.93 ID:WiGRvadKM.net]
- >>390
残念ながら君には無理
引き返す勇気も必要
- 401 名前：デフォルトの名無しさん mailto:sage [2023/06/01(木) 23:42:56.50 ID:atoxlyuQ0.net]
- >>392
ありがとう
これ使えるわVBAでいけると確信
- 402 名前：デフォルトの名無しさん mailto:sage [2023/06/02(金) 11:45:15.15 ID:rnTTx//t0.net]
- 待て待てw あくまでもVBAで画像ファイルを扱うサンプルってだけだぞw
実務に載せるにはこれを踏まえたうえでとんでもない工数必要なのを、この時点で予想できんのか？
日に3000枚だろ？ まあ、やりたきゃどうぞだけど、またこれでひとつの企業の発展が遠退くわ
- 403 名前：デフォルトの名無しさん (ｽｯｯﾌﾟ Sdbf-2oUs) [2023/06/02(金) 12:55:53.88 ID:zeIkdv7hd.net]
- VBAしかわからんくせに自信を持ってるような奴に何を言ってもむだ
- 404 名前：デフォルトの名無しさん mailto:sage [2023/06/02(金) 13:47:19.23 ID:pjc5ka8Rd.net]
- ＞化石すぎるかな？
質問はこれなんだからYesかNoを返してやればいいんじゃね
VBA自体は化石言語（ツール）でもなんでもないからNoだろ
そもそも今までどうやって（どの程度の時間で）3000枚/日のjpegを処理してたかわからんけど
それが大幅に改善できるならなんでもいいんじゃね
- 405 名前：デフォルトの名無しさん mailto:sage [2023/06/02(金) 14:21:36.48 ID:ncdJVYAma.net]
- いや、今まで作ったプロシージャと応用したら出来たわ
社内での正式運用するソフトの提案は情シスに投げといた
自部内の常用してない共用パソコンで動かしたらいつの間にかふるい分け全部出来てた
最適ではないけどVBAおじさんでいいわ
- 406 名前：デフォルトの名無しさん [2023/06/02(金) 15:10:31.04 ID:gVqTCBWka.net]
- 実は優秀だったってことかなw
- 407 名前：デフォルトの名無しさん [2023/06/02(金) 16:20:00.31 ID:zeIkdv7hd.net]
- いや、実験レベルなら組めても実務で使うのとはことなる
そもそもエクセルなんか使ってはダメな例
- 408 名前：デフォルトの名無しさん mailto:sage [2023/06/02(金) 16:36:38.41 ID:rnTTx//t0.net]
- よく見ろ 自演だ しかもどーせ成りすまし
例示のリンク先も自分で見付けられないようなレベルで、教えられた翌日、半日で仕上げられる訳も無い
情シスに投げた？ 情シスの仕事は？w VBAロートルじじいに相談して、そ奴がこしらえたVBAをベースに
開発するのがお仕事か？ 社内から要望 → 情シス → じじい → 情シス なんちゅう経路だっつーの そら、ITも衰退する訳だ
- 409 名前：デフォルトの名無しさん [2023/06/02(金) 17:13:27.84 ID:zeIkdv7hd.net]
- >>403
確かに自演だな
こういう奴が一番厄介
まあ、困るのはこんなのの言うことを信じる会社だからな
こうやって日本の品質が落ちていく
- 410 名前：デフォルトの名無しさん (ﾌﾞｰｲﾓ MM8f-BOre) mailto:sage [2023/06/02(金) 17:54:53.55 ID:nCmch2SWM.net]
- え？自演？そもそもどれが自演なんだ…
まさか>>402の人が書いた皮肉レスを文面通り受け取ってるのか…
トヨタグループティア1の品管だけど
情シスなんて社内の部署の細かい要望なんて聞いちゃくれんぞ
情シス仕事はこっちが聞きたいわ
勤怠システムや文章システム管理してるぐらいだぞ
中小は知らんが、自演なぁ…変なの
- 411 名前：401 (ｱｳｱｳｳｰ Sa8f-Nnh9) [2023/06/02(金) 18:34:08.20 ID:6XYd34FIa.net]
- 同じauだが別人な
- 412 名前：デフォルトの名無しさん (ｽｯﾌﾟ Sdbf-S+HU) mailto:sage [2023/06/02(金) 18:40:49.45 ID:pjc5ka8Rd.net]
- 問題解決に至るレスも満足にしないくせに難癖だけつける奴がこのスレ多すぎだよな
お前の方がスレの中で見たら無能なんだぞってわかれって感じ
- 413 名前：デフォルトの名無しさん mailto:sage [2023/06/02(金) 19:28:50.89 ID:zbkirSqOd.net]
- 触らない方が良い
触って貰うと嬉しくなって繰り返す、
話し相手のいないおじいちゃん達だから
- 414 名前：デフォルトの名無しさん [2023/06/02(金) 20:39:35.69 ID:7Hq5KpZ60.net]
- >>408
女子高生かもしれんだろ
- 415 名前：デフォルトの名無しさん mailto:sage [2023/06/02(金) 21:27:52.13 ID:x/1a+Vzx0.net]
- お願いします。
今日の日付を取得し、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)
- 416 名前：デフォルトの名無しさん mailto:sage [2023/06/02(金) 21:51:56.45 ID:a31tRmFL0.net]
- >>410
Set foundCell = ws.Range("A1:A" & lastRow).Find(What:=DateValue(currentDate), LookIn:=xlFormulas, LookAt:=xlWhole)
- 417 名前：デフォルトの名無しさん mailto:sage [2023/06/02(金) 22:21:57.45 ID:x/1a+Vzx0.net]
- >>411
出来ました。ありがとうございます。
- 418 名前：デフォルトの名無しさん [2023/06/04(日) 20:38:17.04 ID:LZlt8Gxt0.net]
- 初歩の質問ですが、シート増やしたりするマクロ組むと一瞬画面がガチャガチャして結果が表示されるんですが、何かバックで動作して結果だけ表示される方法はないですかね？
- 419 名前：デフォルトの名無しさん mailto:sage [2023/06/04(日) 20:41:35.88 ID:BS4t9Zoh0.net]
- アプリケーションスクリーンアップデーティングファルス
- 420 名前：デフォルトの名無しさん [2023/06/04(日) 20:56:59.39 ID:LZlt8Gxt0.net]
- >>414
ありがとうございました！できました。スッと表示されるようになりました。
- 421 名前：デフォルトの名無しさん mailto:sage [2023/06/04(日) 21:02:56.12 ID:Kcs+KkJpM.net]
- >>414
ファルスってなんだ？滅びの言葉か？
|
 |
