Excelで入力シート、印刷シート、データベースシ

質問

Excelで入力シート、印刷シート、データベースシートの3つのシートに分けてデータを管理したいです。

このようにするにはどうすれば良いのか解説しているエクセル本やホームページはありませんか？ここでどうやればいいか教えて頂いても結構です。

回答No.1

hallo-2007 · ベストアンサー

そう云われて検索してみましたが、適当なサイトがみつかりませんでしたので
入力シートからデータベースシートへ追加するＶＢＡ

データベースシート
　　Ａ　　Ｂ　　Ｃ　　Ｄ　　Ｅ　　Ｆ　　Ｇ
日付　時間　取引先　品名　単価　数量　金額

入力シート
　　Ａ　　Ｂ
　取引先
　品名
　単価
　数量
　金額　=B3*B4

と準備します
開発のリボンから　挿入＝＞ボタン
新規作成からＶＢエディターを起動して

Sub ボタン1_Click()
With Sheets("入力シート")
GYOU = .Range("A" & Rows.Count).End(xlUp).Row + 1
.Range("A" & GYOU).Value = Date
.Range("B" & GYOU).Value = Time
.Range("C" & GYOU).Value = Range("B1").Value
.Range("D" & GYOU).Value = Range("B2").Value
.Range("E" & GYOU).Value = Range("B3").Value
.Range("F" & GYOU).Value = Range("B4").Value
.Range("F" & GYOU).Value = Range("B5").Value
End With
End Sub
となるようにコードをコピーしてエディターを閉じて
ボタンを押してみてください。
ＶＢＡを使いましたが、大丈夫ですか。
とりあえず、しばらくおつきあいします。