使用vba格式化Excel数据库标头

I have an excel table and I want to extract a portion of the columns names: for example, the column name is "Y2014", I should get the String (or integer) "2014" only here is my codeI have an excel table and I want to extract a p