Mere macro jeg ikke fatter ;-)

Jeg sidder lige og roder med et lille sideprojekt hvor jeg vil have excel til at indsætte "Time" i celle b2 og hvis den er optaget så i celle c2. Jeg har fået noget kode af Morten til noget andet. Det har jeg så pillet lidt ved og det virker fint. Jeg fik så den ide at når jeg "stempler ind" (sætter tid i b2) skal den også sætte dato i a2. Det kan jeg også godt få den til, men når jeg kører macroen næste gang sætte den ikke kun tid i c2 men også dato i b2, hvilket jo var der "time" stod i forvejen. Er der nogen der gider forklarer mig hvorfor - hvad gør jeg forkert?? Skide irriterende jeg ikke selv kan regne ud hvordan det virker, men der er vel ikke andet at gøre end at blive ved ;-)

Koden ser sådan ud:

Sub tid_stempel()
Dim Svar As Integer
For Each c In Range("b2:c100").Cells
        If c.Value = "" Then
        c.Activate
        c.Font.ColorIndex = 3
            If c.Offset(0, 0) = "" Then
            c.Offset(0, 0) = Format(Time, "hh:mm")
            c.Offset(0, -1) = Format(Date, "dd.mmm.yy")
            c.Font.ColorIndex = xlAutomatic
        Exit Sub
            End If
            If c.Offset(0, 1) = "" Then
            c.Offset(0, 1) = Format(Time, "hh:mm")
            c.Font.ColorIndex = xlAutomatic
        Exit Sub
            End If
            c.Font.ColorIndex = xlAutomatic
        Exit Sub
        End If
    Next c
End Sub