セル内の値を任意の数値で自動除算するマクロ。すべての値がペニー単位で指定されているデータ ファイルがあり、計算とデータをグリブナ (または別の通貨) に変換する必要がある場合に必要になることがあります。
もちろん、数式を使用して値を変換することもできますが、数値が多い場合、この方法での変換は非常に長くて退屈になります。
たとえば、選択したすべてのセルを数値で割る方法を考えてみましょう。
これを行うには、本を開いて、 Visual Basic エディタ (Alt+F11)、 モジュールVBAを追加 ( Insert - Module ) そして、このマクロ テキストをそこにコピーします。
Sub Division() For Each cell In Selection cell.Formula = cell.Value Next cell For Each cell In Selection cell.Value = cell.Value / 100 Next cell End Sub
その後、Excel に戻ることができます。必要なセルを選択し、メニューからマクロを実行します。 Tools - Macro - Macros (Alt+F8) 。
また、マクロコード内で置き換えると、
同様に、任意の数値を乗算するなど、任意の演算を実行できます。