あとは、全ての行で同じデータを入れていきます。

例えば、貸方科目CDは買掛金の312はどの行も同じです。
消費税の税率や課税区分も同様です。

そういったものは表の中になくても、VBAのコードで直接入力します。
続きを読む →

前回数字が入っているところだけ、セルの焦点を合わせましたので、今回は
その合わせたセルの値を仕訳に変換します。

仕訳に必要な情報は表にあらかじめ入れておきます。

必要なのは、日付、借方科目、貸方補助科目の3つです。それ以外は必然的に揃っています。
続きを読む →

今度は数字があるところに下の図のように1,2,3,・・・と数値を入れていきます。

続きを読む →

変数を二つ使って、セルを縦と横に動かしましたが、これを更に変更を加えます。

この状態を

このようにセルを移動するごとに1ずつ増やしていくようにします。
続きを読む →

表を仕訳に変換するのは、横の動きと縦の動きの組合せです。
今回は縦の動きです。

Sub 縦の動き()
Dim a As Integer
Worksheets(“データ”).Activate
a = 3
Do Until Cells(a, 1).Value = “”
Cells(a, 10).Value = a
a = a + 1
Loop
End Sub
続きを読む →

概要で説明したコードは縦（行）と横（列）の動きが合わさっているので、
今回は横の動きだけ解説します。

横の動きだけに絞ったVBAコードです。
Sub 横の動き()
Dim b As Integer
Worksheets(“データ”).Activate
b = 4
Do Until Cells(2, b).Value = “”
Cells(3, b).Value = b
b = b + 1
Loop
End Sub
続きを読む →

表も仕訳に変換することができます。

例えば下記のようは図があったとします。

これをVBAで組んだマクロを実行することで、
続きを読む →