ワークシート関数でできることはワークシート関数で済ませて
データの差し替えとかそういうところだけVBAを使う