Quote:
Originally Posted by Bob Umlas, Excel MVP
Certainly not by hovering the mouse over the cell, but you can set up a
worksheet_change event to bring up the formatting (and maybe set a ceertain
cell to turn this "feature" off), something like this (on the sheet-code):
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
On Error Resume Next
Dim rg As Range
If Range("A1").Value = "No" Then Exit Sub
Err.Clear
Application.EnableEvents = False
Set rg = Application.Intersect(Target,
Cells.SpecialCells(xlCellTypeAllFormatConditions))
Application.EnableEvents = True
If Err.Number < 0 Then Exit Sub
If rg Is Nothing Then Exit Sub
Application.SendKeys "%E"
Application.Dialogs(xlDialogConditionalFormatting) .Show
End Sub
"Bill E" wrote:
Is there an easy way to scroll over a worksheet to see what the Conditional
Formatting is for various cells? I know you can go through 'Format' -
'Conditional Formatting', but that can be very laborious. I'm reviewing a
fairly large worksheet where there are errors in the conditional formatting,
but most appear fine. I'd like to be able to scroll over cells and see what
the formatting is. Is this possible? Thanks! -Bill
|
try this code, all the cells which have conditional formatting turns to bold and font size to 14, you can easily debug them
Private Sub Workbook_Open()
Dim i, j As Integer
ActiveWorkbook.Sheets("sheet1").Select
For i = 1 To 100
For j = 1 To 100
If Worksheets("sheet1").Cells(i, j).FormatConditions.Count < 0 Then
Worksheets("sheet1").Cells(i, j).Font.Bold = True
Worksheets("sheet1").Cells(i, j).Font.Size = 14
End If
Next j
Next i
End Sub
all the best