Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

70623 / 76733

←次へ　｜　前へ→


	【10613】別シートのセル削除

kei - 04/2/3(火) 17:22 -


	引用なし

	パスワード

こんにちわ。いつも大変お世話になっております。

EXCEL97で
シート１上にコマンドボタンを作成し、ボタンが押されると
別シート（Sheet2）のセルを削除する。（削除後上にシフト）
と、いったことをしたいのですが、色々試したのですが
うまくいきません。
どなたかどこが悪いのかお教え下さいませんでしょうか？
どうぞ宜しくお願いいたします。

Private Sub CommandButton1_Click()
　　
　　Worksheets("Sheet2").Range("A3").Select
　　Selection.Delete Shift:=xlUp
　　
　　'いろいろ試した跡↓‥
　　'Worksheets("Sheet2").Cells(3, 1).Delete Shift:=xlUp
　　'Worksheets("Sheet2").Range("A3").Delete Shift:=xlUp
　　
　　'Worksheets("Sheet2").Cells(3, 1).Select
　　'Selection.Delete Shift:=xlUp
　　
　　'With ThisWorkbook.Worksheets("sheet2")
　　'　 .Range("A3:A3").Delete Shift:=xlUp
　　'End With

End Sub

1 hits

▼

【10613】別シートのセル削除 kei 04/2/3(火) 17:22

≪