Bug with conditional formatting (and personal formula maybe)

Question

On Excel 2010, I have some spectaculars bugs after a conditional formating :

Before:

enter image description here

After:

enter image description here or like that (depends...) :

And without bug it could be like that :

enter image description here

I'm more or less sure that is an Excel bug caused by my personal formula in VBA:

Function NumCol(plage As Range, ch As String) As Long

    'Application.Volatile

    For Each c In plage
        If c.Value = ch Then NumCol = c.Column
    Next

End Function


Function NumLig(plage As Range, ch As String) As Long

    'Application.Volatile

    For Each c In plage
        If c.Value = ch Then NumLig = c.Row
    Next

End Function

What can I do to correct this visual bug ?

Liniel · Accepted Answer · 2015-04-15 12:05:28Z

1

Please try

c.HorizontalAlignment = xlCenter 
c.VerticalAlignment = xlCenter

in each loop.

answered Apr 15, 2015 at 12:05

Liniel

7291 gold badge7 silver badges15 bronze badges

Sign up to request clarification or add additional context in comments.

4 Comments

Liniel Over a year ago

@QuentinT. Is it merged cells?

Quentin T. Over a year ago

Yes, merged cells. Sorry it's my bad, it's working well now (I had missed c.VerticalAlignment = xlCenter...). But I have another bug, when I do an alt+tab on the file, it break again the visual...

Liniel Over a year ago

Try add Application.ScreenUpdating = False on start in your function and add Application.ScreenUpdating = True at the end.

Quentin T. Over a year ago

And the same with Application.ScreenUpdating true or false... The visual format and bugs appears more or less randomly.

Collectives™ on Stack Overflow

Bug with conditional formatting (and personal formula maybe)

1 Answer 1

4 Comments

Hot Network Questions

Collectives™ on Stack Overflow

1 Answer 1

4 Comments

Related