1

これは私が現在持っているものです：

If Sheet6.Range("j8").Value <> 0 Then

Sheet6.Range("j8").Copy Sheet6.Range("B" & Rows.Count).End(xlUp).Offset(1, 0)

End If

Sheet6.Range("J8").ClearContents

しかし、問題は、形式全体ではなく、値のみをコピーする必要があることです (pastespecial xlpastevalues を試しましたが、ほとんど成功しませんでした)..そして、私が抱えている他の問題は、このマクロが機能するために、別のセルをクリックする必要があります（アクティブにすることはできません）..しかし、セルがまだアクティブな間に動作させる必要があります..助けてください、ありがとう

4

0 に答える 0