Skip to main content

VBA Example - Change Font Color

Suppose you have a table of students scores for the math exam. Also assume the maximum possible score is 100. Therefore, any value above 100 is an error. And you want to highlight the error values in red. See the data below.


The VBA code is this:

'If a score>100, it is an error. Mark it in red.
Sub Change_color()
    Dim row As Integer
    Dim score As Integer
    For row = 2 To 16
        score = Cells(row, 2)
        If score > 100 Then
            Cells(row, 2).Font.Color = RGB(255, 0, 0)
        End If
    Next
    MsgBox ("done")
End Sub

The RGB() function is the function that Excel uses to set colors. RGB(255, 0, 0) is for red.

By running the code, you get the maximum value:

Comments

Popular posts from this blog

Excel - Solver examples

Excel Solver is used to solve optimization problems, which is like solving equations. In this tutorial, we will give a very simple example on how to use Excel Solver. Basic example Suppose your car is low on gasoline. The gasoline is $3/gallon. You have a budget of $50. How much gasoline can you buy? Of course, for a problem this simple, we do not even need a Solver to solve the problem. However, the purpose is to teach the users how to use Excel Solver, so we make the problem extremely simple. We have the following framework: Goal: maximize quantity of gasoline Relationship: cost=quantity * unit price Constraint: cost<=budget 1. In cell B1, we enter unit price "3", in cell B4, we enter the budget 50. In cell B2, we just enter an arbitrary number as the number of gallons. We entered 5. In cell B3, we enter the formula "=B1*B2" to let it be the cost, which equals to 15. 2. Click Solver under the Data menu. 3. A Solver dialog window pops up. In "Set objective...

Excel - How to count the number of sign changes (from + to - or vice versa) in a column?

Suppose you have a column of numbers and the data can be positive or negative. How do you count the number of times the data changes from positive to negative, or vice versa? We will use three functions, SIGN , INT and SUM to solve the problem. First we add a helper column B, name it "sign", then use SIGN function to get its sign. If the data is positive, it returns 1. If the value is negative, it returns -1. The formula is like: =SIGN(A2) Then we add another helper column C, call it "sign change", which checks whether sign of the current value is different from the last value. INT function is used to return the logical value TRUE or FALSE into 1 or 0. At last, at the end of column C, we use a SUM function to sum all the value changes. In this example, the data sign changes for 4 times (-1 to -3, -3 to 4, 2 to -5, and -5 to 6). VBA method Below is the VBA code to achieve it. You need to add a clickable button on the spreadsheet and assign the following code t...

Why Your Excel Formula Isn’t Working (And How to Fix It)

You type a formula into Excel, press Enter… and instead of the result you expect, you get an error, a zero, or something that just looks wrong. If this sounds familiar, you’re not alone. Excel formulas “not working” is one of the most common frustrations for Excel users — from beginners to experienced professionals. The good news? In most cases, the problem is caused by a small, fixable issue , not a broken spreadsheet. In this article, we’ll cover the most common reasons Excel formulas fail and show you how to fix them. 1. The Cell Is Formatted as Text This is by far the most common issue. Symptoms: Excel shows the formula instead of the result You see something like =SUM(A1:A10) in the cell Why it happens: The cell (or column) is formatted as Text , so Excel treats the formula as plain text instead of calculating it. How to fix it: Select the cell or column Go to Home → Number Format Change Text to General Click into the cell and press ...