Odstraň IF, zjisti si řádek, který se změnil:

ChngRow = Target.Row

slož adresu zdrojové oblasti, která se bude kopírovat, a zkopíruj ji:

SrcRange = "B" & ChngRow & ":K" & ChngRow
Range(SrcRange).Copy

Budeš ale mít problém, pokud si smažeš buňku v řádku B - poprvé se to zapíše korektně, ale další změna Ti ten zálohovaný řádek s prázdnou první buňkou přepíše. Asi bych do sloupce A na záloze prvně zapsal datum a pak teprve na stejný řádek, kam jsem to datum zapsal, zkopíroval zen změněný řádek.