やあみんな私Compile Error: Expected:End of Statement
は数式に変数を挿入し続けているので、このテーブルは異なるシート名に基づいて何度も使用できます。
私が欠けているものを教えてください。挿入しようとしているこの式で、構文エラーが発生します。
ActiveCell.Formula = "=INDEX(PrevSh & [LENGTH],MATCH([MATERIAL], PrevSh & [MATERIAL],0)) & "(" & COUNTIF(PrevSh & [LENGTH],INDEX(PrevSh & [LENGTH],MATCH([MATERIAL],PrevSh & [Material],0)) )&")"
Dim PrevSh As String
PrevSh = ActiveSheet.Previous.Name
Range(TableName & "[QTY OF LNG]").Select
ActiveCell.Formula = "=INDEX(PrevSh & [LENGTH],MATCH([MATERIAL], PrevSh & [MATERIAL],0)) & "(" & COUNTIF(PrevSh & [LENGTH],INDEX(PrevSh & [LENGTH],MATCH([MATERIAL],PrevSh & [Material],0)) )&")"