R Replace Character In String Vba Excel