• 締切済み

VBA:値をシート間で転記する方法

初投稿です。 最近VBAを学習しはじめた経理担当者です。 弊社指定納品書を売却した際の台帳をVBAで管理しよう と思います。 月末にその台帳を集計して指定納品書売却代金を仕入れ 代金と相殺して買掛金を計上します。 注文があったさいには仕入先コードと枚数を入力すれば 自動で台帳に記録され、請求書(エクセル同じブックで 作成)も印刷されるように設定したいと思います。 そこで台帳のフォーマットと請求書のフォーマットに それぞれ入力する必要がないように入力用フォームを 別シートで作成しようと思います。 A(sheet):入力用シート B(sheet):納品書売却台帳(Dsheetを参照する参照式有り) C(sheet):請求書 D(sheet):取引先マスター Asheetの入力必須項目は「仕入先コード」と「購入枚数」 とします。 Asheetで入力した値をBsheetに転記して、上から順番に 転記する方法はどうすればよろしいでしょうか? (Bsheetは月別台帳の為月によってデータ数が異なります) 勉強はじめたばかりなので上記作業が可能かどうかも わかりません?(シート間の値の移動及び自動印刷) ご指導お願い致します。

みんなの回答

  • 6dou_rinne
  • ベストアンサー率25% (1361/5264)
回答No.1

>勉強はじめたばかりなので上記作業が可能かどうかも わかりません?(シート間の値の移動及び自動印刷) 可能です。 印刷は sheet(C).print >Asheetで入力した値をBsheetに転記して、上から順番に 転記する方法はどうすればよろしいでしょうか? sheet("B").cell(転記先セル).value =sheet("A").cell(転記元セル).value でできますが。 C,Dについても同じ。

gigis
質問者

補足

早速の回答ありがとうございます。 補足で説明ですが例えばSheetAの(A1)のセルの値を SheetBの(A1)に転記します。 次にSheetA(A1)に別の数値を記入します。(入力箇所固定) それを今度はSheetBの(A2)のセルに転記したいのです。 つまり上から順番に台帳を埋めていきたいのです。 SheetAの入力セルは固定でSheetBの転記箇所は上から 順順に累積させていきたいのです。 説明不足ですみません。

関連するQ&A