2016-12-13 7 views
0

に数式の結果を記述するマクロ私はマクロでセルに数式を書く方法を知っているが、私はExcelのセル

を使用せずにセルに

Rng.Offset(0, 1).Formula = "=CONCATENATE(IF(RC[-1]<>"""",RC[-2]& _ MID(CELL(""filename"",RC),FIND(""]"",CELL(""filename"",RC))+1,256),""""),""_"",RC[-1])" 

をこの式の出力を記述する必要があります

Rng.Offset(0, 1).Copy 
Rng.Offset(0, 1).PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, _ SkipBlanks:=False, Transpose:=False 
例えばので、私はいつもちょうど、その現在の値を持つセルの値を上書き

答えて

0

Rng.Offset(0, 1).Formula = "=CONCATENATE(IF(RC[-1]<>"""",RC[-2]& _ 
    MID(CELL(""filename"",RC),FIND(""]"",CELL(""filename"",RC))+1,256),""""),""_"",RC[-1])" 
Rng.Offset(0, 1).Value = Rng.Offset(0, 1).Value 

これはREMOますセルから数式を計算し、数式で計算された値で置き換えます。