Excel VBA 質問スレ Part49©2ch.net

レス数が1000を超えています。これ以上書き込みはできません。
2017/06/26(月) 02:15:14.60ID:T3ylemnb0
!extend:checked:vvvvv:1000:512
!extend:checked:vvvvv:1000:512

スレ立ての際は一行目に
!extend:checked:vvvvv:1000:512
と入れてスレ立てして下さい

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

※前スレ
Excel VBA 質問スレ Part48
http://mevius.2ch.net/test/read.cgi/tech/1494890685/

※関連スレ
VBAなんでも質問スレ Part2
http://mevius.2ch.net/test/read.cgi/tech/1432173164/
Access VBA 質問スレ Part1
http://mevius.2ch.net/test/read.cgi/tech/1328536426/
Excel総合相談所 126
https://mevius.2ch.net/test/read.cgi/bsoft/1496487719/
VIPQ2_EXTDAT: checked:vvvvv:1000:512:----: EXT was configured
2017/08/26(土) 07:13:30.51ID:vvYv5Hier
>>973
働いたことないの?
2017/08/26(土) 07:22:16.86ID:vvYv5Hier
>>974
一応、ファイルのフォーマットにはユニークなカラムはあるんだけどね。
システム側では、そのカラムはキーになってない。。。と思われ。

さすがにシステムの仕様まではわからない。
977デフォルトの名無しさん (ワッチョイ 1d4b-rG16)
垢版 |
2017/08/26(土) 09:32:33.78ID:5dccF0/k0
>>931
ありがとうございます。
あれから色々試しましたがいくつか問題点があります。

問題1
Dim el As IHTMLElement を削除するとTDが取得出来ず、table丸ごとの取得となります。
問題2
Dim htmlDoc As HTMLDocument を削除するとエラーが出ます。
問題3
7番目のサンプルを実行するとこの部分がエラーをおこします。
objDOM.body.innerHTML = objXML.responseText

問題1についてtableデータ丸ごとでも取得後必要箇所を抜き出せばいいので用は足せます。
変わらなければそのままいこうと思っていますが相手サーバーへの負担は増えるのでしょうか?

問題2について削除しなければ問題ありませんがxml化時に下記3箇所をどのように記載を変更すればいいでしょうか?
Dim htmlDoc As HTMLDocument
Set htmlDoc = objIE.document
Set colTable = htmlDoc.getElementsByName("oppai")

問題3について下記の("htmlfile")が原因かと思ったのですがこのままでいいでしょうか?
それとも何かのシート名を入れるのでしょうか?
Set objDOM = CreateObject("htmlfile")

毎度すいませんがよろしくお願い致します。
2017/08/26(土) 13:59:12.95ID:1Xp/S2sl0
>>958
>システムへの大量レコードのアップロードって、ミスした時が大変なのよ。
>アップロードするファイルを間違えたりするやつが必ずいるから

人間は、必ず間違うから、絶対に回復機能が必要。
普通は、バックアップ・スナップショット機能で、前の状態へ戻れる

銀行では、アルバイト3人が、同じデータを入力する。
3人とも同じ金額の時だけ、合格

バリデ、validation
2017/08/26(土) 14:10:14.30ID:1Xp/S2sl0
>>977
JavaScript の、jQuery でやれば?
Groovy, Ruby でも良いし

何で、VBA でやる?
VBAには、クロージャがあるのか?

最初から、ライブラリが揃っている言語を、使えば良いだけ
2017/08/26(土) 14:14:47.08ID:svByvDEZ0
>>978
>銀行では、アルバイト3人が、同じデータを入力する。
どこの銀行だよwww聞いたことないわwww
2017/08/26(土) 15:49:08.64ID:O53zOlu10
データを2人で入力してチェックするのは割りと普通
https://www.noc-net.co.jp/blog/2015/06/column_050/
重要な奴なら3重チェックもあるんじゃね
2017/08/26(土) 16:55:31.30ID:azDqTcfP0
>>972
>アップ済みのファイルを再度アップしてしまったり、修正前のファイルをアップしたりとか、

間違ったと気づいた時点でオペレータ自身が元に戻せるような仕組みを作るのはそれほど難しくないよ
手動でExcelを修正するステップやその前のステップを含めてシステム化するのが理想ではあるだろうけどね

ただ100~300万くらいのお金を莫大な金と言ってるんであれば自力で頑張るしかない
担当が変われば元の木阿弥だし、本来機械にやらせるべき仕事を人間がやってることによる逸失利益を加味したら安い買い物
2017/08/26(土) 17:26:45.76ID:O53zOlu10
>>982
要件も確認しないうちから
> 間違ったと気づいた時点でオペレータ自身が元に戻せるような仕組みを作るのはそれほど難しくないよ
とか言うアホ営業 w
2017/08/26(土) 17:45:46.64ID:6HYM9FnY0
在庫と直結するようなシステムだと現物が関わるからタイミングによっては取り戻すの大変だしね。
2017/08/26(土) 17:49:54.05ID:azDqTcfP0
>>983
ははは、言いたいことはわかるけどそれは客が要件をすべて決めると思ってるやつの発想
費用に応じて提供出来る内容を変えてあげればいいだけ
そういう調整が出来ない人ばっかりだと苦労するよね

まあそこは論点じゃなく莫大な費用がかかると思ってるのは解決方法の選択肢が見えてないだけで
思ってるほどの費用がかからない方法も有るよってことよ
VBAのかわりにスクリプト書くだけなら100万もいらんし
2017/08/26(土) 17:55:27.18ID:azDqTcfP0
>>984
それは今でも発生しうる業務フローの問題でしょ?
誰かが確認するっていうステップが必要なだけで1件1件コピペ入力しなきゃいけないのとは別問題
確認が必要ならそのフローをシステムに取り込んであげればいい

機械で自動確認できるほうが楽だけどそれは必須じゃないじゃん
2017/08/26(土) 17:56:27.22ID:azDqTcfP0
Excel関係ない気がするからこの辺にしとくわ
2017/08/26(土) 18:39:24.64ID:O53zOlu10
>>985
> まあそこは論点じゃなく莫大な費用がかかると思ってるのは解決方法の選択肢が見えてないだけで
だから要件も見えてないのに選択肢が見えるわけないだろ w
>>984の件も数件なら後追いで修正できるけど1万件とかになると破綻するとかあるだろうし
2017/08/26(土) 19:30:25.78ID:qX5fc/S5a
株かなにかで金額間違えてニュースになったな
2017/08/26(土) 19:42:35.36ID:eHXsO5oX0
あれはトレーダーによる入力だからそれ自体が一次情報
複数人による入力対象ではない
2017/08/26(土) 21:03:15.65ID:F72uLJPi0
いつから問題の対象が
複数人による入力
に限定されるようになったんだ
2017/08/26(土) 22:10:58.71ID:eHXsO5oX0
さあ
2017/08/27(日) 02:42:06.83ID:L7AzHdYH0
>>914
> こんなのはスクリプトでも手作業でもなく、エクセルアップロードして終わりとかにして欲しいんだけど。
と書いた時から、サーバ側も巻き込んだシステム全体の話になってしまって
このスレの範疇を越えるものになったんだろうな
それは多分「単純作業をVBAでなんとかしたい」と思ってただけの>>914にとって
「そんなことを議論されても俺にはどうしようもない・・・」と思ってると思う
2017/08/27(日) 09:42:07.86ID:M71tiO6/0
2017/08/27(日) 10:41:40.78ID:hneRKt3Sa
>>993
そもそもは>>958が手入力を安全策とか言い出したことからだろ。

手入力なんて全く安全策じゃないし、コンピューターを使う以上、安全性を追求しすぎると本末転倒になるという話。
2017/08/27(日) 12:36:10.64ID:9rRkVsmFa
銀行でバイトに入力させるとかないだろ
2017/08/27(日) 12:40:26.06ID:LjjEWylk0
>>996
あるよ。金融業だけど、新規口座の個人情報入力は子会社の派遣君がやってた。
チェックは正社員がやる。

振込処理なんかはもちろん、絶対にないw
2017/08/27(日) 12:40:42.78ID:LjjEWylk0


Excel VBA 質問スレ Part50 [無断転載禁止]?2ch.net
https://mevius.2ch.net/test/read.cgi/tech/1503805217/l50
2017/08/27(日) 13:14:20.45ID:EGaKBA6h0
>>998
2017/08/27(日) 13:34:20.02ID:rBvqwKY30
ぬるぽ
10011001
垢版 |
Over 1000Thread
このスレッドは1000を超えました。
もう書けないので、新しいスレッドを立ててくださいです。。。
life time: 62日 11時間 19分 6秒
レス数が1000を超えています。これ以上書き込みはできません。
5ちゃんねるの広告が気に入らない場合は、こちらをクリックしてください。

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