Excel Vba Create Range From Variables And Patterns