Marker flere kolonner til højre for markering

Hej
Jeg har dette VBA og det fungere perfekt, men hvad skal jeg skrive for at markere yderligere 2 kolonner  til højre?
Sub FindMåned()
    Application.ScreenUpdating = False
    Rows("99:99").Select
    Cells.Find(What:=(Range("A98").Value), After:=ActiveCell, LookIn:=xlFormulas, LookAt _
        :=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
        False, SearchFormat:=False).Activate
    ActiveCell.Offset(1, 0).Select
    Range(Selection, Selection.End(xlDown)).Select
End Sub

Hvis dette er kolonne C, så skal den også markere kolonne D og E.