画像のように、
以下、❶～❸を実現させたいのですが、どのように実現させれば良いか分かりません。

❶で、A2以下で頭文字が「S」で始まる部品No.を取得し、中間ファイル.xlsxのA2以下に貼り付け（部品発行表.xlsx⇒中間ファイル.xlsx）
↓
❷で、頭文字の「S」を省いた文字列をB2以下に貼り付け（中間ファイル.xlsx）
↓
❸で、❷のB2以下の文字列をキーとして、本日の日付をB列に入力（部品管理表.xlsx）

詳しい方、ご教授頂けないでしょうか。
よろしくお願いいたします。