Highlight Minimum values in rows in Excel Worksheet with VBA

How to highlight minimum values in rows in Excel worksheet with VBA. Watch the training video:

You can watch this video on YouTube.

Here’s the complete VBA code:

Sub highlightMinValue()
Dim ws As Worksheet
Dim i As Long, lastrow As Long
Set ws = Worksheets(“Data”)
lastrow = ws.Cells(Rows.Count, 1).End(xlUp).Row
Dim minvalue As Long
Dim cell As Range
Dim rng As Range
For i = 1 To lastrow
 ‘We loop through the rows
Set rng = Range(Cells(i, 1), Cells(i, 4))
minvalue = Application.WorksheetFunction.Min(rng)
For Each cell In rng
‘Now we loop through each cell in the identified row
If cell.Value = minvalue Then
cell.Font.Color = vbRed
End If
Next cell
Next i
End Sub

Published by

Dinesh Kumar Takyar

Welcome to exceltrainingvideos.com! My aim is to help you learn MS Excel including VBA. I always felt that a good way to learn something was to find solutions to problems in that domain. That is why I share these Excel videos with you. Mostly these are questions asked during my corporate training sessions. I've been training individuals and companies in computers since 1991. I did my B. Sc. (Vordiplom), M. Sc. (Diplom) and Ph.D. (Dr. rer. nat.) from Hamburg, Germany. The best thing about solving some of my visitor's questions is that I also gain new insights. For more Excel VBA solutions you may like to visit my YouTube channel: http://youtube.com/familycomputerclub For a structured Excel VBA training course online you can visit: https://www.youtube.com/excelvbaonline

Leave a Reply

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

This site uses Akismet to reduce spam. Learn how your comment data is processed.