質問: "=RC[-1]+7" '3,8 '"",6,13 End Sub ``` 検索エンジンgoogleで、「vba "参照セルが空文字"」を検索しましたが、 「vba "参照セルが空文字"」との一致はありません。
回答: ワークシート関数でセルが空白であるか判定するには`ISBLANK`を使用すればよいです。 参照先が空白の場合、数値として扱いたくないのであれば`IF`を併用して ``` Cells(2, 2).FormulaR1C1 = "=IF(ISBLANK(RC[-1]),"""",RC[-1]+6)" ``` のように分岐することができます。 またセル範囲に対して`ISBLANK`かどうかを判定したい場合は空白でないセルの数を返す`COUNTA`関数を用い、`COUNTA(RC[-2]:RC[-1]) = 0`のように判定するのが手軽です。`COUNTA`は可変長引数ですので`COUNTA(RC[-5], RC[-3], RC[-1])`と複数の範囲を指定することもできます。