Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Filters/Range/Summing
I have a spreadsheet that is about a1:h1500 big and I use filters to show
only the data that I want to see. My question is how do I use this code below that works fine and get it to only sum the shown cells. For example rows shown could be various such as row 2,8,37,54,104 etc. So when I use the code below to highlite and sum the ranges it still adds the hidden rows such as 3,4,5,6,7,9,10....etc I have: Private Sub CommandButton1_Click() Dim AreaClick As Range Dim AreaSum As Long Windows("how spent 73104rev.xls").Activate Sheets("ITA ").Select Set AreaClick = Application.InputBox(prompt:="Please click on area to sum", Title:="Auto Sum", Type:=8) AreaSum = WorksheetFunction.Sum(AreaClick) MsgBox (AreaSum) End Sub |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Excel 2003 - Delete lists and/or filters from of range cells. | Excel Discussion (Misc queries) | |||
Summing a range of cells based on criteria in another range | Excel Worksheet Functions | |||
filters and summing in status bar | Excel Discussion (Misc queries) | |||
Function that filters a list (Database) for criteria in a range a. | Excel Worksheet Functions | |||
Summing a Range | Excel Programming |