FormulaR1C1 reading False

Question

私は、テーブルの最後の行にデータを追加しているExcelでuserformを持っています。最後の行の列14で、私は式を表示することが欲しいと思っていますが、それは常にfalseを読み取っています。私がラストローを取り出してこれを単独のエンティティとして実行すると、これは完全に機能します。

この例では、RC [-1]がブランクであるため、偽ではなく、53を返すべき回答が26.5 * 2であるはずです。

Private Sub CommandButton1_Click() 

Dim iRow As Long 
Dim ws As Worksheet 

Set ws = Worksheets("Primary Data") 

iRow = ws.Cells.Find(What:="*", Searchorder:=xlRows, _ 
    SearchDirection:=xlPrevious, LookIn:=xlValues).Row + 1 

ws.Cells(iRow, 14).Value = FormulaR1C1 = "=IF(RC[-1]="""",RC[-2]*RC[-3],RC[-2]*RC[-3]*(1-RC[-1]))" 

End Sub 

誰でもこの問題を手伝ってください。

Answer 1

あなたが値を設定していないので、ws.Cells(iRow, 14).Value = FormulaR1C1を行うws.Cells(iRow, 14).FormulaR1C1 =

Private Sub CommandButton1_Click() 

Dim iRow As Long 
Dim ws As Worksheet 

Set ws = Worksheets("Primary Data") 

iRow = ws.Cells.Find(What:="*", Searchorder:=xlRows, _ 
    SearchDirection:=xlPrevious, LookIn:=xlValues).Row + 1 

ws.Cells(iRow, 14).FormulaR1C1 = "=IF(RC[-1]="""",RC[-2]*RC[-3],RC[-2]*RC[-3]*(1-RC[-1]))" 

End Sub 

Answer 2

にあれば、列「K」、「L」と「M」の値がすでに動作する別のオプションを使用しないでください。このコードを実行する前に存在することである：

Dim Rng As Range 

Set Rng = ws.Cells(iRow, 14) 
Rng.Value = IIf(Rng.Offset(, -1) = "", _ 
        Rng.Offset(, -2) * Rng.Offset(, -3), _ 
        Rng.Offset(, -2) * Rng.Offset(, -3) * (1 - Rng.Offset(, -1)))