Fejl når Worksheet_Activate og Worksheet_Change anvendes sammen

Hvor præcis er de 2 nævnte Sub's placeret - i Ark eller ThisWorkbook?

i Ark

Kunne det være at Worksheet_Activate laver en ændring i arket således Worksheet_Change starter inden Activate er færdig??
vil det kunne give dig problemer??

Hvis det er årsagen, så vil du tidigt i Worksheet_Activate skrive
Application.EnableEvents = False
og sidst i koden skrive
Application.EnableEvents = True

Tak flemmingdahl det løste mit første problem hvor jeg angiver et område hvor man må taste i.

Når man taster i området skal baggrunden ændres som vist nedenfor, men når jeg prøver at taste i et af felterne får jeg følgende fejl.

Run-time error '1004': Kan ikke angive egenskaben ColurIndex for klassen Font.
Hvis jeg så tekster' den så er det bare den næste line den ikke kan angive.

        Select Case ActiveCell.Value
            Case Is = Range("AK7")
                With ActiveCell.Font                        ' Font
                    .Bold = True                            ' Fed
                    .ColorIndex = 2                        ' Hvid
                End With
                With ActiveCell.Interior                    ' Baggrund
                    .ColorIndex = 5                        ' Blå
                    .Pattern = xlSolid                      ' Fuld farve
                End With
            Case Is = Range("AK8")
                With ActiveCell.Font                        ' Font
                .....
                .....
                .....
        End Select

Du laver også en fejl... .ColorIndex kan ikke kaldes efter .Font, som du gør i den første With ActiveCell.Font...

Ændres til f.eks.
With ActiveCell
    .Font.Bold = True
    .Interior.ColorIndex = 2
End With

Det er vigtigt at du kalder egenskaberne på den rigtige måde, ellers fejler de.