Fully Automatic expense tracker in excel | Expense Tracker software
Fully Automatic expense tracker in excel | Expense Tracker software
Part - 1
Part - 2
Excel VBA Code Download: Click here
Practice File download: Click here
How to apply VBA Code
Go to insert menu of VBA window-click modules and type this code or paste here:
VBA window के इन्सर्ट मेनू मे जाएँ ओर module पर क्लिक करें ओर नीचे दिये code लो टाइप करें या paste करें।
Sub Tracker()
EnterData.Show
End Sub
Return the excel file and Right Click on the Shape and click the assign macro a, Macro Popup window will appear click the select the macro name " Tracker" amd press OK.
अपनी excel फ़ाइल पर जाएँ ओर जो shape आपने बनाई है उसके ऊपर माऊस से राइट-क्लिक करें ओर assign macro पर जाएँ। यहाँ से "Tracker" नाम के macro को चुने ओर ओके कर दे।
Double click the VBA Form that designed by you, clear all code from window and paste this code:
अपने VBA फोरम पर डबल क्लिक करें ओर पहले के सारे कोड़े हटा कर नीचे दिये कोड़े को यहाँ Paste कर दें।
Private Sub CommandButton1_Click()
Dim sh As Worksheet
Set sh = ThisWorkbook.Sheets("Data")
Dim lr As Long
lr = Sheets("Data").Range("B" & Rows.Count).End(xlUp).Row
With sh
.Cells(lr + 1, "B").Value = Me.TextBox1.Value
.Cells(lr + 1, "C").Value = Me.ComboBox1.Value
.Cells(lr + 1, "D").Value = Me.TextBox2.Value
.Cells(lr + 1, "E").Value = Me.TextBox3.Value
End With
Me.TextBox1.Value = ""
Me.ComboBox1.Value = ""
Me.TextBox2.Value = ""
Me.TextBox3.Value = ""
End Sub
Private Sub CommandButton2_Click()
Unload Me
End Sub
Private Sub UserForm_Initialize()
Me.ComboBox1.RowSource = "sheet1!c9:c18"
End Sub
check the cell address according to your excel file, if required. For more instruction please watch the video.
अपनी फ़ाइल के मुताबिक code मे बदलाव करें यदि जरूरत है तो अधिक जानकारी के लिए विडियो को देखें।
After apply this macro, save your file type as "Excel Macro-enabled workbook".
इस macro को अप्लाई करने के बाद फ़ाइल को save as type मे "Excel Macro-Enabled workbook" चुने।
Excel VBA Code Download: Click here
Practice File download: Click here
Post a Comment