Convert Macro Input To Json Using Vba