VBAエクセル - マージされたセル+単一細胞は、（両方とも、私はそれらの合計をしたい、数字を含む）

Question

細胞O2：P2合併及びR2は、式「= O2 + 13が含まれてい28/12/2016

セルが含まれています10/01/2017として終了します

これは28/12/16 - 10/01/17の14日間です。

私はO2が必要：DD/MM/YYYY形式でアクティブなシートと14からそれまでP2は、O2に戻し、それを貼り付けます。P2

Sub AllInOne() 

' Create New Sheet 
ActiveSheet.Select 
ActiveSheet.Copy After:=ActiveSheet 
ActiveSheet.Select 
ActiveSheet.Name = "RenameMe" 

' Carry Flex 
ActiveSheet.Range("B4").Value = ActiveSheet.Previous.Range("R24").Value 

' New Datestamp 

' Clear New Timesheet 
ActiveSheet.Range("E12:R19").ClearContents 
ActiveSheet.Range("E26:F26,I26:M26,P26:R26").ClearContents 
ActiveSheet.Range("E27:F27,I27:M27,P27:R27").ClearContents 
ActiveSheet.Range("E12").Select 

End Sub 

Answer 1

追加する間隔パラメータとして "d"（日）を選択してDateAdd関数を使用する必要があります。

範囲（「O2：P2」）がマージされているため、O2を参照範囲として使用します。

Range("O2").Value = DateAdd("d", 14, Range("O2").Value) 

Answer 2

、そのマージされただけO2の代わりに、O2を使用している場合：p2、それは動作するはずです