[過去ﾛｸﾞ]
Excel VBA 質問スレ Part68 (1002ﾚｽ)
Excel VBA 質問スレ Part68 http://mevius.5ch.io/test/read.cgi/tech/1598756127/
上
下
前
次
1-
新
通常表示
512ﾊﾞｲﾄ分割
ﾚｽ栞
このｽﾚｯﾄﾞは過去ﾛｸﾞ倉庫に格納されています｡
次ｽﾚ検索
歴削→次ｽﾚ
栞削→次ｽﾚ
過去ﾛｸﾞﾒﾆｭｰ
383: デフォルトの名無しさん (ﾜｯﾁｮｲ 6bce-S0Wo) [sage] 2020/09/23(水) 20:26:43 ID:kiC/kEHG0 Windows.Arrange ArrangeStyle:=xlVertical http://mevius.5ch.io/test/read.cgi/tech/1598756127/383
384: デフォルトの名無しさん (ﾜｯﾁｮｲ 12b5-VcBo) [sage] 2020/09/23(水) 20:34:38 ID:Dfniq8Ns0 >>381 ありがとう >>383 本当にありがとう 馬鹿すぎる質問して親切に教えてくれて本当に感謝 教えてくれたコードの方を頂きます 3画面揃ったときについでに分割させたら良い動きしてくれました めちゃくちゃ後付けですみませんが これを一番右でこいつは真ん中とか 任意の配置は流石に無理ですか？ 出来そうなら自分でも何とか調べてみます http://mevius.5ch.io/test/read.cgi/tech/1598756127/384
385: デフォルトの名無しさん (ﾜｯﾁｮｲ 6bce-S0Wo) [sage] 2020/09/23(水) 21:30:49 ID:kiC/kEHG0 >>384 できる http://mevius.5ch.io/test/read.cgi/tech/1598756127/385
386: デフォルトの名無しさん (ﾜｯﾁｮｲ 126d-6H/P) [] 2020/09/23(水) 22:06:19 ID:gKXTj3UI0 こういう馬鹿の特徴は、少し教えるとつけあがって自分で考えることもせずあれもこれもとねだること 少しは頭を使えよ http://mevius.5ch.io/test/read.cgi/tech/1598756127/386
387: デフォルトの名無しさん (ﾜｯﾁｮｲ 237c-F8K1) [sage] 2020/09/23(水) 22:26:51 ID:uvIhcfbN0 特徴っていうかこれいつもの人 http://mevius.5ch.io/test/read.cgi/tech/1598756127/387
388: デフォルトの名無しさん (ﾜｯﾁｮｲ 5fda-b+lb) [sage] 2020/09/25(金) 20:09:48 ID:48EvNsnc0 accdb → 問題なく型指定出来る。 csv → schema.iniで型指定出来る。 自シート → どうすんの? IMEX=1も利いたり効かなかったりで当てにならん。 http://mevius.5ch.io/test/read.cgi/tech/1598756127/388
389: デフォルトの名無しさん (ﾜｯﾁｮｲ 4bda-b+lb) [sage] 2020/09/25(金) 21:07:06 ID:1nrszLVg0 そういう報告はいらないです http://mevius.5ch.io/test/read.cgi/tech/1598756127/389
390: デフォルトの名無しさん (ﾜｲｰﾜ2 FF6a-A++P) [sage] 2020/09/25(金) 21:36:41 ID:WSuN06d1F 罫線の所属するセルについて質問です セルの値を条件にして罫線の種類を変えようと考えているのですが、 隣合うセルの境界線はどちらのセルの罫線が優先されて表示されるのでしょうか？ よろしくお願いします http://mevius.5ch.io/test/read.cgi/tech/1598756127/390
391: デフォルトの名無しさん (ﾜﾝﾐﾝｸﾞｸ MM42-KfQ2) [sage] 2020/09/25(金) 22:18:01 ID:JBJKUwWVM >>390 実験して報告よろしく http://mevius.5ch.io/test/read.cgi/tech/1598756127/391
392: デフォルトの名無しさん (ﾜｯﾁｮｲ 5fda-b+lb) [sage] 2020/09/25(金) 22:34:46 ID:48EvNsnc0 後から指定した方だな。 思いっきり拡大すれば、線が2本引いてあるのが見えるのかと思ったが、そんなことはなかった。 ちなみに、ストIIで2人同時に投げ技をかけた場合、どちらが優先されるのかはランダムで50%/50%らしい。 http://mevius.5ch.io/test/read.cgi/tech/1598756127/392
393: デフォルトの名無しさん (ﾜｯﾁｮｲ 03ef-b+lb) [sage] 2020/09/25(金) 23:34:29 ID:3gugGrYy0 >>390 これ、たしか罫線の種類で、基本ごっつい順に優先順位があったはず ついでに、セルの書式設定で罫線設定すると、隣のセルの罫線設定も消えたり変わったりする http://mevius.5ch.io/test/read.cgi/tech/1598756127/393
394: デフォルトの名無しさん (ﾜｯﾁｮｲ 4b49-b+lb) [sage] 2020/09/26(土) 11:57:49 ID:aYgi9d/P0 太いほうだった（Excelばーじょん2016） https://i.imgur.com/kfSAyHL.png 印刷境界とかは分けて認識されてるから、なんだかんだ自分のコードを検証したほうがいいな http://mevius.5ch.io/test/read.cgi/tech/1598756127/394
395: デフォルトの名無しさん (ﾜｯﾁｮｲ 4b49-b+lb) [sage] 2020/09/26(土) 13:23:27 ID:aYgi9d/P0 あ、宣言とかしときながらシート指定するん忘れてやがる http://mevius.5ch.io/test/read.cgi/tech/1598756127/395
396: デフォルトの名無しさん (ﾜｯﾁｮｲ 5f01-b+lb) [sage] 2020/09/26(土) 19:01:46 ID:J5kcfwi60 ﾜﾗﾀ http://mevius.5ch.io/test/read.cgi/tech/1598756127/396
397: デフォルトの名無しさん (ﾜｯﾁｮｲ 5fda-b+lb) [sage] 2020/09/26(土) 20:07:30 ID:wDXyaCpN0 getElementBy飽きたんだけど、RPA的制御じゃなくて、htttp通信を駆使してどうにかする、みたいのない? APIとか使えない古いシステムに対して。 http://mevius.5ch.io/test/read.cgi/tech/1598756127/397
398: デフォルトの名無しさん (ﾜｯﾁｮｲ 4bda-b+lb) [sage] 2020/09/27(日) 07:29:13 ID:KJpIeh7z0 htttp通信がわからんがセキュリティー的に問題起きるんじゃね http://mevius.5ch.io/test/read.cgi/tech/1598756127/398
399: デフォルトの名無しさん (ﾜｯﾁｮｲ 168e-jKyR) [sage] 2020/09/27(日) 15:17:02 ID:a7rnW+2W0 htttpは、ハイパー・トンマ・トンチンカン・タコ・( ´,_ゝ｀)ﾌﾟｯの略かな http://mevius.5ch.io/test/read.cgi/tech/1598756127/399
400: デフォルトの名無しさん (ｽｯﾌﾟ Sd52-OmYe) [sage] 2020/09/27(日) 15:27:50 ID:o5RjmHqkd >>397 アセンブラやりたいってこと? というのと同じ話。 InternetExplorer.Applicationじゃ無くてもみんなgetElementBy使う。 こういう便利なものを放棄するならhtmlのソースを自前テキスト処理で頑張るしかないと思うが。 普通はmsxml2.xmlhttpとかでソース取得して、それをDocumentに入れてgetElemetsByだな。 http://mevius.5ch.io/test/read.cgi/tech/1598756127/400
401: デフォルトの名無しさん (ﾜｯﾁｮｲ 5f01-b+lb) [sage] 2020/09/27(日) 17:34:22 ID:V5qiYsAI0 >>397 その辺は自作ライブラリでビブラートに包めばOK http://mevius.5ch.io/test/read.cgi/tech/1598756127/401
402: デフォルトの名無しさん (ﾃﾃﾝﾃﾝﾃﾝ MMde-Pn4v) [sage] 2020/09/27(日) 18:37:04 ID:ZqjiPey8M >>401 > >>397 > その辺は自作ライブラリでビブラートに包めばOK 震わせてどうすんのさ。オブラートだろって釣られた http://mevius.5ch.io/test/read.cgi/tech/1598756127/402
403: デフォルトの名無しさん (ﾜｯﾁｮｲ 5fda-b+lb) [sage] 2020/09/27(日) 18:40:59 ID:6iq7bspN0 >>400 マジか! xmlがどうとか、APIがないとダメなんだと思ってたわ。 http://mevius.5ch.io/test/read.cgi/tech/1598756127/403
404: デフォルトの名無しさん (ﾜｯﾁｮｲ 5fda-b+lb) [sage] 2020/09/27(日) 18:44:20 ID:6iq7bspN0 ん? それだと、逆に何のためにGUI操作(IE制御)の方法があるの? 初心者用? http://mevius.5ch.io/test/read.cgi/tech/1598756127/404
405: デフォルトの名無しさん (ｽｯﾌﾟ Sd32-OmYe) [sage] 2020/09/28(月) 07:43:08 ID:VRZutR0gd >>403 勘違いしてる。 別のAPI使ってるということだ。 で、別のAPIにもgetElemetByが出てくると言ってる。 http://mevius.5ch.io/test/read.cgi/tech/1598756127/405
406: デフォルトの名無しさん (ﾜｯﾁｮｲ 922f-ozis) [sage] 2020/09/28(月) 13:09:33 ID:LAwWa5+y0 RPA的制御がなにかよくわからんが getElementしたくなかったら、API利用してxml取得しろみたいな話を言われたんじゃないか それでAPI使えないけどgetElementしない方法ないの？と 取得できるものがhtmlなら、すなおにgetElementしとけ 以上 ちなみにxmlだろうとhtmlだろうとcsvだろうと、それは多くの場合httpで取得してるだろうがな http://mevius.5ch.io/test/read.cgi/tech/1598756127/406
407: デフォルトの名無しさん (ｵｲｺﾗﾐﾈｵ MM6e-oFxJ) [sage] 2020/09/28(月) 15:51:42 ID:m7hqrCGdM >>402 オブラートに包んでもおかしくないか 普通ラップするとかカプセル化するとか言うんじゃ・・・ >>404 どれもhttp通信でデータを取得できる共通点があるだけで、目的はそれぞれ違う IEクラスはブラウザを操作する為のコンポーネントの一部 mshttpクラスはIEがスクリプトでhttp通信をするためのコンポーネントの一部 WinHttpRequestクラスはWindowsがhttp通信をするためのコンポーネントの一部 (コンポーネントっていうのはプログラムの部品として使うのが想定されている小さいプログラムのこと) それぞれ色んなシステムで使えるようにCOMインターフェースっていう取説のようなものが実装されていて、VBAはそのおかげで間借り出来てるだけ どれもVBAの為だけに作ったプログラムではない ちなみにIEクラスの利点として、ブラウザ上でjsが実行されているページにアクセスすることができる点がある http://mevius.5ch.io/test/read.cgi/tech/1598756127/407
408: デフォルトの名無しさん (ｽｯﾌﾟ Sd32-PD9b) [] 2020/09/28(月) 16:26:17 ID:gMLgNw+wd それをVBAでやる意味は何？ もっと他に簡単に出来る言語でやれは？ http://mevius.5ch.io/test/read.cgi/tech/1598756127/408
409: デフォルトの名無しさん (ﾗｸｯﾍﾟﾍﾟ MMde-T5KC) [] 2020/09/28(月) 16:37:22 ID:oE/worxcM 結果をexcelで扱うならVBAが最適では？ http://mevius.5ch.io/test/read.cgi/tech/1598756127/409
410: デフォルトの名無しさん (ﾃﾃﾝﾃﾝﾃﾝ MMde-AIC5) [sage] 2020/09/28(月) 18:37:13 ID:jqaTJ4CpM CSVで吐いてExcelで開くだけだろう http://mevius.5ch.io/test/read.cgi/tech/1598756127/410
411: デフォルトの名無しさん (ﾜｯﾁｮｲ 124f-OaTC) [sage] 2020/09/28(月) 19:21:37 ID:JyFvX52s0 あーい あーい ああああーい http://mevius.5ch.io/test/read.cgi/tech/1598756127/411
412: デフォルトの名無しさん (ﾜｯﾁｮｲ 1663-QTQj) [sage] 2020/09/28(月) 21:25:16 ID:d76PIxro0 質問させていただきます ユーザーフォームのテキストボックスにフォーカスがあたってる(入力状態)でwindowsのデスクトップがアクティブもしくは他アプリケーションがアクティブを検知することはできますでしょうか？ タッチパネルなどでユーザーフォーム外をタッチしてしまった時を検出したいです。 できるのであればご教授願いたい… http://mevius.5ch.io/test/read.cgi/tech/1598756127/412
413: デフォルトの名無しさん (ﾜｯﾁｮｲ b35f-OzOo) [] 2020/09/29(火) 00:06:40 ID:bEee4vhd0 Windowオブジェクトにどんなプロパティがあるんだっけ http://mevius.5ch.io/test/read.cgi/tech/1598756127/413
414: デフォルトの名無しさん (ﾜｯﾁｮｲ b35f-QE0L) [sage] 2020/09/29(火) 00:29:27 ID:zU8eGPuC0 フォームのdeactivateイベント拾ってテキストボックスのフォーカス状態見て処理するとかどうかな http://mevius.5ch.io/test/read.cgi/tech/1598756127/414
415: デフォルトの名無しさん (ﾜｯﾁｮｲ 237c-F8K1) [sage] 2020/09/29(火) 00:32:40 ID:zjqvAHva0 deactivateは用途が違う http://mevius.5ch.io/test/read.cgi/tech/1598756127/415
416: デフォルトの名無しさん (ﾜｯﾁｮｲ 4b2c-ozis) [sage] 2020/09/29(火) 00:49:54 ID:Iz7+ZlTk0 HTML, XML, CSV などのスクレイピングなら、 Ruby で、Nokogiri, Selenium Webdriver などが簡単 curl, wget でも、ファイルをダウンロードできるし Rubyで、nokogiri, curl を使った例 require 'nokogiri' html = `curl http://www.example.com/` doc = Nokogiri::HTML( html ) elements = doc.css( "h1" ) puts elements.first.content #=> Example Domain http://mevius.5ch.io/test/read.cgi/tech/1598756127/416
417: デフォルトの名無しさん (ﾜｯﾁｮｲ 23e6-T5KC) [] 2020/09/29(火) 06:58:50 ID:iE38wEdU0 外部プロセスの起動、待機、出力の取り込みまで実装してくださいよ http://mevius.5ch.io/test/read.cgi/tech/1598756127/417
418: デフォルトの名無しさん (ﾜｯﾁｮｲ 5f01-b+lb) [sage] 2020/09/29(火) 09:56:21 ID:UZS7qkIf0 Rubyの自動運転は使いやすかったけど 早々にサポート切られたから印象悪い http://mevius.5ch.io/test/read.cgi/tech/1598756127/418
419: デフォルトの名無しさん (ｱｳｱｳｳｰ Sa43-QTQj) [sage] 2020/09/29(火) 11:55:53 ID:NIgnBYPca >>413 調べて見ましたがそれっぽいものは発見できませんでした… >>414 >>415さんのおっしゃる通りブックやユーザーフォームのDeactivateイベントでは機能しませんでした。 http://mevius.5ch.io/test/read.cgi/tech/1598756127/419
420: デフォルトの名無しさん (ｽｯｯﾌﾟ Sd32-OmYe) [sage] 2020/09/29(火) 23:34:39 ID:Rcn+G4xKd VBAでやる意味? VBA以外だとアホな操作が必要だぞ。 1.Excelを閉じる。 2.他言語で実行。 3.csvをExcelで開く。 全くアホらしい。 運用についての考え方がまるで違う。 他言語でやる場合ってのはバッチ処理なのか? それしか無いのか? そういうブツ切りでデータ加工していくというなら寧ろExcelなんぞ使わん。 http://mevius.5ch.io/test/read.cgi/tech/1598756127/420
421: デフォルトの名無しさん (ﾜｯﾁｮｲ e3da-yeTY) [] 2020/09/30(水) 00:00:14 ID:BPaZHsLq0 >>407 jsしたかったらIEするしかないのね。 今時のHPほぼ全滅じゃん。 http://mevius.5ch.io/test/read.cgi/tech/1598756127/421
422: デフォルトの名無しさん (ﾜｯﾁｮｲ b3e6-2+Dn) [sage] 2020/09/30(水) 00:36:25 ID:5bnpK3a00 >>419 WINAPIでポーリング https://i.imgur.com/NQMR2Km.png http://mevius.5ch.io/test/read.cgi/tech/1598756127/422
423: デフォルトの名無しさん (ﾜｯﾁｮｲ 53ce-2+Dn) [sage] 2020/09/30(水) 06:50:20 ID:RkFeWfqX0 イルカのカイル http://mevius.5ch.io/test/read.cgi/tech/1598756127/423
424: デフォルトの名無しさん (ﾜｯﾁｮｲ f35f-67ZW) [] 2020/09/30(水) 16:18:36 ID:7F4wikGt0 >>419 そのマルチタスク、マルチウィンドウを否定したい理由は何なの？ http://mevius.5ch.io/test/read.cgi/tech/1598756127/424
425: デフォルトの名無しさん (ﾜｯﾁｮｲ cf63-dtjG) [sage] 2020/09/30(水) 16:57:41 ID:QOxpj5qw0 >>424 フォームのテキストボックスに機器の計測値が入るようになっており テキストボックスにフォーカスがあたってない状態で計測値が送られてくると値が取れないのでおじーちゃんたちにも気づくようにフォーカスが離れた時に警告ユーザーフォームを出したいのです。他アプリケーションなどを立ち上げる事も想定されます。 >>422 情報ありがとうございます 画像の通りやってみましたがイルカさんは働いてくれませんでした… http://mevius.5ch.io/test/read.cgi/tech/1598756127/425
426: デフォルトの名無しさん (ﾜﾝﾄﾝｷﾝ MM9f-hUkp) [sage] 2020/09/30(水) 20:43:21 ID:2p9V72Q+M >>425 アホとしか言えんわ そもそも設計が間違えてる http://mevius.5ch.io/test/read.cgi/tech/1598756127/426
427: デフォルトの名無しさん (ﾜｯﾁｮｲ d3da-Kk5w) [sage] 2020/09/30(水) 21:46:10 ID:d9KXZKY60 >>425 値を入れる部分を直せよ http://mevius.5ch.io/test/read.cgi/tech/1598756127/427
428: デフォルトの名無しさん (ﾜｯﾁｮｲ ffe6-2+Dn) [sage] 2020/09/30(水) 22:51:09 ID:wQcBlxXT0 RPAとか使ったらこんなおぞましいものができたりするのかな？ でも普通はExcelぐらいサポートしてるよな。。。 http://mevius.5ch.io/test/read.cgi/tech/1598756127/428
429: デフォルトの名無しさん (ﾜｯﾁｮｲ b37c-Uy5C) [sage] 2020/09/30(水) 23:05:33 ID:FnwBo45S0 むしろRPA向きの案件だと思う http://mevius.5ch.io/test/read.cgi/tech/1598756127/429
430: デフォルトの名無しさん (ﾃﾃﾝﾃﾝﾃﾝ MM7f-vZte) [sage] 2020/10/01(木) 01:07:42 ID:lGabW6tFM >>425 > フォームのテキストボックスに機器の計測値が入るようになっており wの前にデータ取得しとるわなw >テキストボックスにフォーカスがあたってない状態で計測値が送られてくると値が取れない wそんな業務データを取りこぼすとか意味不明w >のでおじーちゃんたちにも気づくように wなんだ？老害か？w http://mevius.5ch.io/test/read.cgi/tech/1598756127/430
431: デフォルトの名無しさん (ﾜｯﾁｮｲ 7f4b-3DJV) [sage] 2020/10/01(木) 01:18:01 ID:eVzeZjSn0 意味がわからないなら黙ってればいいじゃない http://mevius.5ch.io/test/read.cgi/tech/1598756127/431
432: デフォルトの名無しさん (ﾌﾞｰｲﾓ MMff-gZNM) [sage] 2020/10/01(木) 07:38:17 ID:v/kjpRq5M 業務用ツール作るのってホント大変よな…… 使いたい人向けに配信するんじゃなくて、使わされる人に使ってもらうツールだからどんなに優しいUIにしても平気で想像を上回るイレギュラーな操作して動かなくなった！ポンコツめ！みたいなクレーム出してくる人もいるし 単純に新しい物を使いたくないからってワザとメチャクチャな操作したりもしてるんだろうけど ツールを要求してくる上の人達は現状の環境で対応出来るようにしたいからExcelのマクロでどうにかしてよ！とか言ってくるし、VBAはなんでも出来る魔法のツールだと思ってるし 長々と愚痴ってスマンな スレチだよな http://mevius.5ch.io/test/read.cgi/tech/1598756127/432
433: デフォルトの名無しさん (ｽｯｯﾌﾟ Sd1f-nakg) [sage] 2020/10/01(木) 07:49:06 ID:H0TKMoBwd Windowsの標準のユーザーインターフェイスを意識しないと、使いやすいと思ったものが結局つかいにくくなる。 フォーカスがあたってなくても計測値が取れるように作るという発想が無いのが厳しい。 そんなこと出来ないなら根本から違うユーザーインターフェイスを採用すべき。 こういう処理でユーザーに何かさせる必要は無い筈。 http://mevius.5ch.io/test/read.cgi/tech/1598756127/433
434: デフォルトの名無しさん (ﾜｯﾁｮｲ d3da-Kk5w) [sage] 2020/10/01(木) 10:04:49 ID:+ML6JMtp0 初心者がツール作るように言われたら大変なんだろうな、俺は大変だと思ったことないが http://mevius.5ch.io/test/read.cgi/tech/1598756127/434
435: デフォルトの名無しさん (ﾗｸｯﾍﾟﾍﾟ MM7f-62ru) [] 2020/10/01(木) 10:34:23 ID:6DJ6J+GDM タブレットでバーコードリーダーのキーボード入力モードでも使ってるんだろうなと想像 COMで操作できるライブラぐらい付いているだろうからそれ使えば解決 http://mevius.5ch.io/test/read.cgi/tech/1598756127/435
436: デフォルトの名無しさん (ﾜｯﾁｮｲ cf63-dtjG) [sage] 2020/10/01(木) 16:54:34 ID:Ld5Ou2iR0 >>435 まさにおっしゃる通りで作業進捗をバーコードで管理するものを作りました。 次は工程内のチェックシートと計測値などのトレーサビリティです禿げそう とりあえず計測器具も試用で借りてる段階なのでメーカーにライブラリの事聞いてみます… http://mevius.5ch.io/test/read.cgi/tech/1598756127/436
437: デフォルトの名無しさん (ﾃﾃﾝﾃﾝﾃﾝ MM7f-vZte) [] 2020/10/01(木) 17:12:49 ID:W6bAQtLIM >>431 知ってた http://mevius.5ch.io/test/read.cgi/tech/1598756127/437
438: デフォルトの名無しさん (ｱｳｱｳｴｰ Sadf-ywH8) [sage] 2020/10/01(木) 18:58:16 ID:9Yax9dsIa >>434 かっけぇ http://mevius.5ch.io/test/read.cgi/tech/1598756127/438
439: デフォルトの名無しさん (ﾜｯﾁｮｲ ff1f-Fuq4) [sage] 2020/10/01(木) 21:36:53 ID:dM4yb7Ap0 罫線で囲われてたり、色塗りされたりするセルをマウスでドラッグ移動した時移動した場所は何もなくるなるのを罫線のみを残す方法ってありませんか？ 簡単に言うと罫線で作った表の形式を保持したい。 http://mevius.5ch.io/test/read.cgi/tech/1598756127/439
440: デフォルトの名無しさん (ｵｲｺﾗﾐﾈｵ MMa7-gXeV) [sage] 2020/10/01(木) 21:50:29 ID:5ESnmk3DM >>439 テンプレートを隠しシートに保存しておいて、 ボタン押下で書式をコピペしてくるってどう？ http://mevius.5ch.io/test/read.cgi/tech/1598756127/440
441: デフォルトの名無しさん (ﾜｯﾁｮｲ e33d-9f2k) [sage] 2020/10/01(木) 22:00:05 ID:gLHdGUpR0 >>439 切り貼りじゃなくてコピーアンドペーストした後に元のところの数式と値をクリア(右クリック+N)すればよいのでは http://mevius.5ch.io/test/read.cgi/tech/1598756127/441
442: デフォルトの名無しさん (ﾜｯﾁｮｲ ff02-Uy5C) [sage] 2020/10/01(木) 23:26:28 ID:ywfP0KwV0 changeイベントで常に罫線引くことしか思いつかん http://mevius.5ch.io/test/read.cgi/tech/1598756127/442
443: デフォルトの名無しさん (ﾜｯﾁｮｲ b37c-Uy5C) [sage] 2020/10/01(木) 23:48:07 ID:2OGRwJxy0 移動できないようにする http://mevius.5ch.io/test/read.cgi/tech/1598756127/443
444: デフォルトの名無しさん (ﾜｯﾁｮｲ e3da-yeTY) [] 2020/10/02(金) 01:42:30 ID:MWdBgx4Q0 セルをマウスでドラッグって何だよ? エクセルで将棋でもやるの? http://mevius.5ch.io/test/read.cgi/tech/1598756127/444
445: デフォルトの名無しさん (ﾜｯﾁｮｲ f35f-67ZW) [] 2020/10/02(金) 01:43:49 ID:ChxT/cO/0 >>425 それExcel VBAでやるものではない。 自分のやりたいようにやりたければ、Windows SDKでの開発をしてください。 http://mevius.5ch.io/test/read.cgi/tech/1598756127/445
446: デフォルトの名無しさん (ﾜｯﾁｮｲ f35f-67ZW) [] 2020/10/02(金) 01:49:29 ID:ChxT/cO/0 >>439 そもそも手順というものを考えた方がいい。 移動する前の情報を移動先には持ってくるが、移動元にはその情報を適用しないのはなぜ？ http://mevius.5ch.io/test/read.cgi/tech/1598756127/446
447: デフォルトの名無しさん (ﾜｯﾁｮｲ d3cc-gW4a) [sage] 2020/10/02(金) 10:09:18 ID:A7BNHAQE0 指定したフォルダ内の全てのＣＶＳファイルを配列に追記していき対のですが、コードを教えてください 配列の０列目（１次元目）にはそれぞれのＣＳＶファイルのファイル名をいれたいです。 Sub Sptyou() Dim FolderPath As String, buf As String, TargetDate As String '■フォルダを指定する With Application.FileDialog(msoFileDialogFolderPicker) If .Show = 0 Then MsgBox "キャンセルされました。" Exit Sub End If FolderPath = .SelectedItems(1) End With '■指定されたフォルダ内の全てのCSVファイルを開いて、そのファイルＡ列からＧＨ列を配列に入れていく ReDim BiforeArraybar(1, 190) As Variant http://mevius.5ch.io/test/read.cgi/tech/1598756127/447
448: 447 (ﾜｯﾁｮｲ d3cc-gW4a) [sage] 2020/10/02(金) 10:09:56 ID:A7BNHAQE0 つづき buf = Dir(FolderPath & "*.csv") Do While buf <> "" Open buf For Input As #1 'インプットモードでファイルを開く Line Input #1, TargetDate Do Until EOF(1) 'ファイルの終点まで Line Input #1, Tardt '開いたファイルを上から順に読み込んでいき、変数TargetDateに代入していく If Split(TargetDate, ",")(1) = "" Then Exit Do '配列に追記する ReDim Preserve BiforeArray(Ubound(BiforeArray) + 1 To ??, 1 To 190) = Sprit(TargetDate,",") Loop Close #1 buf = Dir() Loop End Sub http://mevius.5ch.io/test/read.cgi/tech/1598756127/448
449: デフォルトの名無しさん (ﾌﾞｰｲﾓ MM27-gZNM) [sage] 2020/10/02(金) 10:42:45 ID:cHoSzh9XM ReDim Preserveで操作可能なのは最右端の次元だけだから2次元配列で1次元目に使いたいなら一旦反転させた状態で操作して出力時にWorksheetfunction.transpose使って吐き出す必要があるぞ いまいち最終目的が分からなかったから取り合えず読んでて気になった所だけ http://mevius.5ch.io/test/read.cgi/tech/1598756127/449
450: デフォルトの名無しさん (ﾜｯﾁｮｲ d32c-G8Sl) [sage] 2020/10/02(金) 10:56:02 ID:ooD45Zz30 Linux のcat なら、複数のファイルを連結できるけど http://mevius.5ch.io/test/read.cgi/tech/1598756127/450
451: デフォルトの名無しさん (ﾗｸｯﾍﾟﾍﾟ MM7f-62ru) [] 2020/10/02(金) 12:25:22 ID:XdHW2/g2M win dosならcopyで連結できるけど http://mevius.5ch.io/test/read.cgi/tech/1598756127/451
452: デフォルトの名無しさん (ﾜｯﾁｮｲ d3da-Kk5w) [sage] 2020/10/02(金) 12:29:54 ID:a296oIK60 >>448 内側のLoop内で Tardt ってのが気になった http://mevius.5ch.io/test/read.cgi/tech/1598756127/452
453: 447 (ﾜｯﾁｮｲ d3cc-jreG) [sage] 2020/10/02(金) 13:32:21 ID:A7BNHAQE0 >>449 右端にファイル名を入れるにはどうしたらいいですか？ それと、配列のＵｐｐｅｒをどう設定したらいいですか？ http://mevius.5ch.io/test/read.cgi/tech/1598756127/453
454: デフォルトの名無しさん (ﾜｯﾁｮｲ ff6d-Zm3W) [] 2020/10/02(金) 15:56:01 ID:7/1+1goB0 また馬鹿な質問者か。それともいつもの厚かましい馬鹿か？ http://mevius.5ch.io/test/read.cgi/tech/1598756127/454
455: デフォルトの名無しさん (ﾗｸｯﾍﾟﾍﾟ MM7f-62ru) [] 2020/10/02(金) 16:13:26 ID:XdHW2/g2M 右端の次元と右端の列では話の次元が違うけどわざとやってんのかなー？ excelなんだからとりあえずシートに格納すればいいと思うんだけどなー 配列に1行づつ追加するよりはやいんじゃね？ VBは動的配列無いんだからパフォーマンス出すには頭を使わにゃいかんよ 行数をキーにしたDictionaryもいいかもね http://mevius.5ch.io/test/read.cgi/tech/1598756127/455
456: デフォルトの名無しさん (ﾜｯﾁｮｲ ffad-gZNM) [sage] 2020/10/02(金) 16:51:14 ID:p6rjz1Jr0 >>453 配列のUpperが何を意味してるのかいまいち分からんがこんな感じで良いんか？ Line Input #1, TargetDate BeforeArray(0, Ubound(BeforeArray, 2)) = ファイル名 For文[1〜190](BeforeArrayにSplit(TargetDate, ″,″)を放り込む) ReDim Preserve BeforeArray(0 to 190, Ubound(BeforeArray, 2)+1) Do Until EOF(1) Line Input #1, TargetDate For文[1〜190](BeforeArrayにSplit(TargetDate, ″,″)を放り込む) ReDim Preserve BeforeArray(0 to 190, Ubound(BeforeArray, 2)+1) Loop http://mevius.5ch.io/test/read.cgi/tech/1598756127/456
457: デフォルトの名無しさん (ﾜｯﾁｮｲ d3da-Kk5w) [sage] 2020/10/02(金) 18:32:48 ID:a296oIK60 >>453 こういうことじゃないのか targetdata = buf & "," & targetdata http://mevius.5ch.io/test/read.cgi/tech/1598756127/457
458: デフォルトの名無しさん (ﾜｯﾁｮｲ e3da-Kk5w) [sage] 2020/10/02(金) 22:17:00 ID:MWdBgx4Q0 >>455 サイドブレーキを使う坂道発進をダサイと感じるようなもので、 どう考えてもシート格納が合理的なのに、無理して配列を使うわけですよ。 http://mevius.5ch.io/test/read.cgi/tech/1598756127/458
459: デフォルトの名無しさん (ﾜｯﾁｮｲ d32c-G8Sl) [sage] 2020/10/02(金) 23:43:54 ID:ooD45Zz30 CSV の規格では、各要素をクォート文字で囲めば、 各要素中に、列区切り文字も入れられる "a,b", x Ruby などのCSVライブラリを使わず、 自力で、列区切り文字で分割すると、バグるだけ CSVの規格を知らない香具師が、よくやってる http://mevius.5ch.io/test/read.cgi/tech/1598756127/459
460: デフォルトの名無しさん (ﾜｯﾁｮｲ 7f4b-3DJV) [sage] 2020/10/03(土) 00:18:46 ID:DSTQ9BDR0 csvに規格ってあったんだ http://mevius.5ch.io/test/read.cgi/tech/1598756127/460
461: デフォルトの名無しさん (ﾜｯﾁｮｲ f35f-MSJL) [] 2020/10/03(土) 07:11:14 ID:umHauNXS0 ExcelでCSVをダブルクリックで開いて編集、上書きして事故る人が多いね http://mevius.5ch.io/test/read.cgi/tech/1598756127/461
462: デフォルトの名無しさん (ﾜｯﾁｮｲ ff01-V07v) [sage] 2020/10/03(土) 07:17:22 ID:NCQ7EVNV0 >>460 一応あるけど結局Excelで読めないとダメって言うケースが大多数だったりする http://www.kasai.fm/wiki/rfc4180jp http://mevius.5ch.io/test/read.cgi/tech/1598756127/462
463: デフォルトの名無しさん (ﾜｯﾁｮｲ 53ce-2+Dn) [sage] 2020/10/03(土) 08:43:50 ID:2jz2H7gQ0 そのRFCって、たくさんあるローカルルールの1つを紹介してるだけだよな 強制力もなさそうだし、現時点ではあんまり意味がなさそう http://mevius.5ch.io/test/read.cgi/tech/1598756127/463
464: デフォルトの名無しさん (ﾜｯﾁｮｲ f35f-67ZW) [] 2020/10/03(土) 11:51:59 ID:ylT9+9xh0 >>459 マイクロソフトの製品はそれに沿っているものがあるが、クォーテーションがついたり、つかなかったりするのは、人間にとってもタチが悪く、完全に失敗した仕様と結論が出ている。 http://mevius.5ch.io/test/read.cgi/tech/1598756127/464
465: 459 (ﾜｯﾁｮｲ d32c-IT45) [sage] 2020/10/03(土) 13:01:37 ID:/wA+nWqo0 列区切り文字は、必要なければ省略できる つまり、x も、"x" も同じ。 全ての要素に、付けてもよい ただし、"a,b" みたいに要素内に、 行区切り文字・列区切り文字・クォート文字を含む場合は、省略できない http://mevius.5ch.io/test/read.cgi/tech/1598756127/465
466: 459 (ﾜｯﾁｮｲ d32c-IT45) [sage] 2020/10/03(土) 13:03:38 ID:/wA+nWqo0 >>465 修正 >列区切り文字は、必要なければ省略できる クォート文字は、必要なければ省略できる http://mevius.5ch.io/test/read.cgi/tech/1598756127/466
467: デフォルトの名無しさん (ﾜｯﾁｮｲ 7f4b-3DJV) [sage] 2020/10/03(土) 13:04:25 ID:DSTQ9BDR0 できないって言われましても強制力無いですし http://mevius.5ch.io/test/read.cgi/tech/1598756127/467
468: デフォルトの名無しさん (ﾜｯﾁｮｲ ff2f-G8Sl) [sage] 2020/10/03(土) 13:34:48 ID:zZGrTJee0 まあそもそも多数の実装が出てからそれ集めて決めた仕様だからな http://mevius.5ch.io/test/read.cgi/tech/1598756127/468
469: デフォルトの名無しさん (ﾜｯﾁｮｲ e3da-Kk5w) [sage] 2020/10/03(土) 19:43:36 ID:WrZNWJut0 そういやあれ何だろうな。 QueryTableだとセル内改行でずれるのに、 ADOだとずれないとか。 http://mevius.5ch.io/test/read.cgi/tech/1598756127/469
470: デフォルトの名無しさん (ﾜｯﾁｮｲ 6309-gW4a) [sage] 2020/10/04(日) 19:09:07 ID:mqiPq7lq0 配列を戻す自作関数を呼び出し先Subから複数回実行して、配列を結合したい んだけど、どうすればできますか？ redim preserveとUBoundを使うのかも しれないけど、いい感じにまとまったコードが書けない。 例えば、下の関数を、別のSubから2回実行させて、 「Ary(3) ※中身：path1,path2,path1,path2」 の結果を得たいです。 Function TestFunc() Dim testPath(1) testPath(0) = "path1" testPath(1) = "path2" 'return TestFunc = testPath End Function http://mevius.5ch.io/test/read.cgi/tech/1598756127/470
471: デフォルトの名無しさん (ﾜｯﾁｮｲ 6309-gW4a) [sage] 2020/10/04(日) 19:09:08 ID:mqiPq7lq0 配列を戻す自作関数を呼び出し先Subから複数回実行して、配列を結合したい んだけど、どうすればできますか？ redim preserveとUBoundを使うのかも しれないけど、いい感じにまとまったコードが書けない。 例えば、下の関数を、別のSubから2回実行させて、 「Ary(3) ※中身：path1,path2,path1,path2」 の結果を得たいです。 Function TestFunc() Dim testPath(1) testPath(0) = "path1" testPath(1) = "path2" 'return TestFunc = testPath End Function http://mevius.5ch.io/test/read.cgi/tech/1598756127/471
472: デフォルトの名無しさん (ﾜｯﾁｮｲ 6309-gW4a) [sage] 2020/10/04(日) 19:09:56 ID:mqiPq7lq0 連投すいません http://mevius.5ch.io/test/read.cgi/tech/1598756127/472
473: デフォルトの名無しさん (ｽｯｯﾌﾟ Sd1f-+ya4) [sage] 2020/10/04(日) 19:15:03 ID:l1LxtJm7d 注意 ID:mqiPq7lq0 いつもの馬鹿です http://mevius.5ch.io/test/read.cgi/tech/1598756127/473
474: デフォルトの名無しさん (ﾜｯﾁｮｲ d3da-Kk5w) [sage] 2020/10/04(日) 21:13:23 ID:3bz1Ts/P0 >>471 検索したらいいんじゃね http://mevius.5ch.io/test/read.cgi/tech/1598756127/474
475: デフォルトの名無しさん (ﾜｯﾁｮｲ b37c-Uy5C) [sage] 2020/10/04(日) 21:42:10 ID:NRUY+ZF00 >>471 例えとかいい感じとかじゃなくて正確にコードを提示してどの部分をどうしたいのか明確に説明した方がいいよ http://mevius.5ch.io/test/read.cgi/tech/1598756127/475
476: デフォルトの名無しさん (ｽｯｯﾌﾟ Sd1f-EBv7) [] 2020/10/04(日) 21:43:28 ID:hlbFeQNpd 後出し続けて全部作ってもらおうという魂胆の奴だぞ http://mevius.5ch.io/test/read.cgi/tech/1598756127/476
477: デフォルトの名無しさん (ｵｯﾍﾟｹ Sr47-owA3) [sage] 2020/10/05(月) 01:21:09 ID:Roj0MJiCr VBAからIEを操作して、タグを指定して.valueやselctedで自動化しているのですが、ヤフオクの商品説明だけどうしても値の挿入ができません。 Tabや近い要素をフォーカスしたりクリックし、SendkeyなどでShift +Tabからエンダーなど試していますが、一向に解決できません。 直接でか無くてもカーソルが点滅させれれば、クリップボード経由で貼り付けるような仕様にしようと考えています。 http://mevius.5ch.io/test/read.cgi/tech/1598756127/477
478: デフォルトの名無しさん (ﾜｯﾁｮｲ d32c-IT45) [sage] 2020/10/05(月) 07:08:41 ID:z7kgQPv30 漏れは、Ruby, Selenium Webdriver で、ブラウザを自動操作して、 send_key で、ユーザー名・パスワードを自動入力して、ヤフーにログインしてる require "selenium-webdriver" options = Selenium::WebDriver::Chrome::Options.new options.add_option( :detach, true ) # ブラウザを切り離す options.add_argument( '--start-maximized' ) # 画面最大 driver = Selenium::WebDriver.for :chrome, options: options driver.manage.timeouts.implicit_wait = 10 # default timeout driver.navigate.to "https://login.yahoo.co.jp/config/login_verify2?.src=ym" element = driver.find_element(:id => "username") element.send_key "ユーザー名" driver.find_element(:id => "btnNext").click element = driver.find_element(:id => "passwd") element.send_key "パスワード" driver.find_element(:id => "btnSubmit").click http://mevius.5ch.io/test/read.cgi/tech/1598756127/478
479: 478 (ﾜｯﾁｮｲ d32c-IT45) [sage] 2020/10/05(月) 07:11:02 ID:z7kgQPv30 そもそも、IE なんか動くのか？ 漏れは、Chrome http://mevius.5ch.io/test/read.cgi/tech/1598756127/479
480: デフォルトの名無しさん (ﾊﾞｯﾄﾝｷﾝ MMc7-7HYc) [sage] 2020/10/05(月) 12:57:11 ID:BlyIycRMM >>475 すみません。 Sub test Dim i,ary() For i = 1 to 2 ary = TestFunc ※ary配列の要素の最後に呼び出した配列を追加していきたい Next End http://mevius.5ch.io/test/read.cgi/tech/1598756127/480
481: デフォルトの名無しさん (ﾜｯﾁｮｲ d3da-Kk5w) [sage] 2020/10/05(月) 13:22:13 ID:PJYbs+y10 配列に配列を追加するのを初心者がつくるなら 追加する2つの配列と結果を格納する配列の計３つを用意して順番に格納すればできないかな？ http://mevius.5ch.io/test/read.cgi/tech/1598756127/481
482: デフォルトの名無しさん (ﾜﾝﾄﾝｷﾝ MMe7-hUkp) [sage] 2020/10/05(月) 14:35:29 ID:8f5Gi5TxM >>480 いい加減にしろや糞が http://mevius.5ch.io/test/read.cgi/tech/1598756127/482
ﾒﾓ帳
(0/65535文字)
上
下
前
次
1-
新
書
関
写
板
覧
索
設
栞
歴
あと 520 ﾚｽあります
ｽﾚ情報
赤ﾚｽ抽出
画像ﾚｽ抽出
歴の未読ｽﾚ
AAｻﾑﾈｲﾙ
Google検索
Wikipedia
ぬこの手
ぬこTOP
0.237s*