![]() |
#12
|
|||
|
|||
![]() Quote:
In my code, both the starting value and the group pitch are manually entered. Specifically, enter the group spacing in cell B8, and enter the starting data value in cell C1. A judgment condition is also set. When cells C1 and C2 have data and cell B8 has no input data, the group distance can be obtained by subtracting the value of cell C1 from the value of cell C2. Then automatically generate all the separation points of the data, and then other data. These logics are reflected in my following code: p = ActiveSheet.Cells.Rows.Count q = ActiveSheet.Cells(p, 3).End(xlUp).Row If q >= 2 Then groupsp = Cells(q, 3) - Cells(q - 1, 3) [b8] = groupsp Else groupsp = [b8].Value End If 'Range("c3:C" & q).Clear If q <= 1 And [b8].Value = "" Then Exit Sub If [c1].Value = "" And [b8].Value <> "" Then Exit Sub For drow = q + 1 To ActiveSheet.Cells.Rows.Count Cells(drow, 3) = Cells(drow - 1, 3) + groupsp If Cells(drow, 3) = vMax Then Exit For If Cells(drow, 3) > vMax Then Exit For Next drow 'MsgBox groupsp [b10] = ActiveSheet.Cells(p, 3).End(xlUp).Row - 1 End Sub |
Tags |
histogram |
|
![]() |
||||
Thread | Thread Starter | Forum | Replies | Last Post |
how to draw the histogram? | leeqiang | Excel Programming | 1 | 08-27-2020 05:19 PM |
![]() |
keeble | Excel | 4 | 02-01-2017 10:33 AM |
Formula to calculate Frequency | lwls | Excel | 1 | 03-30-2015 05:40 AM |
![]() |
borninscorpio | Excel | 4 | 07-31-2013 12:44 AM |
Frequency of a name | bryant03 | Excel | 1 | 06-27-2012 10:21 AM |