Excel97:
Myslím, že to nepůjde (ani oklikou přes podmíněné formátování). Jedině makro (a přiřadit k němu tlačítko či klávesovou zkratku).

Sub Makro1()
    Range("A1").Select
    Selection.Copy
    Range("B2").Select
    Selection.PasteSpecial Paste:=7, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
End Sub