[[20050707230917]]　『伝票入力で』（あんぱん）　ページの最後に飛ぶ

『伝票入力で』（あんぱん）

sheet1に伝票入力用の表がありましてそのデータは、起票日、伝票番号、品名コード、品名、数量などがあります。そのデータを sheet2にデータが移るようにしたいんですが、どうしたらよいか分かりません。伝票は、一日１００枚ぐらいあります。あと、sheet1で伝票入力用の表にあとから訂正できるように伝票番号を入力したら以前に入力したデータが出るようにしたいんですが・・・
教えてくれませんか？
大変わがままいってすいません！
[エクセルのバージョン]
Excel2000

[OSのバージョン]

Windows98SE

 逆の発想で、Sheet2にデータを逐次入力していくようにしてはいかがでしょうか。

 伝票の印刷時に、Sheet1に番号のみ入力すればデータが反映される様にするとか。

 例えば以下のような感じです。
 Sheet1のデータ
	 A	 B	 C	 D	 E	 F
  1	番号	起票日	伝票番号	品名コード	品名	数量
  2	1	38539	A-1001	123456	AAA	100
  3	2	38539	A-1002	123456	BB	200
  4	3	38540	A-1003	123789	CCC	300
  5	4	38540	A-1004	234567	DDD	400
  6	5	38540	A-1005	256368	EEE	500

 伝票用のシートには、VLOOKUP関数でSheet2の番号を基にデータを引っ張ってくる。

 （川野鮎太郎）

sheet1での伝票入力用画面からはだめでしょうか？
入力担当が、初心者なので、伝票とsheet1の入力画面を同じようにしといたほうが
間違えにくいかと思いまして・・・
すいません、わがまま言って　m(__)m

あんぱん

 そうであればマクロになってしまうと思いますので、実際のセル配置と内容を
 具体的に書かれたほうが回答が得られやすいと思いますよ、

 ただし、マクロを使うと間違えて入力したときに元に戻せませんので、
 初心者に対応できるかどうかは判りません。

 （川野鮎太郎）

 お邪魔します。
 >入力担当が、初心者なので
 ということでしたら、あまり難しく考えないで
 データ→フォーム
 を使われてはどうでしょうか？
 伝票入力用→データベース→抽出→伝票出力
 とするのが一般的でありExcelが最も得意とする分野の様です。
 データベースは一行目からフィールドがあるのが一般的ですが
 もしも、A3からリストがあるようでしたら、そのリスト範囲に
 "Database"と名前を付けてあげれば出来ますので一度試してみてはいかかでしょうか？
 フォームの使い方はご自身で練習してください。
 どうでしょうか？
 Option Explicit
 Sub てすと()
    With Sheets("Sheet2")
        .Range("A3").CurrentRegion.Name = "Database"
        .ShowDataForm
    End With
 End Sub
（SoulMan）

コメント返信：

[ 一覧(最新更新順) ]

[[20050707230917]] 『伝票入力で』（あんぱん） ページの最後に飛ぶ

[[20050707230917]]　『伝票入力で』（あんぱん）　ページの最後に飛ぶ