Skip to content
Free Excel Tutorials
  • Home
  • Excel For Beginners
  • Excel Intermediate
  • Advanced Excel For Experts

Data Analysis

  • How to Create Thermometer Chart in Excel
  • How to create a Histogram in Excel
  • Everything about Charts in Excel
  • Understanding Anova in Excel
  • Error Bars in Excel

References

  • How to create dynamic named range with OFFSET in Excel
  • How to use Excel TRANSPOSE Function
  • Basic INDEX MATCH approximate in Excel
  • To count total rows in a range in Excel
  • Convert text string to valid reference in Excel using Indirect function

Data Validations

  • Excel Data validation with conditional list
  • Excel Data validation must not contain
  • Excel Data validation must begin with
  • Excel Data validation number multiple 100
  • Excel Data validation must contain specific text

Sales Calculator in Excel

by

Below we will look at a program in Excel VBA that calculates the total sales of each employee over a period of three years.

Situation:

The other two sheets have the same setup, but with different combinations of months and employees, and different sales numbers. There are several ways to calculate the total sales of each employee in Excel, but we will see that it can be done in Excel VBA very easily.

Place a command button on your worksheet and add the following code lines:

1. First, we declare three variables and one Worksheet object. One variable of type String we call employee, one variable of type Integer we call total, one Worksheet object we call sheet, and one variable of type Integer we call i.

Dim employee As String, total As Integer, sheet As Worksheet, i As Integer.

2. We initialize two variables. We initialize the variable total with value 0. We use the InputBox function to get the employee name from the user.
total = 0
employee = InputBox

(“Enter the employee name (case sensitive)”)

3. After the user has entered an employee name, we want to calculate the total sales of this employee. The workbook consists of three sheets. We want a program that can still be used if sheets are added in the future. Therefore we use the following code line:

For Each sheet In Worksheets

4. We start another For Next loop.

For i = 2 To 13

5. If the entered employee name matches with the employee name in column B, Excel VBA adds the sales number to the variable total. Add the following code lines:

If sheet.Cells(i, 2).Value = employee Then
total = total + sheet.Cells(i, 3).Value
End If

6. Don’t forget to close both loops.

    Next i
Next sheet

7. Finally, we display the total sales of the employee using a msgbox.

MsgBox “Total sales of ” & employee & ” is ” & total

8. Test the program.

Result for David:

Sales Calculator Result

Post navigation

Previous Post:

SUBSTITUTE function vs REPLACE function in Excel

Next Post:

Count cells between dates in Excel

Leave a Reply Cancel reply

Your email address will not be published. Required fields are marked *

Learn Basic Excel

Ribbon
Workbook
Worksheets
Format Cells
Find & Select
Sort & Filter
Templates
Print
Share
Protect
Keyboard Shortcuts

Categories

  • Charts
  • Data Analysis
  • Data Validation
  • Excel Functions
    • Cube Functions
    • Database Functions
    • Date and Time Functions
    • Engineering Functions
    • Financial Functions
    • Information Functions
    • Logical Functions
    • Lookup and Reference Functions
    • Math and Trig Functions
    • Statistical Functions
    • Text Functions
    • Web Functions
  • Excel VBA
  • Excel Video Tutorials
  • Formatting
  • Grouping
  • Others

Logical Functions

  • Check multiple cells are equal in Excel
  • Not Equal To ‘<>‘ operator in Excel
  • How to use Excel XOR Function
  • Invoice status with nested if in Excel
  • TRUE function: Description, Usage, Syntax, Examples and Explanation

Date Time

  • Count times in a specific range in Excel
  • How to show last updated date stamp in Excel
  • Convert Unix time stamp to Excel date
  • Convert decimal seconds to Excel time
  • DAYS360 function: Description, Usage, Syntax, Examples and Explanation

Grouping

  • Calculate conditional mode with criteria in Excel
  • Group times into unequal buckets in Excel
  • Group arbitrary text values in Excel
  • If cell contains one of many things in Excel
  • Categorize text with keywords in Excel

General

  • How to calculate percent sold in Excel
  • Automatically fill series of cells in Excel using AutoFill
  • Find Most Frequently Occurring Word in Excel Worksheet
  • Count cells less than in Excel
  • How to calculate percent change in Excel
© 2023 xlsoffice . All Right Reserved. | Teal Smiles | Abbreviations And Their Meaning