Vba Excel Format Function In Formula