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

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 237 名前：デフォルトの名無しさん (ﾜｯﾁｮｲ e95f-ghT9) mailto:sage [2023/03/26(日) 21:50:17.38 ID:XuHk6gkC0.net] VBAはネットに転がってるのがいいよね 238 名前：デフォルトの名無しさん (ﾜｯﾁｮｲ e510-XAhC) mailto:sage [2023/03/26(日) 22:54:45.65 ID:Vzczu/7L0.net] VBA基地外が転がってる 239 名前：デフォルトの名無しさん (ｱｳｱｳｴｰ Sa7f-PvZ5) mailto:sage [2023/04/01(土) 10:04:12.82 ID:UPkZGiTza.net] ＶＢＡでゼビウス作りたいです 240 名前：デフォルトの名無しさん (ﾜｯﾁｮｲ ffda-kVuH) mailto:sage [2023/04/01(土) 10:41:21.61 ID:Fre5vyIa0.net] まず許可とらないと 241 名前：デフォルトの名無しさん (ﾜｯﾁｮｲ ffda-kVuH) mailto:sage [2023/04/01(土) 19:42:02.16 ID:Fre5vyIa0.net] https://xtech.nikkei.com/it/pc/article/NPC/20080321/296775/ もう15年も前の記事だが 242 名前：デフォルトの名無しさん (ﾜｯﾁｮｲ df05-RaML) mailto:sage [2023/04/04(火) 05:43:03.68 ID:gM2C6lf70.net] Excelの罫線が太すぎるので ある範囲の入力済セルの下に 例えば0.5ptのオートシェイプを引きたいです どのようにしたらできますか？ 243 名前：デフォルトの名無しさん (ﾜｯﾁｮｲ ffda-kVuH) mailto:sage [2023/04/04(火) 11:13:58.48 ID:H3UIOgUM0.net] 入力済セルの下にオートシェイプの線を貼り付ける 線の書式の幅を 0.5pt にする 244 名前：デフォルトの名無しさん mailto:sage [2023/04/04(火) 16:48:55.55 ID:gM2C6lf70.net] >>240 VBAで自動でやりたいです 245 名前：デフォルトの名無しさん mailto:sage [2023/04/04(火) 17:42:01.18 ID:7A3Dl4jZd.net] ほんとにオートシェイプでやるの？ あら手の嫌がらせかな 246 名前：デフォルトの名無しさん mailto:sage [2023/04/04(火) 19:06:27.39 ID:gM2C6lf70.net] >>242 どうしても細い線が引きたいけどないのでそうするしかないんです 247 名前：デフォルトの名無しさん mailto:sage [2023/04/04(火) 19:29:11.09 ID:S7HWOC1cd.net] >>243 ダイアログの「なし」の下の破線が一番細い実線だよ 0.5ptって訳じゃないけどこれで代用はできない？ https://i.imgur.com/FI2RhpR.png 248 名前：デフォルトの名無しさん mailto:sage [2023/04/04(火) 19:40:07.41 ID:CrO9FoIt0.net] やりたければやればいい 何がわからないのかわからない 丸投げしたいなら初めからそう言っとけ 249 名前：デフォルトの名無しさん mailto:sage [2023/04/04(火) 19:57:30.78 ID:renXLxQ5r.net] 流石に何も調べず「こうしたいんです」って言われてもね 調べた上で質問しろよ流石に 250 名前：デフォルトの名無しさん mailto:sage [2023/04/04(火) 19:57:38.37 ID:gM2C6lf70.net] >>244 プリンタの問題なのかその破線だと印刷されません ブラザーのモノクロレーザーなんですが 色々と調べたところインクジェットだと滲むから印字されるけどレーザーだと細すぎて印刷できないみたいです 251 名前：デフォルトの名無しさん mailto:sage [2023/04/04(火) 20:11:18.91 ID:5YvJO7dSd.net] >>247 レーザーでも印刷はできる プリント解像度が合ってないから変えて試せ 要件としてはプリンターで細い罫線を出力したいが正しいのに、 情報小出しにするのはなぜ？ 252 名前：デフォルトの名無しさん [2023/04/04(火) 20:27:01.14 ID:6BEiQs1Sd.net] 馬鹿は馬鹿な頭で馬鹿な方法を考えついて馬鹿な質問をする法則 例の零細企業の馬鹿でわかったはずだろ？ 253 名前：デフォルトの名無しさん mailto:sage [2023/04/04(火) 21:06:09.03 ID:gM2C6lf70.net] >>248 考えた結果、オートシェイプで線を引くしかない、となったのでそれのやり方を聞きました ブラザーのサポートにも問い合わせたけどそういうものみたいです 254 名前：デフォルトの名無しさん mailto:sage [2023/04/04(火) 22:10:24.26 ID:gM2C6lf70.net] ちなみに点線は印刷業界でいうヘアラインというやつでプリンタの一番細い線を出すという命令なので いいプリンタほどほぼ印字されないそうです なので設定は無関係です 300dpiにすれば印字されますが文字が汚いです 印刷のアドバイスを聞きたいわけでも情報を後出ししているわけでもなく、 オートシェイプで線を引くコードが知りたかっただけです 255 名前：デフォルトの名無しさん mailto:sage [2023/04/04(火) 22:16:45.73 ID:KVvIoDM70.net] 絶対に自分で調べたほうが早いし楽だし拡張性あるのに、頑なに人に聞くやつっているよな ggrks 256 名前：デフォルトの名無しさん mailto:sage [2023/04/04(火) 22:33:10.85 ID:zXZGFdaS0.net] 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極細 直線を引くと消す作業が必要に成る 257 名前：デフォルトの名無しさん mailto:sage [2023/04/04(火) 22:57:58.66 ID:H3UIOgUM0.net] 下線を付ける場合って普通はアンダーライン機能使うし、空欄の下線なら＿＿＿　（シフト+「ろ」） ~~~~~~~~~~ (半角波線) ^^^^^^ (ハット)　で上行の強調みたいな書き方したり ─────　(罫線文字）　━━━━━　(罫線文字太い)　　でたいていは済むと思うが 258 名前：デフォルトの名無しさん mailto:sage [2023/04/04(火) 23:21:59.65 ID:gM2C6lf70.net] 下線というのはセル毎の仕切り線という意味でした わかりにくくてすみません 259 名前：デフォルトの名無しさん [2023/04/04(火) 23:30:14.47 ID:khpg5U9yM.net] >>249 馬鹿は馬鹿な質間の後に後出し条件を付けるも追加で 260 名前：デフォルトの名無しさん mailto:sage [2023/04/05(水) 00:53:07.23 ID:ab4hIo8m0.net] >>256 別に全然後出しとは思ってないけどね 細い線が出したいです、ではなくて 自動でオートシェイプで線を書く方法を教えてください、なんだから 261 名前：デフォルトの名無しさん mailto:sage [2023/04/05(水) 00:54:17.99 ID:ab4hIo8m0.net] ろくなやついないみたいだからよそいくね 262 名前：デフォルトの名無しさん [2023/04/05(水) 01:00:51.04 ID:XcJibMPkM.net] 何が問題なのかわからない馬鹿ばっかのところが見つかるといいね 263 名前：デフォルトの名無しさん mailto:sage [2023/04/05(水) 01:20:39.85 ID:Yfsd/RuOd.net] 知恵遅れ袋があるじゃないか 264 名前：デフォルトの名無しさん (ﾜｯﾁｮｲ 7f42-novi) mailto:sage [2023/04/05(水) 07:58:24.80 ID:nt1BQkgU0.net] >>257 それは自分が思う解決方法であって目的は細い線を印刷することだろ 265 名前：デフォルトの名無しさん (ｽｯｯﾌﾟ Sd9f-YxMi) mailto:sage [2023/04/05(水) 08:35:05.20 ID:xBlgsSX7d.net] 罫線文化は日本特有だからそろそろ辞めよう 266 名前：デフォルトの名無しさん (ﾜｯﾁｮｲ ffda-kVuH) mailto:sage [2023/04/05(水) 11:17:22.11 ID:hwWjK5am0.net] そういい続けてもう何年になるだろうか 267 名前：デフォルトの名無しさん (ﾜｯﾁｮｲ dfda-icd+) mailto:sage [2023/04/05(水) 11:34:30.61 ID:Pachb7xx0.net] >>258 オイオイw　提示したコード試したンか？w　オートシェイプの線と罫線と両方をサンプルして 尚且つ、線種や色を改良しやすいように例示もしたってのに　 出力できる太さに限界があるなら色を変えることで改善させるのもひとつの解決策だろうに 268 名前：デフォルトの名無しさん (ｽﾌﾟｯｯ Sd9f-j25d) [2023/04/05(水) 14:48:49.66 ID:RBswHKfYd.net] >>264 そういうまともな発想が通じない自分の馬鹿な解決方法とやらに拘るのが馬鹿の馬鹿たる所以だ、残念なことに 269 名前：デフォルトの名無しさん (ﾌﾞｰｲﾓ MM83-KLNd) mailto:sage [2023/04/05(水) 19:37:02.68 ID:/dmeuB+9M.net] どこが日本特有だよ タイやら中国やらアメリカやらからデータ来るけど罫線なんて普通に使いまくりだぞ 文化じゃねーよ無職知ったかかよ 270 名前：デフォルトの名無しさん (ﾜｯﾁｮｲ c5da-Rzwh) mailto:sage [2023/04/09(日) 10:12:35.57 ID:RxxIHycr0.net] さて、そろそろ書けますか？ 271 名前：デフォルトの名無しさん (ﾜｯﾁｮｲ c5da-Rzwh) mailto:sage [2023/04/09(日) 10:34:21.92 ID:RxxIHycr0.net] うおお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　それらの国でもイージーな書式でも通用するから 敢えて日本向けに罫線書式で送り付けてきてる可能性だってある　何かに憑り付かれたように「これでなきゃだめ」 なのは、使う側が融通効かない石頭揃いなせいが大　容易に使えてそれを容認するような文化　が無い(劣ってる)とは言える 272 名前：デフォルトの名無しさん mailto:sage [2023/04/09(日) 12:18:38.23 ID:xFg640up0.net] 部署で唯一VBA使える人が異動しそうなので なにか力になりたいけれども、マイクロソフトのVBAスタンダードの 勉強をするよりはその人のコードを見て調べて…の方が良いでしょうか。 資格は実務に役立たないとよく聞くので。 273 名前：デフォルトの名無しさん mailto:sage [2023/04/09(日) 12:44:54.33 ID:IMhUrj1Nd.net] >>269 VBAスタンダードなんかのVBAエキスパート資格とMicrosoftは無関係 だからVBAスタンダードより異動する前にコード見て、聞けるところを聞いておく方が有意義 274 名前：デフォルトの名無しさん mailto:sage [2023/04/09(日) 12:49:57.62 ID:I9Qf3W7D0.net] 何も知らないやつが仕事で力になりたいけどとか簡単に言っちゃいけないよ 他人のVBAコードは不条理の塊と見なせるから、担当が自分に振られたのでなければ下手に関わらない方がいい 異動なら連絡は付くだろうし、君が心配しなくとも引継ぎ担当が面倒見てくれるよ 275 名前：デフォルトの名無しさん mailto:sage [2023/04/09(日) 12:59:51.78 ID:xFg640up0.net] >>270 >>271 ありがとうございます。よく分かりました。 ちなみに引き継ぎを受ける候補は私なので 自分でもコツコツ勉強プラス異動後も聞くことにします。 276 名前：デフォルトの名無しさん mailto:sage [2023/04/09(日) 13:03:59.67 ID:fQMTK17W0.net] こっそりYouTubeで解説動画見て、簡単なの自分で作って、実務のVBA眺めて意味を考えてググって分からなかったらここで聞いて勉強してからじゃない？ 最初は使い方だけ聞けばいいし、中身変更なんて頻繁にないでしょ。 277 名前：デフォルトの名無しさん mailto:sage [2023/04/09(日) 17:34:38.52 ID:VccS8NQy0.net] >>268 交互色もよくみる 278 名前：デフォルトの名無しさん mailto:sage [2023/04/09(日) 18:28:02.92 ID:SycmVm660.net] >>280 Listobject使うと自動で交互色テーブルになるんですが他国言語版はならんのか? 279 名前：デフォルトの名無しさん (ｱｳｱｳｳｰ Sa05-MV9R) [2023/04/09(日) 21:15:17.28 ID:/EJLPp0Da.net] おちつけ 280 名前：デフォルトの名無しさん (ﾜｯﾁｮｲ c619-5xw/) [2023/04/11(火) 06:32:54.99 ID:2FEVzV7Z0.net] >>269 VBAの試験なんて 適当にVBA組んでれば その内何も勉強しなくても エキスパートいきなり受けても受かる試験だから そん時受ければいいよ。 EXCELの試験の方が難しいらしい 281 名前：デフォルトの名無しさん (ﾜｯﾁｮｲ c510-CGoK) mailto:sage [2023/04/11(火) 10:56:35.96 ID:muoUIQjV0.net] 日商表計算1級は自慢してもいいレベルらしい。 mosは…察し。 282 名前：デフォルトの名無しさん [2023/04/15(土) 17:32:15.76 ID:m9DY7U8S0.net] エクセルのチェックボックスにチェック入れたら、特定のセルに文字を入力する方法を教えてください ↓みたいにチェック入れたり外したりしたら、セルB2に入る文字を変えたいです https://jsfiddle.net/07ed2ajc/ 283 名前：デフォルトの名無しさん mailto:sage [2023/04/15(土) 17:39:31.98 ID:iq3ZlEDB0.net] セル チェックボックス 連動 で沢山出てくるよ 284 名前：デフォルトの名無しさん (ｽﾌﾟｰﾌﾟ Sdea-/HYv) mailto:sage [2023/04/22(土) 08:24:42.08 ID:Ir4lduVSd.net] A列の「作業結果」ごとに振り分けたいんだけど良い方法ない？ ピポッド組んだ方がはやいかな？ A列　　　　　B列 作業結果 氏名 不備なし 田中 不備あり 佐藤 不備なし 佐々木 不備あり 加藤 ↓別シートに転記したい A列 不備なし 田中 佐々木 不備あり 佐藤 加藤 285 名前：デフォルトの名無しさん (ｽﾌﾟｰﾌﾟ Sdea-/HYv) mailto:sage [2023/04/22(土) 08:27:50.42 ID:Ir4lduVSd.net] フィルタかけて　「不備なし」、「不備あり」ごとに転記 作業結果　　氏名 不備なし 田中 不備なし 佐々木 不備あり 佐藤 不備あり 加藤 「作業結果」列で重複データのみを削除 Sheets("Sheet2").Range("A1").CurrentRegion.RemoveDuplicates Columns:=1, Header:=xlYes 作業結果　　氏名 不備なし 田中 　　　　 佐々木 不備あり 佐藤 　　　　 加藤 ここまではイメージしたのだけれど、 そもそもとして、A列の属性ごとにまとめたいから、上記ではうまくいかないような… 286 名前：デフォルトの名無しさん (ｽﾌﾟｰﾌﾟ Sdea-/HYv) mailto:sage [2023/04/22(土) 08:29:37.58 ID:Ir4lduVSd.net] 氏名はありきたりなのを使用したので大丈夫かとｗ 287 名前：デフォルトの名無しさん (ﾜｯﾁｮｲ 7d32-RykB) mailto:sage [2023/04/22(土) 08:31:58.26 ID:EkSMf2Yw0.net] あかん不倫ありに見えた・・・ 288 名前：デフォルトの名無しさん (ｽﾌﾟｰﾌﾟ Sdea-/HYv) mailto:sage [2023/04/22(土) 08:52:52.45 ID:Ir4lduVSd.net] 自己解決 ピボット組んだ方が説明しやすいような気がした 289 名前：デフォルトの名無しさん (ﾜｯﾁｮｲ 7d32-RykB) mailto:sage [2023/04/22(土) 08:56:33.28 ID:EkSMf2Yw0.net] 今月に入って勉強し始めたわいはフォームからの操作で使ってるけど、 ある結果に該当するデータを　For ～　Next と If ～ Elseでふりわけてコピーしてる。 290 名前：デフォルトの名無しさん (ﾜｯﾁｮｲ eaea-cSV1) mailto:sage [2023/04/22(土) 09:16:50.26 ID:0F5tuW810.net] >>281 Excel2019以後や365版ならVBAでなくワークシート関数のFilter関数使った方が楽かと。 こんな感じ。 =FILTER(B:B,A:A=“不備なし”) 291 名前：デフォルトの名無しさん (ｽﾌﾟｰﾌﾟ Sdea-/HYv) mailto:sage [2023/04/22(土) 09:43:24.98 ID:Ir4lduVSd.net] >>287 これいけそうだね。 毎日集計ださなければならないんだけど、 日付で絞るのは楽勝だとして、 不備なし 不備あり ごとにFILTERかければいいんだね。 なるべく誰でも分かるものにしろ、 とのお達しなので来週ためしてみるよ。 どうもありがとう。 292 名前：デフォルトの名無しさん mailto:sage [2023/04/24(月) 16:29:17.11 ID:51aj6gGh0.net] Excelのシートにpdfを貼り付けたいんですが（一枚目だけでいい） OLEObjecps.Add でファイルパスを与えて取り込むと 文字が読みづらいレベルで 解像度が低く取り込まれてしまいます 簡単なプレビューをエクセル上でしたいだけで pdfのパスが入ってるセルを選択したら シート上に表示、といったことがやってます 別のファイルを選択したら前のプレビューは消して次のファイルをプレビューする、みたいな Acrobat Readerはインストされてますが 無料環境でやりたいです。 293 名前：デフォルトの名無しさん [2023/04/24(月) 16:37:38.75 ID:nUpPvlxcd.net] >>289 Windowsも有料だし、電気代も掛かるし無料は無理でしょ 他は現状報告だけで答える部分はありませんね 質問やり直せ 294 名前：デフォルトの名無しさん mailto:sage [2023/04/25(火) 10:02:17.63 ID:OOi8qz2x0.net] >>289 　>解像度が低く取り込まれる　が、把握しずらかったが https://www.microsoft.com/ja-jp/biz/smb/column-excel-pdf.aspx 　　↑の、【PDF がぼやけて表示される際の原因と対策】が合致するのか 295 名前：デフォルトの名無しさん mailto:sage [2023/04/25(火) 11:27:26.34 ID:Y1VsObgtd.net] pdfを画像として印刷して その画像を取り込めばいいと思う 296 名前：デフォルトの名無しさん mailto:sage [2023/04/25(火) 12:49:16.15 ID:S+8jDJ380.net] >>291 ありがとうございます 設定試してみましたが、症状はかわりませんでした… >>292 一応考えはしましたが、面倒で躊躇していました… pdfを取り込むという方針でばかり検索していたので見つかりませんでしたが webbrowserに表示するという手に逃げることにしました フォームのModalをオフにしてサイズを可変にすれば シート上のオブジェクトと似たような操作性にはなるので これで行こうと思います 297 名前：デフォルトの名無しさん mailto:sage [2023/04/25(火) 12:56:36.27 ID:P6aAftcz0.net] なぜReaderに表示させるではだめなのか 298 名前：デフォルトの名無しさん (ﾜｯﾁｮｲ 11da-/HYv) mailto:sage [2023/04/25(火) 13:26:27.30 ID:OOi8qz2x0.net] そこはほら、ファイルパスを指定して読み込む　という部分で察するに 表示されたPDFに関連した他の情報もSheet上にいろいろあれこれ連動して表示されるとか そういうつくりに成ってるのかも知れない　デュアルモニタでも無いんで目が散るとかも pngやjpgとかの画像ならオブジェクト扱いで拡大縮小すれば何とか処置できるかも知らんけど PDF固有の問題とかなんだろ 299 名前：デフォルトの名無しさん (ｱｳｱｳｳｰ Sa21-9dEq) mailto:sage [2023/04/25(火) 14:59:34.57 ID:OylHipqda.net] >>294 すいません pdfだけじゃなくて 普通の画像もユーザーに同じUIで操作させたいのと 普通のReaderはファイルを連続で開くと タブで複数開こうとするので諦めました… 新しいファイルを開いたら 新しいインスタンス作らず開き直してくれれば近い動作になるんですが あと、AlwaysTopにする必要もありますし 余計に大変だと考えていませんでした >>295さんの内容でだいたい正解です 300 名前：デフォルトの名無しさん (ﾜｯﾁｮｲ ea79-lTfL) mailto:sage [2023/04/25(火) 22:10:00.33 ID:RtJhGNCC0.net] 1 PDFをAdobeReaderで開く 2 AdobeReaderにCtrl+Lを送ってフルスクリーンにする 3 画面キャプチャする 4 クリップボードの画像をシートに貼り付ける 5 AdobeReaderを閉じる 何が面倒なんだこれ 301 名前：デフォルトの名無しさん (ﾜｯﾁｮｲ ea2f-FGqy) mailto:sage [2023/04/26(水) 17:36:17.42 ID:gCvQh4su0.net] １回だけならいいかもしれんが、毎日何回もやるとなったら 面倒だと思わんほうがどうかしてる 302 名前：デフォルトの名無しさん (ﾜｯﾁｮｲ ea79-lTfL) mailto:sage [2023/04/26(水) 21:05:50.62 ID:zbbRZmOB0.net] VBAスレで何言ってんだコイツ 303 名前：デフォルトの名無しさん (ﾜｯﾁｮｲ c55f-6css) [2023/04/26(水) 22:50:11.08 ID:hkryowTT0.net] まぁwebbrowserで済むなら そっちのほうが良いだろね readerのインスタンス閉じたり開いたりしなくていいし いちいち画像スクショのフローも通す必要ないし 処理もパスを渡すだけで済むし なんだったら複数ページでもスクロール確認できるし 304 名前：デフォルトの名無しさん (ﾜｯﾁｮｲ b710-tJUV) mailto:sage [2023/05/03(水) 21:37:40.68 ID:u6AyBhT90.net] 数値が指数表示されるのどうやって直しますか format で@にすれば直るって言う人いるけど末尾にE15とか付いちゃう 305 名前：デフォルトの名無しさん (ｽｯﾌﾟ Sdbf-v/6/) [2023/05/03(水) 22:23:40.94 ID:sgDEJw+Jd.net] >>301 馬鹿は消えろ 306 名前：デフォルトの名無しさん (ﾜｯﾁｮｲ 7759-gUqw) [2023/05/04(木) 03:04:51.18 ID:0+hX2o4p0.net] 表示形式変えたら良くね？ 307 名前：デフォルトの名無しさん (ﾜｯﾁｮｲ b7da-pJvN) mailto:sage [2023/05/04(木) 07:02:56.52 ID:OlPgSuVa0.net] >>301 随分前に取り込んだcsv内のデータが指数表示になって困ったことがある。 セルの書式設定が標準だと12桁以上の数値は自動的に指数表示になるexcelの仕様らしいので書式設定を数値にするか、頭にアポストロフィをつけて文字列として入れたかのどちらかで対応した記憶。 308 名前：デフォルトの名無しさん (ﾜｯﾁｮｲ 77da-fitb) mailto:sage [2023/05/04(木) 09:06:13.63 ID:c0G0c79m0.net] csvの取り込みはVBAから直接ではなく、 PowerQueryにした。 エンコードや読込み列数の指定もできる。 309 名前：デフォルトの名無しさん (ﾜｯﾁｮｲ 7710-Q4KC) mailto:sage [2023/05/04(木) 17:35:17.84 ID:SG8oVDU20.net] 分からないから質問しているのに馬鹿だの何だのって。 310 名前：デフォルトの名無しさん (ｽﾌﾟｰﾌﾟ Sd3f-SRD8) mailto:sage [2023/05/04(木) 18:18:33.10 ID:KWp7766Yd.net] >>306 馬鹿でNGしておくといい 質問スレによくいる罵るだけ罵って自身は何もしない無能な奴だよ 311 名前：デフォルトの名無しさん (ｽｯﾌﾟ Sdbf-v/6/) [2023/05/04(木) 19:48:22.72 ID:pc2Dfs+qd.net] >>307 よく読んでいないのに決めつける馬鹿 お前らにはわからない時には時々答えているぞ 312 名前：デフォルトの名無しさん (ﾜｯﾁｮｲ 7710-Q4KC) mailto:sage [2023/05/04(木) 20:21:25.82 ID:SG8oVDU20.net] おいおい、NGワードての初めて使ったがあぼーんだらけだぞ？？ いかにここがNGワードだらけか分かったよ。 313 名前：デフォルトの名無しさん (ﾜｯﾁｮｲ d6da-KeI6) mailto:sage [2023/05/10(水) 02:58:03.13 ID:ixnOuziw0.net] なにアホぬかしてんねん 314 名前：デフォルトの名無しさん (ﾜｯﾁｮｲ cb10-9aD/) mailto:sage [2023/05/10(水) 20:53:06.79 ID:cJ3FIEe20.net] あぼーん 315 名前：デフォルトの名無しさん (ﾜｯﾁｮｲ d6da-KeI6) mailto:sage [2023/05/11(木) 22:30:54.17 ID:tQtEMv7I0.net] あかーん 316 名前：デフォルトの名無しさん (ﾜｯﾁｮｲ cb10-9aD/) mailto:sage [2023/05/12(金) 22:05:56.53 ID:dIt5+Jxy0.net] おぼーん 317 名前：デフォルトの名無しさん (ﾜｯﾁｮｲ cfda-ZkZz) mailto:sage [2023/05/13(土) 19:38:24.33 ID:E3uC06QM0.net] こぼーん 318 名前：デフォルトの名無しさん mailto:sage [2023/05/15(月) 07:09:01.65 ID:Rm921WLC0.net] 会社のシステム(黒バックに緑の字)で“数字→Ent”で画面表示を切り替えて行くんだけど、どうしてもSendkeyでEnt(テンキー側)が押せない。(それ以外は押せている) NumLockの問題では無いと思うんだけど、何が問題なんだろう？ “｛ENTER｝”でも“~”でもダメでした。 どうもメインキー側のEntを押している感じがする。(Entはそれぞれ別の機能か割り振られている) Sendkeyで無理なら他の方法ってない？ ちなみにVBAは独学でやっている初心者なので、お手柔らかに。 319 名前：デフォルトの名無しさん (ｽﾌﾟｰﾌﾟ Sd1f-kDbr) mailto:sage [2023/05/15(月) 07:44:39.36 ID:S3yoUkobd.net] 大きいEnterとテンキーのEnterはキーコードが違う テンキー側は{ENTER} sendkeysで{PRTSC}やっても画面キャプチャ撮れないのと同じようなものかも AutoHotKeyみたいなツール使った方が簡単かもよ 320 名前：デフォルトの名無しさん (ﾜｯﾁｮｲ a32d-Q5z4) mailto:sage [2023/05/15(月) 08:33:02.84 ID:Rm921WLC0.net] >>316 いや、返信が早いのはありがたいんだけど、エンターキーが別なのは分かってるから、テンキー側か押せないと書いてるワケなんだけど…。 会社のパソコンだから、勝手に別アプリは入れられない。 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 無知は恥じることじゃ無い

---

---

[ 続きを読む ] / [ 携帯版 ]

read.cgi ver5.27 [feat.BBS2 +1.6] / e.0.2 (02/09/03) / eucaly.net products.
担当:undef