VB question

[cornishteeth]

I am new to visual basic and am trying to learn. Basic question....I understand how excel uses conditional formatting to change the colors/fonts/etc. based on a inputted parameter. What I don't understand is how it is written in VB. Is there a way in Excel to display what actually is written in VB when say a text box changes color from red to blue because the total went below 100? Any help would be appreciated and any code fragments also help me understand.

Thanks,

Cornishteeth

 

[Philem]

Hullo. This should start you along what you need:

Private Sub Worksheet_Change(ByVal Target As Excel.Range) 'name of the subroutine
Dim rngPriority
Dim rngCellPriority
Dim strColour  'set some variables
Application.ScreenUpdating = False  'keeps the screen from going beserk
With Worksheets("Sheet1")
    Set rngPriority = .Range(.Range("C1"), .Range("C65535").End(xlUp))
End With  'selects the range to use

For Each rngCellPriority In rngPriority  'loops through the ranges
    strColour = LCase(rngCellPriority.Value)
    Select Case strColour
        Case "very low"
            rngCellPriority.Interior.Color = vbGreen
        Case "low"
            rngCellPriority.Interior.Color = vbYellow
        Case "moderate"
            rngCellPriority.Interior.Color = vbMagenta
                'VB has no simple name for orange. Go figure
        Case "high"
            rngCellPriority.Interior.Color = vbRed
        Case Else
    End Select
Next rngCellPriority
Application.ScreenUpdating = True 'turn screen updating back on
End Sub

HTH

P

 

[Juan Pablo González]

...What I don't understand is how it is written in VB. Is there a way in Excel to display what actually is written in VB when say a text box changes color from red to blue because the total went below 100?...

Are you asking what's the code that Excel uses to work with Conditional Formatting ? or are you asking how do you set up Conditional Formatting through VBA ? or what ?