いつもお世話になっております。

以下のように、Excelで期間ごとの売上を計算しています。

フィルタをかけて小計行を非表示にした状態で、VLOOKUP関数が入った可視セルすべてに対しコピー＆値貼り付けを行いたいのですが、
「そのコマンドは複数の選択範囲に対して実行できません。」とエラーになります。

いろいろしらべて、Selection.Value = Selection.Value　を使えばできそうな感じがしているのですがVBA初心者のため苦戦しております。
どなたかお詳しい方ご教授いただければ幸いです。