2017-12-04 5 views
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 

が、私はシングルクリックでそれを行うためのコードを修正する方法がある内容をクリア二回クリックする必要がクリア内容は、私は上記のコードを使用しています

+1

あなたはもう少し詳しく説明できます:*私は内容を2回クリックする必要がありますか?また、**行全体**に対してアクションを取ることはお勧めできませんが、実際には*が実際に存在する場所に限ります。それを調整することが役に立つかもしれません。 –

+0

エラーを再現することはできません。詳細を教えてください。 –

答えて

0

ベースあなたが提供した情報では、あなたがシェイプにマクロを割り当てたと思われるので、シェイプをダブルクリックして実行させる必要があります。ワンクリックでActiveXコントロールボタンが実行されます。 Microsoft Officeのリンクされたドキュメントで、スプレッドシートにActiveXコントロールボタンを配置する方法を参照してください。 https://support.office.com/en-us/article/Assign-a-macro-to-a-Form-or-a-Control-button-d58edd7d-cb04-4964-bead-9c72c843a283

関連する問題