エクセルで納品書を別シートでデーター化(リスト保存)したい

このQ&Aのポイント
  • エクセルで納品書を作成しています。毎回違う商品名や値段を記入しているのですが、そのデーター内容を自動で別シートにデーター管理(リスト管理)したいのですが可能でしょうか
  • シート1に記載したら自動的にシート2に1行ずつ下げて記載してほしい。
  • 名前や住所等、購入品名等を別シートに毎回コピーしていたのですが、もっと簡単にデーター保存できればと思いましたので
回答を見る
  • ベストアンサー

エクセルで納品書を別シートでデーター化(リスト保存)したい

エクセルで納品書を作成しています。 毎回違う商品名や値段を記入しているのですが そのデーター内容を自動で別シートにデーター管理(リスト管理)したいのですが可能でしょうか 条件  シート1に記載したら自動的にシート2に1行ずつ下げて記載してほしい。 詳細 【シート1】 (1) B14  商品名(こちらはB14~B17まで記入することもあります) (2) B25  名前 (3) B24  住所 これをシート2の シート1の B14 を シート2の D70 に シート1の B25 を シート2の H70 に シート1の B24 を シート2の I70 に   というふうに記載してほしい。 名前や住所等 購入品名等を別シートに毎回コピーしていたのですが もっと簡単にデーター保存できればと思いましたので

質問者が選んだベストアンサー

  • ベストアンサー
  • rivoisu
  • ベストアンサー率36% (97/264)
回答No.1

VBAでの処理 Sub 行転記()   Dim ws As Worksheet '転送先シート   Dim Lastline As Long '   Set ws = Worksheets("シート2") '転送先シート   Lastline = ws.Range("A" & Rows.Count).End(xlUp).Row + 1 '最後の行番号+1をLastlineに   ws.Range("D" & Lastline).Value = Range("B14").Value   ws.Range("H" & Lastline).Value = Range("B25").Value   ws.Range("I" & Lastline).Value = Range("B24").Value End Sub で書いてあることはできると思います。 転記項目もこれだけではないでしょうが、増やすことも難しくないでしょう。(納品日、金額など) ただ、納品書も複数行あるようですのでその部分は少し工夫が必要でしょうが 頑張ってください。

kurumin963
質問者

お礼

早速ありがとうございます。 思っていたように簡単にコピーができました。 金額や納品日も追加もできました。 本当に有難うございました。 これで入力ミスも減ると思います。 納品名目の複数の場合はもう少し勉強して頑張ってみようと思います。

関連するQ&A

  • excelでシート1の品名をシート2の納品書に自動でとばしたい、

    Excelのシート1の、A列にオーダーNo.、B列に品名が入っています。シート2の納品書にもオーダーNo.、別枠で品名を入れるようになっています。そのシート1のオーダーNo.、品名を納品書のオーダーNo.と品名の欄にとばせないでしょうか?

  • <Excel>データベースの中から特定の要件を満たすデータを抽出し、他のシートへ転記

    Sheet1に以下のデータがあるとします。  <納品データ>   A      B      C      D 1 顧客   商品コード  品名    数量   2 ○○    0001    りんご   100 3 △△    0002    みかん   500  4 □□    0003    いちご   200 5 △△    0003    いちご   300      6 ○○    0003    いちご   100    上記データを基にSheet2へ顧客別の納品書を作成します。 納品書の雛形は以下のようなものです。 <顧客別納品書>   A     B     C     D 1         △△   様(敬称)   2 商品コード   品名     数量 3  0002     みかん    500    4  0003     いちご    300      顧客名(上記例だと”△△”)をB1に入力すると、Sheet1を検索しに行き、該当顧客の納品データを抽出し、Sheet2の顧客別納品書に転記するというものを作りたいと考えております。 商品コードと数量さえ抽出→転記できれば、「品名」は別途「品名リスト」等を作成しておき、そこから引っ張ってくれば良いと考えています。 作成要件としては、、、  1.すべて関数による作成  2.オートフィルタ等の使用による手作業は不可 Excelをまったくわからない人でも顧客名だけを入力すれば納品書を作成できるようなレベルのものを考えています。また、VBAを使わないのは私自身が理解できないからです。 恐れ入りますがよろしくお願いします。

  • エクセルの1シートを項目別に別シートへ分ける方法

    エクセル2010で1シートのデータを項目別に別シートへ自動的に分割する方法で困っています。 検索するとマクロを使うと書いていますが、マクロはほとんど使ったことが無いのもあって、わかりませんでした。 シート1 A列(日付8ケタ+商品番号6ケタ) B列(売上額) 20130515000004           300 20130515000006           100 20130518000004           300 20130519000001           500 20130519000004           300 ・・・                   ・・・ をA列の日付部分上8ケタを使って日別にシートを分け、 シート名をuriage20130515(uriageと日付8ケタ)という名前にしシート名+CSV形式で保存したいです。 シート2 シート名:uriage20130515 A列         B列 20130515000004 300 20130515000006 100 シート3 シート名:uriage20130518 A列         B列 20130518000004 300 シート4 シート名:uriage20130519 A列         B列 20130519000001 500 20130519000004 300 このように自動で別シートに分割した上で、シート名CSV形式で保存まで自動でできるとありがたいです。 自動化できるならシートを分割するマクロ、シート名でCSV保存するマクロが一つのマクロになっていても、分かれていてもOKです。 このようなことはできますか? よろしくお願いします。

  • 抽出したデータを使って納品書を作成・印刷したいのですが・・・

    題名の通りなのですが、まず見積書を作成します。作成した後、エクセルの手入力で工場で製造指示書を作っています。 ここまでは良いのですが・・・ 納品書を作成する時に、製造指示書や見積書等のデータを見ながら納品書を作成しなくてはいけません。 また、私一人が納品書を作成するなら良いんですが、年配の方が納品書を作成されるので記入漏れ等も発生していて、記入漏れを防ぐ為にもマクロ等でボタン1つでデータが納品書に移る様にしてほしいと頼まれました。 <例> sheet1 NO. 会社名 郵便番号 住所 tel fax 1  あ     ***-***  い   11  22 sheet2 物件名 うう 商品名 ええ sheet3(納品書) 郵便番号 ***-*** 住所 い tel 11  fax 22 会社名 あ 物件名 うう  商品名 ええ VLOOKUP関数で会社名を基に抽出したら良いと言うのは想像つくのですが、私は関数等はある程度出来ますが、マクロが初心者の為に良い形に組むことが出来ません。 バージョンはエクセル2002です。 どなたか、ご教授願います。

  • 入力したデーターを別シートに

    入力したデーターを別シートに いつもお世話になります。 Windows XP EXCELL2003 です。 シート名「記入」で入力したデーターをシート名「6月」に。 例えば 「記入」 「6月」 A2       →  A6 に C2 : D2 → B6~C6 に値(○)したい。 ご指導いただければありがたいのですか宜しく御願いします。

  • 別のシートのデータを参照?したい

    エクセルの質問です。 セルA1~A1000に各企業の名前が入っています。 セルB1~B1000にその企業の住所が入っています。 これがシート(1) このシート(1)を元に別の表を完成させたいです。 シート(2)にはセルA1~A50に企業の名前が入っています。 シート(1)の情報を使って、該当する名前があった時にはセルB1~B50までに自動的に住所が入ってほしい。 これはどのようにしたら実現できるのでしょうか? 「○○に××があった時は△△」みたいな関数だったら見つけてやり方がわかったのですが、応用がきかず、躓いています。 やり方、もしくは似たような説明がなされてるURLを教えてください。 詳しい方、よろしくお願いします。 環境は、xp エクセル2007です。

  • ExcelVBA Sheet1のデータをSheet2に並び替えるには

    OfficeExcel2003を使って従業員の業務管理をているのですが、VBAを使って下記のようなことを自動化したいと思ってます。 Sheet1のA列には上から123・・・の管理番号がふっていて、B列には業務の内容が記入されています。 C列にはその業務を行う日付が入力されており、D列~G列にはその業務を行う人の名前が1名から4名の間で入力されています。 次に、Sheet2のA列には縦に全従業員の名前が入力されており、B列以降1行目にはカレンダー状にその月の日付が振ってます。 VBAを使って、Sheet1のデータを元にSheet2の各従業員が行う業務の日付のところに該当の管理番号が自動で表示されるようにしたいのです。 ユーザーフォームを使って入力できるところまではなんとか出来るようになりましたので、そのデータを元に従業員がわかりやすいフォーマットに変換しようと思ってます。

  • リストから別シートの表に順次反映させるには?

    データが入力されたリスト一覧があります。 A欄 商品名 B欄 コード番号 C欄 規格 など それを別シートに作成した表式(商品名が10品、縦に記入できるようになってます)にあてはめたいのですが、ここで問題が・・・ 表式は一枚だけ作成しておき、リストが増えても順次そこに反映させて、印刷したいのですが 何かいい関数があったら教えてください

  • エクセル データ反映の方法

    商品名と商品コードが記入してるシートがあって、別シートには注文書があり たとえば 注文書のA1に商品名を入れると自動で B1に商品コードが 入るようにしたいのですが。 どうしたらできるでしょうか。教えてください。よろしくお願いします。

  • エクセルで別シートのデータを表示する件

    エクセルで別シートのデータを表示する件 「名簿のシート」(1)があります。 左側から「名前」、「住所」、・・・とデータが入ってます。 「別のシート」(2)で書類を作りたいのですが、(1)のシートからデータがうまく反映されません。 例えば、 (1)の「A1」に「浦島太郎」とあります。 (2)の「B1」は、「セルの書式設定」の「ユーザー定義」で「@_ "様"」としています。 (2)の「B1」に「浦島太郎 様」と表示させたいので「=(1)!A1」と入力しても、「=(1)!A1 様」と表示されてしまいます。 エクセルのバージョンは2002です。 よろしくお願いします。