Excel VBA 質問スレ Part79(ワッチョイあり)

■ このスレッドは過去ログ倉庫に格納されています
1デフォルトの名無しさん (ワッチョイ aaa4-I2zm)
垢版 |
2023/01/28(土) 12:12:12.41ID:UjlIZ1Ov0
!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/04/04(火) 19:29:11.09ID:S7HWOC1cd
>>243
ダイアログの「なし」の下の破線が一番細い実線だよ
0.5ptって訳じゃないけどこれで代用はできない?
https://i.imgur.com/FI2RhpR.png
2023/04/04(火) 19:40:07.41ID:CrO9FoIt0
やりたければやればいい
何がわからないのかわからない

丸投げしたいなら初めからそう言っとけ
2023/04/04(火) 19:57:30.78ID:renXLxQ5r
流石に何も調べず「こうしたいんです」って言われてもね
調べた上で質問しろよ流石に
2023/04/04(火) 19:57:38.37ID:gM2C6lf70
>>244
プリンタの問題なのかその破線だと印刷されません
ブラザーのモノクロレーザーなんですが
色々と調べたところインクジェットだと滲むから印字されるけどレーザーだと細すぎて印刷できないみたいです
2023/04/04(火) 20:11:18.91ID:5YvJO7dSd
>>247
レーザーでも印刷はできる
プリント解像度が合ってないから変えて試せ
要件としてはプリンターで細い罫線を出力したいが正しいのに、
情報小出しにするのはなぜ?
249デフォルトの名無しさん (スプッッ Sd1f-j25d)
垢版 |
2023/04/04(火) 20:27:01.14ID:6BEiQs1Sd
馬鹿は馬鹿な頭で馬鹿な方法を考えついて馬鹿な質問をする法則
例の零細企業の馬鹿でわかったはずだろ?
2023/04/04(火) 21:06:09.03ID:gM2C6lf70
>>248
考えた結果、オートシェイプで線を引くしかない、となったのでそれのやり方を聞きました
ブラザーのサポートにも問い合わせたけどそういうものみたいです
2023/04/04(火) 22:10:24.26ID:gM2C6lf70
ちなみに点線は印刷業界でいうヘアラインというやつでプリンタの一番細い線を出すという命令なので
いいプリンタほどほぼ印字されないそうです
なので設定は無関係です
300dpiにすれば印字されますが文字が汚いです

印刷のアドバイスを聞きたいわけでも情報を後出ししているわけでもなく、
オートシェイプで線を引くコードが知りたかっただけです
2023/04/04(火) 22:16:45.73ID:KVvIoDM70
絶対に自分で調べたほうが早いし楽だし拡張性あるのに、頑なに人に聞くやつっているよな
ggrks
2023/04/04(火) 22:33:10.85ID:zXZGFdaS0
Sub Macro1()
Dim rr As Range
Set rr = Selection
rr.Parent.Shapes.AddLine(rr.Left, rr.Top + rr.Height, rr.Left + rr.Width, rr.Top + rr.Height).Select
With Selection.ShapeRange.Line
.Weight = 1
.ForeColor.RGB = RGB(0, 0, 0) '255,255,153 薄いイエロー 204,255,255 薄いブルー
End With
rr.Select
End Sub

Sub Macro2()
Selection.Borders(xlDiagonalDown).LineStyle = xlNone
Selection.Borders(xlDiagonalUp).LineStyle = xlNone
With Selection.Borders(xlEdgeBottom)
.LineStyle = xlContinuous
.Weight = xlHairline 'xlThin
.ColorIndex = xlAutomatic
End With
End Sub
Macro1が直線を引く場合 Macro2が罫線を引く場合 Weight = 1を0.5にしても変わらない xlHairline細線xlThin極細
直線を引くと消す作業が必要に成る
2023/04/04(火) 22:57:58.66ID:H3UIOgUM0
下線を付ける場合って普通はアンダーライン機能使うし、空欄の下線なら___ (シフト+「ろ」)
~~~~~~~~~~ (半角波線) ^^^^^^ (ハット) で上行の強調みたいな書き方したり
───── (罫線文字) ━━━━━ (罫線文字太い)  でたいていは済むと思うが
2023/04/04(火) 23:21:59.65ID:gM2C6lf70
下線というのはセル毎の仕切り線という意味でした
わかりにくくてすみません
256デフォルトの名無しさん (ワントンキン MMdf-QXPF)
垢版 |
2023/04/04(火) 23:30:14.47ID:khpg5U9yM
>>249
馬鹿は馬鹿な質間の後に後出し条件を付けるも追加で
2023/04/05(水) 00:53:07.23ID:ab4hIo8m0
>>256
別に全然後出しとは思ってないけどね
細い線が出したいです、ではなくて
自動でオートシェイプで線を書く方法を教えてください、なんだから
2023/04/05(水) 00:54:17.99ID:ab4hIo8m0
ろくなやついないみたいだからよそいくね
259デフォルトの名無しさん (ワンミングク MM03-5SDg)
垢版 |
2023/04/05(水) 01:00:51.04ID:XcJibMPkM
何が問題なのかわからない馬鹿ばっかのところが見つかるといいね
2023/04/05(水) 01:20:39.85ID:Yfsd/RuOd
知恵遅れ袋があるじゃないか
2023/04/05(水) 07:58:24.80ID:nt1BQkgU0
>>257
それは自分が思う解決方法であって目的は細い線を印刷することだろ
2023/04/05(水) 08:35:05.20ID:xBlgsSX7d
罫線文化は日本特有だからそろそろ辞めよう
2023/04/05(水) 11:17:22.11ID:hwWjK5am0
そういい続けてもう何年になるだろうか
2023/04/05(水) 11:34:30.61ID:Pachb7xx0
>>258
オイオイw 提示したコード試したンか?w オートシェイプの線と罫線と両方をサンプルして
尚且つ、線種や色を改良しやすいように例示もしたってのに 
出力できる太さに限界があるなら色を変えることで改善させるのもひとつの解決策だろうに
265デフォルトの名無しさん (スプッッ Sd9f-j25d)
垢版 |
2023/04/05(水) 14:48:49.66ID:RBswHKfYd
>>264
そういうまともな発想が通じない自分の馬鹿な解決方法とやらに拘るのが馬鹿の馬鹿たる所以だ、残念なことに
2023/04/05(水) 19:37:02.68ID:/dmeuB+9M
どこが日本特有だよ
タイやら中国やらアメリカやらからデータ来るけど罫線なんて普通に使いまくりだぞ
文化じゃねーよ無職知ったかかよ
2023/04/09(日) 10:12:35.57ID:RxxIHycr0
さて、そろそろ書けますか?
2023/04/09(日) 10:34:21.92ID:RxxIHycr0
うおおw またどっかに吸い込まれたw なにがイカン?
 tps://www.post.japanpost.jp/img/int/use/writing/pic_invoice.jpg 日本郵便のサンプル
 tps://learn.microsoft.com/ja-jp/dynamics365/finance/localizations/media/apac-tha-tax-invoices-tax-invoice.png
 tps://templates.invoicehome.com/invoice-template-en-neat-750px.png
各国のインボイス画像何枚か貼り付けたレスだが、取り敢えずアタマ削って書き込んでみるw

現地の駐在員が日本人の可能性もあるぞ と書きたかったw それらの国でもイージーな書式でも通用するから
敢えて日本向けに罫線書式で送り付けてきてる可能性だってある 何かに憑り付かれたように「これでなきゃだめ」
なのは、使う側が融通効かない石頭揃いなせいが大 容易に使えてそれを容認するような文化 が無い(劣ってる)とは言える
2023/04/09(日) 12:18:38.23ID:xFg640up0
部署で唯一VBA使える人が異動しそうなので
なにか力になりたいけれども、マイクロソフトのVBAスタンダードの
勉強をするよりはその人のコードを見て調べて…の方が良いでしょうか。
資格は実務に役立たないとよく聞くので。
2023/04/09(日) 12:44:54.33ID:IMhUrj1Nd
>>269
VBAスタンダードなんかのVBAエキスパート資格とMicrosoftは無関係
だからVBAスタンダードより異動する前にコード見て、聞けるところを聞いておく方が有意義
2023/04/09(日) 12:49:57.62ID:I9Qf3W7D0
何も知らないやつが仕事で力になりたいけどとか簡単に言っちゃいけないよ
他人のVBAコードは不条理の塊と見なせるから、担当が自分に振られたのでなければ下手に関わらない方がいい
異動なら連絡は付くだろうし、君が心配しなくとも引継ぎ担当が面倒見てくれるよ
2023/04/09(日) 12:59:51.78ID:xFg640up0
>>270 >>271
ありがとうございます。よく分かりました。
ちなみに引き継ぎを受ける候補は私なので
自分でもコツコツ勉強プラス異動後も聞くことにします。
2023/04/09(日) 13:03:59.67ID:fQMTK17W0
こっそりYouTubeで解説動画見て、簡単なの自分で作って、実務のVBA眺めて意味を考えてググって分からなかったらここで聞いて勉強してからじゃない?
最初は使い方だけ聞けばいいし、中身変更なんて頻繁にないでしょ。
2023/04/09(日) 17:34:38.52ID:VccS8NQy0
>>268
交互色もよくみる
2023/04/09(日) 18:28:02.92ID:SycmVm660
>>280
Listobject使うと自動で交互色テーブルになるんですが他国言語版はならんのか?
276デフォルトの名無しさん (アウアウウー Sa05-MV9R)
垢版 |
2023/04/09(日) 21:15:17.28ID:/EJLPp0Da
おちつけ
277デフォルトの名無しさん (ワッチョイ c619-5xw/)
垢版 |
2023/04/11(火) 06:32:54.99ID:2FEVzV7Z0
>>269
VBAの試験なんて
適当にVBA組んでれば
その内何も勉強しなくても
エキスパートいきなり受けても受かる試験だから
そん時受ければいいよ。

EXCELの試験の方が難しいらしい
2023/04/11(火) 10:56:35.96ID:muoUIQjV0
日商表計算1級は自慢してもいいレベルらしい。
mosは…察し。
279デフォルトの名無しさん (ワッチョイ 7f33-S3w6)
垢版 |
2023/04/15(土) 17:32:15.76ID:m9DY7U8S0
エクセルのチェックボックスにチェック入れたら、特定のセルに文字を入力する方法を教えてください
↓みたいにチェック入れたり外したりしたら、セルB2に入る文字を変えたいです
https://jsfiddle.net/07ed2ajc/
2023/04/15(土) 17:39:31.98ID:iq3ZlEDB0
セル チェックボックス 連動
で沢山出てくるよ
2023/04/22(土) 08:24:42.08ID:Ir4lduVSd
A列の「作業結果」ごとに振り分けたいんだけど良い方法ない?
ピポッド組んだ方がはやいかな?

A列     B列
作業結果 氏名
不備なし 田中
不備あり 佐藤
不備なし 佐々木
不備あり 加藤

↓別シートに転記したい

A列
不備なし

田中
佐々木

不備あり

佐藤
加藤
2023/04/22(土) 08:27:50.42ID:Ir4lduVSd
フィルタかけて 「不備なし」、「不備あり」ごとに転記

作業結果  氏名
不備なし 田中
不備なし 佐々木

不備あり 佐藤
不備あり 加藤

「作業結果」列で重複データのみを削除
Sheets("Sheet2").Range("A1").CurrentRegion.RemoveDuplicates Columns:=1, Header:=xlYes

作業結果  氏名
不備なし 田中
     佐々木

不備あり 佐藤
     加藤

ここまではイメージしたのだけれど、
そもそもとして、A列の属性ごとにまとめたいから、上記ではうまくいかないような…
2023/04/22(土) 08:29:37.58ID:Ir4lduVSd
氏名はありきたりなのを使用したので大丈夫かとw
2023/04/22(土) 08:31:58.26ID:EkSMf2Yw0
あかん不倫ありに見えた・・・
2023/04/22(土) 08:52:52.45ID:Ir4lduVSd
自己解決

ピボット組んだ方が説明しやすいような気がした
2023/04/22(土) 08:56:33.28ID:EkSMf2Yw0
今月に入って勉強し始めたわいはフォームからの操作で使ってるけど、
ある結果に該当するデータを For ~ Next と If ~ Elseでふりわけてコピーしてる。
2023/04/22(土) 09:16:50.26ID:0F5tuW810
>>281
Excel2019以後や365版ならVBAでなくワークシート関数のFilter関数使った方が楽かと。
こんな感じ。
=FILTER(B:B,A:A=“不備なし”)
2023/04/22(土) 09:43:24.98ID:Ir4lduVSd
>>287
これいけそうだね。

毎日集計ださなければならないんだけど、
日付で絞るのは楽勝だとして、

不備なし
不備あり

ごとにFILTERかければいいんだね。
なるべく誰でも分かるものにしろ、
とのお達しなので来週ためしてみるよ。
どうもありがとう。
2023/04/24(月) 16:29:17.11ID:51aj6gGh0
Excelのシートにpdfを貼り付けたいんですが(一枚目だけでいい)
OLEObjecps.Add
でファイルパスを与えて取り込むと
文字が読みづらいレベルで
解像度が低く取り込まれてしまいます

簡単なプレビューをエクセル上でしたいだけで
pdfのパスが入ってるセルを選択したら
シート上に表示、といったことがやってます

別のファイルを選択したら前のプレビューは消して次のファイルをプレビューする、みたいな

Acrobat Readerはインストされてますが
無料環境でやりたいです。
290デフォルトの名無しさん (スプッッ Sd0a-bITu)
垢版 |
2023/04/24(月) 16:37:38.75ID:nUpPvlxcd
>>289
Windowsも有料だし、電気代も掛かるし無料は無理でしょ
他は現状報告だけで答える部分はありませんね

質問やり直せ
2023/04/25(火) 10:02:17.63ID:OOi8qz2x0
>>289
 >解像度が低く取り込まれる が、把握しずらかったが
https://www.microsoft.com/ja-jp/biz/smb/column-excel-pdf.aspx
  ↑の、【PDF がぼやけて表示される際の原因と対策】が合致するのか
2023/04/25(火) 11:27:26.34ID:Y1VsObgtd
pdfを画像として印刷して
その画像を取り込めばいいと思う
2023/04/25(火) 12:49:16.15ID:S+8jDJ380
>>291
ありがとうございます
設定試してみましたが、症状はかわりませんでした…

>>292
一応考えはしましたが、面倒で躊躇していました…


pdfを取り込むという方針でばかり検索していたので見つかりませんでしたが
webbrowserに表示するという手に逃げることにしました
フォームのModalをオフにしてサイズを可変にすれば
シート上のオブジェクトと似たような操作性にはなるので
これで行こうと思います
2023/04/25(火) 12:56:36.27ID:P6aAftcz0
なぜReaderに表示させるではだめなのか
2023/04/25(火) 13:26:27.30ID:OOi8qz2x0
そこはほら、ファイルパスを指定して読み込む という部分で察するに
表示されたPDFに関連した他の情報もSheet上にいろいろあれこれ連動して表示されるとか
そういうつくりに成ってるのかも知れない デュアルモニタでも無いんで目が散るとかも
pngやjpgとかの画像ならオブジェクト扱いで拡大縮小すれば何とか処置できるかも知らんけど
PDF固有の問題とかなんだろ
2023/04/25(火) 14:59:34.57ID:OylHipqda
>>294
すいません
pdfだけじゃなくて
普通の画像もユーザーに同じUIで操作させたいのと
普通のReaderはファイルを連続で開くと
タブで複数開こうとするので諦めました…
新しいファイルを開いたら
新しいインスタンス作らず開き直してくれれば近い動作になるんですが

あと、AlwaysTopにする必要もありますし
余計に大変だと考えていませんでした

>>295さんの内容でだいたい正解です
2023/04/25(火) 22:10:00.33ID:RtJhGNCC0
1 PDFをAdobeReaderで開く
2 AdobeReaderにCtrl+Lを送ってフルスクリーンにする
3 画面キャプチャする
4 クリップボードの画像をシートに貼り付ける
5 AdobeReaderを閉じる
何が面倒なんだこれ
2023/04/26(水) 17:36:17.42ID:gCvQh4su0
1回だけならいいかもしれんが、毎日何回もやるとなったら
面倒だと思わんほうがどうかしてる
2023/04/26(水) 21:05:50.62ID:zbbRZmOB0
VBAスレで何言ってんだコイツ
300デフォルトの名無しさん (ワッチョイ c55f-6css)
垢版 |
2023/04/26(水) 22:50:11.08ID:hkryowTT0
まぁwebbrowserで済むなら
そっちのほうが良いだろね
readerのインスタンス閉じたり開いたりしなくていいし
いちいち画像スクショのフローも通す必要ないし
処理もパスを渡すだけで済むし
なんだったら複数ページでもスクロール確認できるし
2023/05/03(水) 21:37:40.68ID:u6AyBhT90
数値が指数表示されるのどうやって直しますか
format で@にすれば直るって言う人いるけど末尾にE15とか付いちゃう
302デフォルトの名無しさん (スップ Sdbf-v/6/)
垢版 |
2023/05/03(水) 22:23:40.94ID:sgDEJw+Jd
>>301
馬鹿は消えろ
303デフォルトの名無しさん (ワッチョイ 7759-gUqw)
垢版 |
2023/05/04(木) 03:04:51.18ID:0+hX2o4p0
表示形式変えたら良くね?
2023/05/04(木) 07:02:56.52ID:OlPgSuVa0
>>301
随分前に取り込んだcsv内のデータが指数表示になって困ったことがある。
セルの書式設定が標準だと12桁以上の数値は自動的に指数表示になるexcelの仕様らしいので書式設定を数値にするか、頭にアポストロフィをつけて文字列として入れたかのどちらかで対応した記憶。
2023/05/04(木) 09:06:13.63ID:c0G0c79m0
csvの取り込みはVBAから直接ではなく、
PowerQueryにした。
エンコードや読込み列数の指定もできる。
2023/05/04(木) 17:35:17.84ID:SG8oVDU20
分からないから質問しているのに馬鹿だの何だのって。
2023/05/04(木) 18:18:33.10ID:KWp7766Yd
>>306
馬鹿でNGしておくといい
質問スレによくいる罵るだけ罵って自身は何もしない無能な奴だよ
308デフォルトの名無しさん (スップ Sdbf-v/6/)
垢版 |
2023/05/04(木) 19:48:22.72ID:pc2Dfs+qd
>>307
よく読んでいないのに決めつける馬鹿
お前らにはわからない時には時々答えているぞ
2023/05/04(木) 20:21:25.82ID:SG8oVDU20
おいおい、NGワードての初めて使ったがあぼーんだらけだぞ??
いかにここがNGワードだらけか分かったよ。
2023/05/10(水) 02:58:03.13ID:ixnOuziw0
なにアホぬかしてんねん
2023/05/10(水) 20:53:06.79ID:cJ3FIEe20
あぼーん
2023/05/11(木) 22:30:54.17ID:tQtEMv7I0
あかーん
2023/05/12(金) 22:05:56.53ID:dIt5+Jxy0
おぼーん
2023/05/13(土) 19:38:24.33ID:E3uC06QM0
こぼーん
2023/05/15(月) 07:09:01.65ID:Rm921WLC0
会社のシステム(黒バックに緑の字)で“数字→Ent”で画面表示を切り替えて行くんだけど、どうしてもSendkeyでEnt(テンキー側)が押せない。(それ以外は押せている)
NumLockの問題では無いと思うんだけど、何が問題なんだろう?
“{ENTER}”でも“~”でもダメでした。
どうもメインキー側のEntを押している感じがする。(Entはそれぞれ別の機能か割り振られている)
Sendkeyで無理なら他の方法ってない?

ちなみにVBAは独学でやっている初心者なので、お手柔らかに。
2023/05/15(月) 07:44:39.36ID:S3yoUkobd
大きいEnterとテンキーのEnterはキーコードが違う
テンキー側は{ENTER}
sendkeysで{PRTSC}やっても画面キャプチャ撮れないのと同じようなものかも
AutoHotKeyみたいなツール使った方が簡単かもよ
2023/05/15(月) 08:33:02.84ID:Rm921WLC0
>>316
いや、返信が早いのはありがたいんだけど、エンターキーが別なのは分かってるから、テンキー側か押せないと書いてるワケなんだけど…。
会社のパソコンだから、勝手に別アプリは入れられない。
2023/05/15(月) 09:43:33.62ID:aWbkU9SeM
Excelじゃ無理
2023/05/15(月) 10:32:40.13ID:TS5z6+d2d
>>317
.exe叩くことすら不可能なら諦めろ
AutoHotKeyはAS/400のターミナル操作で右ctrl無いノートPCで右altで右ctrl操作したり、
テンキーがないノートPCでてんきーのEnter押下操作したりした実績がある
320デフォルトの名無しさん (アウアウウー Sa67-0O/8)
垢版 |
2023/05/15(月) 11:57:22.16ID:SjuerCeea
上司にできませんって言うのも勇気
2023/05/15(月) 12:25:24.97ID:hNhS+OV4d
>>317
どうしてもVBAでやりたいならWin32APIのkeybd_event関数使え
さっき言ったPRTSCでスクショできない問題も解決できてるから、
恐らくターミナル操作もできると思う
2023/05/15(月) 13:00:05.62ID:Rm921WLC0
コレ(>>315)は仕事の話だけど、別に上司に言われてやってるんじゃなくて、仕事の効率を上げる為に自分が勝手にやってるだけ。
俺はExcelを使ってるけど、他の人は画面を見て手打ちしたり紙に書き写したり、何なら電卓叩いてる。
で、今は会社のシステムのマクロ(Excelで操作を記録するのと同じ様なモノ)にEntを登録して、画面上部にあるそのアイコンをVBAでマウスを操作してクリックすると言う、無理矢理なやり方でやってる。
やっぱりWin32APIでやってみるかな。
みんなありがとう。
長文でスマン。
2023/05/15(月) 13:53:06.37ID:+mRHKUjh0
いくつか疑問が :
(黒バックに緑の字)で“数字→Ent”で画面表示を切り替えて行く ここは実際のキーを叩いてる?
ユーザーフォーム上とかの数字をクリックしてEnterボタンとかを押してる?

“{ENTER}”でも“~”でも ENTERには{}付けてるのに ~には{}付けないのは単なるタイポ?

(黒バックに緑の字) それってPower Shell とか コマンドプロンプトとかで無くて?

どうしてもSendkeyでEnt(テンキー側)が押せない テンキー側である必要は? メインのENTERキーが押せれば充分なのでは?
2023/05/15(月) 14:07:11.48ID:hcGmEYCb0
>>323
一部のターミナルエミュレータ(IBM iSeriesとか)ではテンキーのEnterとテンキーではないEnterや、
右ctrlと左ctrlなんかに別々の動作が割り当てられてるからでしょ
PSやコマンドプロンプトなら別の動作ではないし、
画面の配色もデフォルトで黒地に白文字でわざわざ変えるとも思えない
2023/05/15(月) 14:27:07.62ID:+mRHKUjh0
あぁ、「会社のシステム」ってのが別にあって、他の社員はその画面上だけで処理してるけど
相談者はそこに別途起動したExcelでキー操作したい ってことか?
だからメインのENTERキーとテンキーのENTERキーは区別して使いたいと?(メインだとベースのシステム側が
反応しちゃうから とか) 結構無理やりな使い方のような
Sendkeysはプレーンの状態しか想定してないような もうひとつのシステムとのアクティブが問題とか?

https://learn.microsoft.com/ja-jp/office/vba/language/reference/user-interface-help/keycode-constants
Sendkeysはやめて、ここのキーコードでコード書いた方が安全安心なような
326デフォルトの名無しさん (アウアウウー Sa67-0O/8)
垢版 |
2023/05/15(月) 15:18:05.10ID:n5uW0pS1a
>>322
指示されたとか業務を請け負ったわけでもなく
自力でできない改造を勝手にやって周りに困ってるとか言い出してるのね
他に優先する仕事無いの?
327デフォルトの名無しさん (ワッチョイ a32d-+/XS)
垢版 |
2023/05/16(火) 13:42:46.21ID:eYLYq0u20
>>315です。
もうSendkeys以外でやろうと思っていましたが、323さんが疑問を持ったままだとモヤモヤするでしょうし、一応返信しておきます。
注意:長文・駄文になるので、興味の無い方は無視してください。
(レスアンカーが多過ぎたので、レス番号のみにしています。)

まず会社のシステムをソフトウェア名で検索したら、まさに324さんが言っているモノでした。
今やっているのは、その操作をExcel_VBAからSendkeysで叩かせてメニューを操作し、必要なデータをExcel側に持って行って処理しようとしています。
(会社のシステム上では、現状その処理が出来ない為。)
主に毎日出るデータから必要な数値を関数を使って抜き出して計算する為です。
現在その作業をやっている人があまりにも時間が掛かり過ぎていて、作業効率をUPする為にやっています。
(画面上の数値を目視で探して紙に書き留め、電卓で計算してExcelに手入力すると言うアナログな方法です。)
テンキー側のEnterが押せない以外は出来ていて、作業時間は1/3の以下に出来ました。
自分も323さんが325で言っている様に、無理矢理な使い方(特にEnterの入力法)をしているとは思っています。
もう一度調べ直して、325のリンクのキーコードに切り替えてみます。
ありがとうございます。ヒントになりました。
328デフォルトの名無しさん (スッップ Sd1f-+Xfm)
垢版 |
2023/05/16(火) 16:04:00.86ID:/kT0iQ0Cd
無知な人は無知だから解決方法のアプローチすら間違う
IBMのCOMオブジェクトがあるだろ
329デフォルトの名無しさん (スッップ Sd1f-+Xfm)
垢版 |
2023/05/16(火) 16:15:00.01ID:/kT0iQ0Cd
少し囓ったレベルでそもそも何を使ってるかすらわからなかったようなレベルの奴が変に弄くり回すなよ
2023/05/16(火) 17:06:14.83ID:3pcpoJhK0
無知は恥じることじゃ無い 怯むことでも無い 懸命に解を見付けようとするのは悪いことでも無い
ただ、敵(IBM iSeriesとか)の壁は高そうだ 敵を知り己を、って奴が遠回りでも結果的には近道なのか
IBMのCOMオブジェクトというヒントだけでゴールに辿り着けそうなら進んでもいいかも知らんし(やめとけ)

エミュレータで運用しなきゃいけないほど投資も出来ず利用者も不平不満を言えないような環境なら
それ壊したら損賠しきれない被害になるだろうから、ヘタに横からアドバイスも出来ないんだな(やめとけ)
結論はいぢくりまわすのはやめとけ てことで
2023/05/16(火) 18:47:42.45ID:KioSfVLt0
>>330
> エミュレータで運用しなきゃいけないほど
今時ダム端末なんて使ってるところ無いよ
というよりそもそも作ってすらないでしょ
それともサーバを直接叩けっていう意味?
知ったかぶりでマウント取るより素直に質問や礼ができる>>327の方が将来性があるよ
2023/05/16(火) 22:45:00.74ID:3pcpoJhK0
いや、>>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みたいに、キーボード操作もマウス操作も別画面に吸い込まれる みたいなもんだろ 違うのか?
333デフォルトの名無しさん (ワンミングク MMe7-uAqT)
垢版 |
2023/05/16(火) 23:38:51.78ID:3Jn4PeXnM
そもそも開発環境が用意されてるわけでもなく本番環境でやろうとしてるのは明らかだろ
それも無断で
2023/05/17(水) 01:30:45.81ID:XWrmBJfr0
>>332
無知は恥じることじゃ無い
2023/05/17(水) 03:34:15.76ID:dtCX3F+n0
ここ何のスレだ?(笑)
2023/05/17(水) 08:10:58.74ID:4R4WjBjgd
>>332
全然違う
ググらなきゃ分からない程度の知識でマウントかよ
2023/05/17(水) 10:40:39.29ID:edeIW3zk0
マウントマウントうるせーよ 何でもマウントだと思うその僻み根性直せよ
どこがマウントなんだよ 忠告っつーんだろが 引き留めてんだ
つまんねコト書いてねーで、知ってんなら対策と傾向教えてやれや できねんか?
2023/05/17(水) 10:51:01.19ID:ayW9U2wIM
改行とエンターキー別にほしいよねー
あとバックタブも必要だわ
2023/05/17(水) 11:41:51.42ID:8WDvU+6md
>>337
無知は恥じることじゃ無い
忠告の前提が間違った知識あるいは勘違いに由るものなら
その忠告は間違っているかもという自認はしておくべき
俺は自分の環境(iSeriesの前身AS/400、ターミナルエミュレータはiSeriesと同じ)で使えたAHKって代替策と、
Win32API叩けばできるって代替策案内した
あなたはマウント取ろうとする以外に何かしたっけ?
2023/05/17(水) 12:45:51.36ID:edeIW3zk0
どこをどう読んでも新人のヒラ社員(歳が若いかどうかまではわからんけど)が悪戦苦闘してる風 と、
方や、それなりに業務をこなしてきただろう人物が経験則を元に導き出した解で効率化を成し得た のと、
そういう読み方をしたんで、やめとけ・無理すンな、と
そのAHKとかWin32API叩く方法が、左程メインのシステムに影響を及ぼさず問題無く解決できる手段だとするなら
相談者もそっちにすがった方がいいんだろう どちらを選ぶかは相談者次第 とりまkeycodeのリンクは貼った
2023/05/17(水) 13:12:55.03ID:Ga5ufIzN0
今来てよくしらんけど、ExcelでRPAもどきなんてするもんじゃねえなと思いましたまる
2023/05/17(水) 13:35:49.51ID:edeIW3zk0
予めリスクのコストを計れるならやらない手は無いだろうけど、住人の指摘で「まさにそれ」って応じてるレベルなら
後先顧みずに無鉄砲な操作が先走ってるということでもあり、めくら蛇に動じずの喩えにハマってるようなもの
本職だって他社のシステムと云われた途端にそれなり身構えるものだろ?
リスクコストそっちのけで「こうしろ」だの「ああしろ」だの無責任に言い募れない だからやめとけと
 うん、こう書いた方がかっちょ良かったかも 上のカキコは無しで
2023/05/17(水) 13:57:52.40ID:PligybPra
そもそもSendkeysってキーボードの操作をアクティブなウィンドウに送信してるだけなのに『いぢくりまわす』ことになるの?
リスクって何?
それがダメなら手入力での作業も出来ないでしょ。
あと作業時間が1/3になってるんだから実際に効率UPしてるワケで『それなりに業務をこなしてきただろう人物が~効率化を成し得た』は意味不。
手書きと電卓のどこが効率的なの?
まぁ~やり方が強引なのは間違いないけど。
■ このスレッドは過去ログ倉庫に格納されています
5ちゃんねるの広告が気に入らない場合は、こちらをクリックしてください。

ニューススポーツなんでも実況