!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
探検
Excel VBA 質問スレ Part49©2ch.net
レス数が1000を超えています。これ以上書き込みはできません。
1デフォルトの名無しさん 転載ダメ©2ch.net (ワッチョイ bb2e-8SzA)
2017/06/26(月) 02:15:14.60ID:T3ylemnb0972デフォルトの名無しさん (オッペケ Sr6d-d2qD)
2017/08/25(金) 18:24:10.85ID:KTLmtMM0r >>966
フォーマットの問題じゃないんだよね。
アップ済みのファイルを再度アップしてしまったり、修正前のファイルをアップしたりとか、フォーマットに問題はないのでシステムは受け付けてしまう。
その辺をリカバリできるシステムにしようとするとまた莫大な金がかかるので、上はなかなか動かない。
それによってどのくらいのコスト削減あるいは利益が見込めるのか、まずは数字出さないと話も聞いてもらえないよ。
フォーマットの問題じゃないんだよね。
アップ済みのファイルを再度アップしてしまったり、修正前のファイルをアップしたりとか、フォーマットに問題はないのでシステムは受け付けてしまう。
その辺をリカバリできるシステムにしようとするとまた莫大な金がかかるので、上はなかなか動かない。
それによってどのくらいのコスト削減あるいは利益が見込めるのか、まずは数字出さないと話も聞いてもらえないよ。
973デフォルトの名無しさん (アウアウカー Sa85-HXRX)
2017/08/25(金) 22:45:26.71ID:jbJbRr/0a974デフォルトの名無しさん (ワッチョイ caaa-vgeI)
2017/08/25(金) 23:17:31.65ID:11RxMW0L0 >>973
たぶんキーが無いんじゃない?
たぶんキーが無いんじゃない?
975デフォルトの名無しさん (オッペケ Sr6d-d2qD)
2017/08/26(土) 07:13:30.51ID:vvYv5Hier >>973
働いたことないの?
働いたことないの?
976デフォルトの名無しさん (オッペケ Sr6d-d2qD)
2017/08/26(土) 07:22:16.86ID:vvYv5Hier977デフォルトの名無しさん (ワッチョイ 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")
毎度すいませんがよろしくお願い致します。
ありがとうございます。
あれから色々試しましたがいくつか問題点があります。
問題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")
毎度すいませんがよろしくお願い致します。
978デフォルトの名無しさん (ワッチョイ 86aa-oTLP)
2017/08/26(土) 13:59:12.95ID:1Xp/S2sl0 >>958
>システムへの大量レコードのアップロードって、ミスした時が大変なのよ。
>アップロードするファイルを間違えたりするやつが必ずいるから
人間は、必ず間違うから、絶対に回復機能が必要。
普通は、バックアップ・スナップショット機能で、前の状態へ戻れる
銀行では、アルバイト3人が、同じデータを入力する。
3人とも同じ金額の時だけ、合格
バリデ、validation
>システムへの大量レコードのアップロードって、ミスした時が大変なのよ。
>アップロードするファイルを間違えたりするやつが必ずいるから
人間は、必ず間違うから、絶対に回復機能が必要。
普通は、バックアップ・スナップショット機能で、前の状態へ戻れる
銀行では、アルバイト3人が、同じデータを入力する。
3人とも同じ金額の時だけ、合格
バリデ、validation
979デフォルトの名無しさん (ワッチョイ 86aa-oTLP)
2017/08/26(土) 14:10:14.30ID:1Xp/S2sl0 >>977
JavaScript の、jQuery でやれば?
Groovy, Ruby でも良いし
何で、VBA でやる?
VBAには、クロージャがあるのか?
最初から、ライブラリが揃っている言語を、使えば良いだけ
JavaScript の、jQuery でやれば?
Groovy, Ruby でも良いし
何で、VBA でやる?
VBAには、クロージャがあるのか?
最初から、ライブラリが揃っている言語を、使えば良いだけ
980デフォルトの名無しさん (ワッチョイ fe6d-brQu)
2017/08/26(土) 14:14:47.08ID:svByvDEZ0981デフォルトの名無しさん (ワッチョイ ca11-+ULf)
2017/08/26(土) 15:49:08.64ID:O53zOlu10982デフォルトの名無しさん (ワッチョイ 0a11-xpGE)
2017/08/26(土) 16:55:31.30ID:azDqTcfP0 >>972
>アップ済みのファイルを再度アップしてしまったり、修正前のファイルをアップしたりとか、
間違ったと気づいた時点でオペレータ自身が元に戻せるような仕組みを作るのはそれほど難しくないよ
手動でExcelを修正するステップやその前のステップを含めてシステム化するのが理想ではあるだろうけどね
ただ100~300万くらいのお金を莫大な金と言ってるんであれば自力で頑張るしかない
担当が変われば元の木阿弥だし、本来機械にやらせるべき仕事を人間がやってることによる逸失利益を加味したら安い買い物
>アップ済みのファイルを再度アップしてしまったり、修正前のファイルをアップしたりとか、
間違ったと気づいた時点でオペレータ自身が元に戻せるような仕組みを作るのはそれほど難しくないよ
手動でExcelを修正するステップやその前のステップを含めてシステム化するのが理想ではあるだろうけどね
ただ100~300万くらいのお金を莫大な金と言ってるんであれば自力で頑張るしかない
担当が変われば元の木阿弥だし、本来機械にやらせるべき仕事を人間がやってることによる逸失利益を加味したら安い買い物
983デフォルトの名無しさん (ワッチョイ ca11-+ULf)
2017/08/26(土) 17:26:45.76ID:O53zOlu10984デフォルトの名無しさん (ワッチョイ 293d-oKtA)
2017/08/26(土) 17:45:46.64ID:6HYM9FnY0 在庫と直結するようなシステムだと現物が関わるからタイミングによっては取り戻すの大変だしね。
985デフォルトの名無しさん (ワッチョイ 0a11-xpGE)
2017/08/26(土) 17:49:54.05ID:azDqTcfP0 >>983
ははは、言いたいことはわかるけどそれは客が要件をすべて決めると思ってるやつの発想
費用に応じて提供出来る内容を変えてあげればいいだけ
そういう調整が出来ない人ばっかりだと苦労するよね
まあそこは論点じゃなく莫大な費用がかかると思ってるのは解決方法の選択肢が見えてないだけで
思ってるほどの費用がかからない方法も有るよってことよ
VBAのかわりにスクリプト書くだけなら100万もいらんし
ははは、言いたいことはわかるけどそれは客が要件をすべて決めると思ってるやつの発想
費用に応じて提供出来る内容を変えてあげればいいだけ
そういう調整が出来ない人ばっかりだと苦労するよね
まあそこは論点じゃなく莫大な費用がかかると思ってるのは解決方法の選択肢が見えてないだけで
思ってるほどの費用がかからない方法も有るよってことよ
VBAのかわりにスクリプト書くだけなら100万もいらんし
986デフォルトの名無しさん (ワッチョイ 0a11-xpGE)
2017/08/26(土) 17:55:27.18ID:azDqTcfP0 >>984
それは今でも発生しうる業務フローの問題でしょ?
誰かが確認するっていうステップが必要なだけで1件1件コピペ入力しなきゃいけないのとは別問題
確認が必要ならそのフローをシステムに取り込んであげればいい
機械で自動確認できるほうが楽だけどそれは必須じゃないじゃん
それは今でも発生しうる業務フローの問題でしょ?
誰かが確認するっていうステップが必要なだけで1件1件コピペ入力しなきゃいけないのとは別問題
確認が必要ならそのフローをシステムに取り込んであげればいい
機械で自動確認できるほうが楽だけどそれは必須じゃないじゃん
987デフォルトの名無しさん (ワッチョイ 0a11-xpGE)
2017/08/26(土) 17:56:27.22ID:azDqTcfP0 Excel関係ない気がするからこの辺にしとくわ
988デフォルトの名無しさん (ワッチョイ ca11-+ULf)
2017/08/26(土) 18:39:24.64ID:O53zOlu10989デフォルトの名無しさん (アウアウカー Sa85-1rYb)
2017/08/26(土) 19:30:25.78ID:qX5fc/S5a 株かなにかで金額間違えてニュースになったな
990デフォルトの名無しさん (ワッチョイ caaa-vgeI)
2017/08/26(土) 19:42:35.36ID:eHXsO5oX0 あれはトレーダーによる入力だからそれ自体が一次情報
複数人による入力対象ではない
複数人による入力対象ではない
991デフォルトの名無しさん (ワッチョイ 29e4-fJzc)
2017/08/26(土) 21:03:15.65ID:F72uLJPi0 いつから問題の対象が
複数人による入力
に限定されるようになったんだ
複数人による入力
に限定されるようになったんだ
992デフォルトの名無しさん (ワッチョイ caaa-vgeI)
2017/08/26(土) 22:10:58.71ID:eHXsO5oX0 さあ
993デフォルトの名無しさん (ワッチョイ 3e1e-CSD/)
2017/08/27(日) 02:42:06.83ID:L7AzHdYH0994デフォルトの名無しさん (ワッチョイ c66f-2x4P)
2017/08/27(日) 09:42:07.86ID:M71tiO6/0 ほ
995デフォルトの名無しさん (アウアウカー Sa85-HXRX)
2017/08/27(日) 10:41:40.78ID:hneRKt3Sa996デフォルトの名無しさん (アウアウカー Sa85-1rYb)
2017/08/27(日) 12:36:10.64ID:9rRkVsmFa 銀行でバイトに入力させるとかないだろ
997デフォルトの名無しさん (ワッチョイ fe6d-YxLc)
2017/08/27(日) 12:40:26.06ID:LjjEWylk0998デフォルトの名無しさん (ワッチョイ fe6d-YxLc)
2017/08/27(日) 12:40:42.78ID:LjjEWylk0999デフォルトの名無しさん (ワッチョイ 293d-oKtA)
2017/08/27(日) 13:14:20.45ID:EGaKBA6h0 >>998
乙
乙
1000デフォルトの名無しさん (ワッチョイ 0a0f-cmDg)
2017/08/27(日) 13:34:20.02ID:rBvqwKY30 ぬるぽ
10011001
Over 1000Thread このスレッドは1000を超えました。
もう書けないので、新しいスレッドを立ててくださいです。。。
life time: 62日 11時間 19分 6秒
もう書けないので、新しいスレッドを立ててくださいです。。。
life time: 62日 11時間 19分 6秒
レス数が1000を超えています。これ以上書き込みはできません。
ニュース
- 「おこめ券は米以外の食品も買える。効果的な活用を」 地元で農水相 [山形県] [少考さん★]
- 【速報】「女芸人No.1決定戦 THE W」9代目女王にニッチェ! 7年ぶり3度目で悲願の優勝 [牛丼★]
- 【芸能】『女芸人No.1決定戦THE W』 粗品が最後にバッサリ「優勝賞金1000万円にしてはレベル低い大会」 [冬月記者★]
- 【沖縄】開業4ヵ月でこれは…“国民の税金”投入の『ジャングリア沖縄』で見た衝撃的な光景と、モチベーションが低い一部スタッフの現状 [ぐれ★]
- 【東京】「家族で話題にして」 “世田谷一家殺害から25年 警視庁が呼びかけ [煮卵★]
- 今年の流行語大賞 『働いて働いて働いてまいります』が受賞で不快感… 過労自殺の遺族らが会見「家族にむち打つような行為だ」 [冬月記者★]
- 焼き芋を輪切りにして天ぷらにすると美味しいよ
- あまり名前を呼ばない方がいい例のあの人が復活したらしいぞ
- プロレスラーってロープに振ると走って戻ってくるけど
- クズ「勉強頑張らなかった奴は一生DQNと一緒に肉体労働しろ」☚勉強頑張れるのも環境と巡り合わせなんだが? [783475554]
- 前駐中国大使・垂秀夫『高市首相が台湾有事答弁を国会でしてしまったのは高市首相のなかに戦略的思考が無いから。安倍晋三を見習え』 [718678614]
- 個人事業主来てくれ
