お知恵をお貸しください。
VB6 SP5
WIN XP SP2
ADO 2.8 Library
Excel 2003 SP2
現在、以上の環境で開発を行っております。
対象Excelのシート1の名前をある機械の「部品入出庫管理」とし、シート2の名前を「部品表」としています。
「部品表」にある[在庫数]フィールドは
「部品入出庫管理」にある[入庫]フィールド、あるいは[出庫]フィールドに値が入力されれば計算される仕組みになっております。
[入庫]フィールドに値Xが入力されれば、「部品表」の[在庫数]フィールドはXプラスされ、
[出庫]フィールドに値yが入力されれば、「部品表」の[在庫数]フィールドはyマイナスされます。
アプリケーションの流れは、
(1)「部品表」の[部品番号]フィールドを検索
(2)入・出庫の数量を入力
(3)「部品入出庫管理」の[入庫]、あるいは[出庫]フィールドにADO接続で数量が入力される
(4)この数量を「部品表」の[在庫数]フィールドがExcel内で自動的に計算して値を更新しておく
です。
しかし、
(4)の動作ができていません。Excelのアプリケーションそのものを開くと、更新されているのですが・・・
.addnewと.updateを使っております。
何か他の命令なりがあるのでしょうか?
ちょっと解りづらいかもしれませんが、お知恵をお貸しください。
大変恐縮ですが宜しくお願い申し上げます。
No.2ベストアンサー
- 回答日時:
失礼しました。
CommandButton_Clickでした。
ちょっとExcelとVB6の連携が良くないかも。
VB6のADODC1コントロールを使用して
VB6のDataGridにExcelの情報を表示させる。
DataGrid1_Changedにコードを書いて
ここで制御させたらどうかなぁ。
この回答への補足
度々のご回答、感謝いたします。
今週一杯出張なので週明けに試してみます。
一応今の所セコい手ですが、レコード追加毎にExcelの実体を開いて→上書き保存→すぐに閉じるみたいなことをウラでやらせています。
DataGridを使うなんて客(注文が多すぎる上司)にばれたら、あれもできるだろ、これも・・・なんていうふうに面倒なことになりそうですが、成功したら設計書の片隅にでも書き加えておきます。
No.1
- 回答日時:
例えば VB6にCommandButtonをつくって
Private Sub CommandButton_Changed に
コード書いたらどうですか?
この回答への補足
お答え頂きありがとうございます。
私の見落としかもしれませんが、CommandButtonにChangedはないのですが・・・
また、そのChangedはどのような場合に使用するとよろしいのでしょうか?
何かと解りづらい説明で申し訳ございません。
.AddNew~.Updateでレコード追加していきます。
"入庫"フィールドが書き込まれた時に、Excelの別シートのセルで"入庫"フィールドの値を含んだ関数が組まれていて、"入庫"フィールドに書き込まれる度にそのセルは自動的に計算するようになっています。
しかし、ExcelはどうやらExcelそのものを開かないとその計算をしてくれないようで、ADOで接続すると、関数が組まれているセルは前回と比べて変化しない状態になってしまうのです。
.AddNew
・
・
![入庫] = TxtIn.Text
・
・
.Update
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- その他(データベース) c言語の問題です。これを踏まえてコーディングしたいのでおしえていただきたいです。 3 2023/08/03 09:27
- その他(Microsoft Office) Excelの関数(FILTER関数)について教えてください 2 2023/07/31 16:11
- Excel(エクセル) Excelで在庫表(クエリ、ピボット) 2 2022/04/11 17:11
- その他(Microsoft Office) Excelで総数量を変動させたい 2 2022/11/04 23:49
- Visual Basic(VBA) ExcelからAccessのテーブルに書き込む時に時間がかかる 1 2022/10/14 20:38
- メルカリ メルカリShopsを作るとメルカリで販売は楽になりますか メルカリとまったく変わりませんか? 2 2022/10/11 19:22
- その他(データベース) Accessフォームからパラメーターで表示したレコードを指定のExcelのセルへ転送する方法について 2 2022/08/22 18:04
- その他(ビジネススキル・経営ノウハウ) 在庫管理のこの問題が分かりません。どなたか解説お願いします 2 2022/04/18 18:35
- 数学 在庫管理のこの問題が分かりません。どなたか解説お願いします 4 2022/04/18 22:19
- 数学 在庫管理のこの問題が分かりません。どなたか解説お願いします 2 2022/04/18 22:21
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Accessのフィールド名に半角括...
-
2つ目のレコードの値を取得す...
-
AccessのDAOでフィールド名を配...
-
日付と文字列を条件としてDLook...
-
フィールド名の指定でエラー
-
アクセス ADO Null以外のレコ...
-
ACCESSのフィールドデータの照...
-
SQLでフィールド番号を指定する...
-
ACCESS VBA Parametersで or演...
-
DataTableに特定のフィールドが...
-
INT64対応のprintf系関数はあり...
-
accessでフィールド追加のあと...
-
ACCESSで日別集計をする場合
-
Accessの画像挿入のVBAコード
-
クリスタルレポートの式フィー...
-
フィールド名をループの添え字...
-
Access :ALTER TABLE で作成...
-
ノーツ:ユーザ名から別名を取...
-
AS/400の論理ファイルで年度だ...
-
Access Dcount関数で引数が指定...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
accessでフィールド追加のあと...
-
INT64対応のprintf系関数はあり...
-
DataTableに特定のフィールドが...
-
Accessのフィールド名に半角括...
-
2つ目のレコードの値を取得す...
-
AccessのDAOでフィールド名を配...
-
クリスタルレポートで困ってい...
-
テーブルのデータ型の変更がで...
-
Access 2010で実行時エラー3061
-
日付と文字列を条件としてDLook...
-
2次元のdictionary
-
ACCESSで日別集計をする場合
-
Access VBA 添付型フィールド
-
SQLで複数のテーブルと結合した...
-
クリスタルレポートで文字列の...
-
ACCESSで視覚的タイムテーブル...
-
アクセス ADO Null以外のレコ...
-
アクセスでADO 並べ替えが適用...
-
AccessVBAで他テーブルのデータ...
-
オートナンバー型を抽出条件に...
おすすめ情報