excel

Why not a simple formula? Presuming your range is C1:H3and the first value-to-check is in C6 =COUNTIF($C$1:$H$3, C$6) Will produce the expected result 1 solved How to count the occurrences of cell contents?

try this Option Explicit Sub main() Dim data As Variant With Range(“A1”).CurrentRegion data = .Resize(.Rows.Count – 1, 4).Offset(1).Value End With ReDim wynik(1 To UBound(data)) As Variant Dim i As Variant For i = 1 To UBound(data) data(i, 3) = Format(data(i, 3), “yyyy-mm-dd”) wynik(i) = Join(Application.index(data, i, 0), “_”) Next Range(“E2”).Resize(UBound(data)).Value = Application.Transpose(wynik) End Sub 3 … Read more

Here is an example for columns A and B. Insert this event macro in the worksheet code area: Private Sub Worksheet_Change(ByVal Target As Range) Dim A As Range, OldValue As Variant, NewValue As Variant, Delta As Variant Set A = Range(“A:A”) If Intersect(Target, A) Is Nothing Then Exit Sub If Target.Count > 1 Then Exit … Read more

add this into a seperate module Function sixdigits(amount) As String Dim strAmount As String strAmount = Replace(Left(amount, 6), “.”, “”) ‘ use replace and left to create a string of 6 characters Do Until Len(strAmount) >= 6 ‘ loop until 6+ strAmount = “0” & strAmount Loop: sixdigits = strAmount End Function then in your … Read more

You can add a column where you could check if PPFROM (the value) is the min of the group (ARTICLE). Please adjust the references inside the formula. This is the formula: =IF(MINIFS($E$4:$E$10;$M$4:$M$10;M4)=E4;”Keep”;”Delete”) After that you can filter by the new column and delete the rows marked with “Delete”. solved Deleting duplicates, keeping lowest value in … Read more