0
Sub Button_Click()
With Thiswoorkbook.sheets("abc")
.Rows("2:"&.Rows.count).ClearContents
End with
with Thiswoorkbook.sheets("xyz")
.Rows("1:"&.Rows.count).ClearContents
End with
end sub
が、私はシングルクリックでそれを行うためのコードを修正する方法がある内容をクリア二回クリックする必要がクリア内容は、私は上記のコードを使用しています
あなたはもう少し詳しく説明できます:*私は内容を2回クリックする必要がありますか?また、**行全体**に対してアクションを取ることはお勧めできませんが、実際には*が実際に存在する場所に限ります。それを調整することが役に立つかもしれません。 –
エラーを再現することはできません。詳細を教えてください。 –