パターン処理(再度)vbscript

excel VBA(vbscript)質問1 文字変数Xを処理して変数yを求めるマクロコードのヒントを(つまり.xlsを除き、続いて文字や_を取り去る)質問2 文字変数Xを処理して変数zを求めるマクロコードのヒントを(つまり文字のみを取り去る)(