VBA Code to Summarize Data with Subtotals in Excel

by

VBA Code:

' VBA Code to Summarize Data with Subtotals in Excel
' This code calculates subtotals for a specified column in a range

Sub SummarizeDataWithSubtotals()
    Dim rngData As Range
    Dim rngSubtotals As Range
    
    ' Set the range of data to summarize
    Set rngData = Range("A1:C10")
    
    ' Calculate subtotals for column C
    Set rngSubtotals = rngData.Columns(3).Resize(, 1)
    rngSubtotals.Subtotal GroupBy:=1, Function:=xlSum, TotalList:=Array(3)
    
    ' Display a message with the summary results
    MsgBox "Data has been summarized with subtotals in column C."
End Sub

Check All VBA Codes

Join Our Telegram Group techguruplus telegram group Join Our WhatsApp Group techguruplus whatsapp group
Nazim Khan - Author Image

Nazim Khan (Author) 📞 +91 9536250020
[MBA in Finance]

Nazim Khan is an expert in Microsoft Excel. He teaches people how to use it better. He has been doing this for more than ten years. He is running this website (TechGuruPlus.com) and a YouTube channel called "Business Excel" since 2016. He shares useful tips from his own experiences to help others improve their Excel skills and careers.

Leave a Comment