Check Register

[Jordon]

Anyone using Excel for your check register?

I've tried creating one in years past but there's always something that
wouldn't work quite right. There's plenty of inexpensive commercial
programs out there but I don't need it to track a credit card account or
manage my stock portfolio or spit shine my wing tips.

TIA,

 

[T. Valko]

Mine is perfect. Just a plain register. No bells and whistles!

I use drop down lists for everything: date, check number, payee, reconcile,
fee's. The only thing I have to manually enter is the amount.

Reconciling with my bank statement takes all of 2 minutes!

Biff

 

[Jordon]

Mine is perfect. Just a plain register. No bells and whistles!

I use drop down lists for everything: date, check number, payee, reconcile,
fee's. The only thing I have to manually enter is the amount.

Reconciling with my bank statement takes all of 2 minutes!

How do you handle reconciliation? Things in the bank statement won't be
in the same order as the register and there will be things in the
register amongst reconcilable items that aren't in the bank statement,
but will be next time?

 

[Don Guillett]

ONE drop down for the recurring item

Private Sub Worksheet_Change(ByVal Target As Range)

If Not Intersect(Target, Range("NewChecks")) Is Nothing Then
lr = Cells(Rows.Count, 1).End(xlUp).Row + 1
mydate = InputBox("Enter Date")
If mydate = "" Then
Cells(lr, 1) = Date
Else
Cells(lr, 1) = mydate
End If

'list is on sheet2
x = Sheets("sheet2").Range("newlist").Find(Target).Row
With Sheets("sheet2")
Range(Cells(lr, 2), Cells(lr, 7)).Value = _
.Range(.Cells(x, 2), .Cells(x, 7)).Value
End With

If Target = "Interest" Then
Cells(lr, "b") = "Interest"
Cells(lr, "c") = Format(InputBox("Enter Interest Rate") / 100, "0.00%")
'Cells(lr, "c").NumberFormat = "0.00%"
'Cells(lr, "d") = InputBox("Enter Interest Paid")
Cells(lr, "e") = InputBox("Enter Bank Number 1, 2, 3)
'Cells(lr, "f") = ""
Cells(lr, "g") = "x"
End If

If Target = "blank" Then
Cells(lr, 2) = InputBox("Payee")
Cells(lr, 3) = InputBox("For")
Cells(lr, 5) = 2
End If

If Len(Cells(lr, 4)) < 2 Then Cells(lr, 4) = InputBox("Amt")

Cells(lr, 8) = Cells(lr - 1, 8) + Cells(lr, 4)
End If

Range("h7").Select
Call sv 'does a running total
End Sub

 

[T. Valko]

Here's how mine is setup:

http://img180.imageshack.us/img180/842/register1ei3.jpg

Column E is for reconcilement. When I get my bank statement I place a "X" in
the cell where those items appear on the statement. I use an event macro to
enter the "X" so no typing is involved. All I do is click on the cell and
the "X" is entered.

After I've X'd all the appropriate items I click the reconcle button in the
upper right. That simply takes me to another area of the sheet:

http://img180.imageshack.us/img180/9637/register2ep7.jpg

I enter the closing balance from the statement and formulas in the cells
below let me know if my register is balanced. I then click the Register
button to return to the register area of the sheet.

No bells, no whistles, no fancy formatting! KISS! (keep it simple stupid)

Biff

 

[jack]

This sounds like what I've been needing. Is it available on the web? If so,
where?

 

[Jordon]

Here's how mine is setup:

http://img180.imageshack.us/img180/842/register1ei3.jpg

Column E is for reconcilement. When I get my bank statement I place a "X" in
the cell where those items appear on the statement. I use an event macro to
enter the "X" so no typing is involved. All I do is click on the cell and
the "X" is entered.

After I've X'd all the appropriate items I click the reconcle button in the
upper right. That simply takes me to another area of the sheet:

http://img180.imageshack.us/img180/9637/register2ep7.jpg

I enter the closing balance from the statement and formulas in the cells
below let me know if my register is balanced. I then click the Register
button to return to the register area of the sheet.

No bells, no whistles, no fancy formatting! KISS! (keep it simple stupid)

Thanks for the tips.

 

[T. Valko]

You're welcome. Hope that gave you some ideas.

Biff

 

[jack]

Are you willing to share your check register with others?
I am interested in both the check register itself and learning more about
implementing how you use the drop down lists and especially the method of
reconciling the bank statement.
How do you use an event macro to enter the "X" so no typing is involved (by
clicking on the cell and the "X" is entered)?
I would greatly appreciate your help.
TIA,
Jack

 

[T. Valko]

Send me an email:

xl can help at comcast period net

Remove "can" and change the obvious.

Biff