VBA 数式が入っているセルに一括値貼り付けする 数式が入っているセルに一括値貼り付けする Sub test() ’ 数式が入っているセルに一括値貼り付けする Dim myRange As Range ’ 数式入っているセルを特定 Set myRange = ActiveCell.SpecialCells(xlCellTypeFormulas) ’ 一度再計算する Application.Calculation = xlCalculationAutomatic With myRange ' 値貼り付ける .Value = .Value ' 背景色緑色にする .Interior.Color = vbGreen End With End Sub ― ― ― ― ― ― ― ― ― ― → Excel VBA基礎入門もくじ へ戻る 参考記事 『VBA セルの操作 セルの選択』 セルの選択(Range) 単一セルの選択Sub test1() ’ セルA1を選択 Range("A1").SelectEnd Sub セル…ameblo.jp 『VBA セルの値が数値かを判定したい』 セルの値が数値かを判定する 構文IsNumeric(Range.value) Sub test() Dim R As Range …ameblo.jp 『VBA セルの数式を値に変換する』 数式を値に変換する 特定のセル範囲の数式を値に変換する Sub test() Range("G3").Value = Range("G3").…ameblo.jp 『VBA セルの操作 空白セルの選択』 空白セルの選択 構文Object.SpecialCells(xlCellTypeBlanks).Select Sub test1() ’ セルA2を…ameblo.jp
『VBA セルの操作 空白セルの選択』 空白セルの選択 構文Object.SpecialCells(xlCellTypeBlanks).Select Sub test1() ’ セルA2を…ameblo.jp