学习编写宏

Question

我正在用Excel创建一个简单的预算。我想添加Macros以便进行学习，因此我要执行的某些操作很容易添加。

随着费用（或收入）的增加，我将年度中的每个月分为几个类别，我希望能够从下拉列表中选择一个类别-然后会提示输入框输入费用/收入的价值。选择“确定”后，我希望将值添加到单元格中的当前值。这是我到目前为止的内容：

Private Sub ComboBox1_Change()
ComboBox1.Clear
ComboBox1.Value = ""
With Sheet3.ComboBox1
    .AddItem "Income"
    .AddItem "Asha"
    .AddItem "Grocery"
    .AddItem "Misc."
    .AddItem "Food/Cafe"
    .AddItem "To Sarah"
    .AddItem "Student Loan"
    .AddItem "Ally Savings"
    .AddItem "Insurance"
    End With
End Sub

Sub GetValue()
    Dim PopUp As Variant
    PopUp = Application.InputBox(prompt:="Enter Amount", Default:="Only Numbers", Type:=1)

End Sub

我敢肯定我可以使用数据透视表简单地完成此操作，但这将教会我有关编写宏的任何想法。任何提示将不胜感激！