Hello,
I have a budget workbook. Within is an input sheet.
The way it works is that a date and amount is entered, then there is a category dropdown. When a category is chosen, a macro is ran based on the selection and builds another dropdown (expenses) adjacent.
Once the expense is chosen, it calculates and copies the amount entered, to a budget sheet.
This all works great.
However, what I need to do is insert a new row above this entry and it errors. I have tried a few different methods and nothing will allow me to move that entry down. I could delete it, but I'd prefer there to be a list of all entries spanning down the sheet.
Here is the code I have in the sheet (not in a module) which runs the macros based on the dropdown selections. I have included one category's expenses as well. I was wondering if my B:B and C:C targets are interfering?
Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("C:C")) Is Nothing Then
Select Case Target
Case "Home Expenses": CAT_HM
Case "Daily Living": CAT_DLE
Case "Children": CAT_CHLD
Case "Savings": CAT_SAV
Case "Obligations": CAT_OBLIG
Case "Entertainment": CAT_ENT
End Select
End If
If Not Intersect(Target, Range("D:D")) Is Nothing Then
Select Case Target
'HOME EXPENSES CATEGORY
Case "Mortgage": HE_MORT
Case "Home Equity Line of Credit": HE_HELOC
Case "Electricity (Connexus)": HE_ELEC
Case "Gas": HE_GAS
Case "Water/Sewer/Trash": HE_WST
Case "Phone (Verizon)": HE_PHV
Case "Internet": HE_INT
Case "TV Sub - Disney/Hulu/ESPN": HE_TVSUB1
Case "TV Sub - Netflix": HE_TVSUB2
Case "Music Subsciptions": HE_MSUB
Case "Furnishings/Appliances": HE_FA
Case "Lawn/Garden": HE_LG
Case "Home Supplies": HE_HS
Case "Maintenance": HE_MAINT
Case "Improvements": HE_IMP
Case "Home Expenses Other": HE_HEO
I am hoping this is an easy beginner fix (I am not a pro by any means).
Thanks
Marc
Bookmarks