Zatím jsem to pořešil takto:
Or Target.Row < 10 Or Target > 311299 Or Target < 10100 Or Mid(Target, 6, 1) = "," Or Mid(Target, 7, 1) = "," Then
Formátování se neprovede na prvních devíti řádcích nikde a na dalších řádcích jedině tehdy, je-li zadáváno číslo (které má reprezentovat ddmmrr) v intervalu 010100 až 311299. Jakmile je tam cokoliv jiného (nic, text, desetinné číslo) formátování se nekoná. Pokud chci zadat datum minulého století, prostě tam natvrdo napíšu "31.10.1986".
Vypadá to trochu kostrbatě, vím. U
Or Mid(Target, 6, 1) = "," Or Mid(Target, 7, 1) = "," Then
to neumím napsat do jedné podmínky.
(touto podmínkou vylučují případná desetinná čísla z "povoleného" intervalu)