• ベストアンサー

指定のセルに入力したら指定のセルを自動で削除したい

A１セルに入力があればD5セルが削除されるといったマクロは どのようなコードを書けば良いのでしょうか？；お力を貸していただければ助かります；

回答 全件
ベストアンサー
どのご質問も結局同じ内容です。 手順： シート名タブを右クリックして…

質問者が選んだベストアンサー

  • ベストアンサー
  • keithin
  • ベストアンサー率66% (5278/7940)
回答No.1

どのご質問も結局同じ内容です。 手順： シート名タブを右クリックしてコードの表示を選ぶ 現れたシートに下記をコピー貼り付ける private sub worksheet_change(byval Target as excel.range) 　if application.intersect(target, range("A1")) is nothing then exit sub 　if range("A1") = "" then exit sub 　range("D5").clearcontents end sub ファイルメニューから終了してエクセルに戻り、Ａ１に記入したり編集したり削除してみる。

kokorororo
質問者

お礼

keithin様、何度もご回答本当にありがとうございます； 完璧に思い通りの事が出来ました。素晴らしいです。。。

全文を見る
すると、全ての回答が全文表示されます。
  1. カテゴリ
  2. パソコン・スマートフォン
  3. ソフトウェア
  4. その他MS Office製品

関連するQ&A

  • 入力があれば指定のセルに飛ぶようにしたい

    今、C列とD列のみロックをはずして選択できるようになっています。 エクセルはオプションで下方向にも右方向にも設定できますが、どちらの設定の人でも、 C１セルに入力をしてEnterを押したらC３セルに飛び（C2ではありません、またC2セルは ロックしません）、C１セルに入力せずC１セル上でEnterを押したらD1セルに飛ぶように したいです。どのようなマクロのコードを組めば良いか途方にくれています。どのような コードか教えていただければ幸いです。。

  • セルへの入力時間を自動挿入に加えて

    「A1セルに入力したら、入力時間をA2セルに自動挿入」という質問(http://okwave.jp/qa/q994866.html)で、入力時間を表示させることはできたのですが、 このマクロはA1セルの内容が変化した時間がA2に挿入されることになると思います。 この後、A1セルの文字が削除されたらA2セルに挿入された時間も削除されるようにすることは できるでしょうか？

  • あるセルが空白でなければ入力できないようにしたい

    例えばA1セルが空白でなければ C1セルに入力しようとすると注意喚起のポップがでて入力できないようにする といったマクロはどのようなコードを書けばいいのでしょうか？ できなくてはたはた困っています；

  • 空白なら入力、入力されていたら削除のマクロ

    A1セルに、B１セルに入力した文字をコピーするマクロを作りたいです。 ただし、常にB1セルに入力した文字をコピーするのではなく、A１セルに何も 入力されていなかった時だけ文字をコピーして、逆に何か入力されていた時はそれを 認識して、A１セルを空白にするマクロです。マクロの記録でうまくいかなかったので、お知恵を貸していただければ幸いです。。 （例）　A１セルは空白　B１セルに　あいうえお　とかかれているとする 　　　マクロボタンを押すと、　A１セルにあいうえお　と入力される 　　　もう一度同じマクロボタンを押すと、A1セルが空白になる（あいうえおが削除される） 　　　更にもう一度同じマクロボタンを押すとA１セルにあいうえお　と入力・ 　　　これの繰り返しです。

  • マクロのセルの範囲指定

    お世話になります。マクロ初心者です。エクセルの業務でマクロを作成しようとしているのですが、マクロ実行で、セルの範囲が指定される方法はありますか？例えば シート名　　開始　　終了　 Sheet1　　　Ａ１　　Ｄ１０ を入力して、ボタンを押したらＡ１からＤ10までのセルが選択されることです。説明不足ですみません。宜しくお願いします。

  • 複数セルの入力内容で異なる値を返すマクロ

    次のようなマクロってどのように組めばいいのでしょうか。 例えば，A1のセルに「あ」B1に「１」C1に「２」が入力されているときにはD1に500を返す。A1に「い」B1に「２」C1がブランクのときにはD1に250を返す，のように複数のセルの入力内容によって異なる値を返したいのですが，このようなマクロってどのようにすれば組めますか。 マクロの初心者です。

  • セル内削除

    エクセルのマクロに関してなのですが テキストボックス内に入力された文字を指定のセルへ 転記し印刷というところまでプログラムを組んだのですが 印刷後転記されたセル内の文字を削除させるにはどうすればいいでしょうか。 セル事態を削除させるのは調べて見つけたのですが セルの中(文字だけ)を削除させる方法がわかりません。 可能でしょうか。 宜しくお願い致します。

  • エクセルでセル入力とセル出力の自動化

    おそらくマクロで簡単に出来ることだと思うのですが、マクロを使ったことが一度もなくやり方がわからなく苦慮しています。 やりたいことは、簡単に述べると、 (1)セルA1に数字を入力（変数）すると、セルA2に計算結果が出る。 [つまり、A2にはA1を変数とする関数が入っている] (2)セルB1、セルB2、セルB3、…にはそれぞれ数値が入力されている。 [変数リスト] (3)変数リストにあるB1の数値をA1に入力して、その結果のA2をC1に書き出す。さらに、B2をA1に入力して、その結果のA2をC2に書き出す。以下、これを変数リストすべてについて実行する。 という感じのことです。この程度のことなら、初めから関数化してしまえばおしまいなのですが、実際A2の出力でやっている計算はシートを複数使うような大規模な計算なので、関数化するのは面倒です。そこで、手動でいちいち変数の入力と結果の出力を実行しておりましたが、それはそれで入力ミスや出力ミスもしそうですし、自動化できるならそれに越したことはありません。 そういうわけで、上記の作業を自動化する方法をご教授いただけたらと思います。どうぞよろしくお願いします。

  • マクロで可視セルのみの削除

    Ａ行に数字を入れ、Ｂ行にＡ行同列セルの数字に対して 数値を返す数式を入れています。 Ｂ行は非表示にしています。 （Ｃ・Ｄ行、Ｅ・Ｆ行・・・とも同じ処理） 数字を入力する範囲（Ａ、Ｃ、Ｅ・・・）を選択し、 入力されている数字を消去するようマクロを組みました。 （範囲選択→ツールの編集→ジャンプ→可視セルを選択後、Delete） これはうまく作動します。 が、数式が壊れるのを防ぐ為、念には念を・・・と、 入力範囲部分はセルの書式設定で保護ロックを外し、 シートを保護しました。 そうすると、保護されているからだめ！と エラーが出て、マクロが作動しません。 （可視セル選択部分にデバッグがでます。） ・非表示のセルがある ・一部を除きシートを保護している 状態で、マクロで可視セルのみ削除することは不可能なんでしょうか？ 宜しくお願いします。

  • Excel2007　セルを右方向に削除する方法

    例えば、Excelのデータで各セルに次のような入力があります。 Ａ　Ａ　Ａ　Ｂ　Ｃ　Ｄ Ａ　Ａ　Ｂ　Ｃ　Ｄ Ａ　Ｂ　Ｃ　Ｄ これを Ａ　Ａ　Ａ　Ｂ　Ｃ　Ｄ 　　Ａ　Ａ　Ｂ　Ｃ　Ｄ 　　　　Ａ　Ｂ　Ｃ　Ｄ というように、空白のセルを右方向に削除し、一番右に入力のあるセルの列にすべての行を揃えたいです。 500行以上あるデータなので、一気にできる方法を探しています。 セル選択後、削除する時に「左方向にシフト」や「上方向にシフト」はあっても、「右方向にシフト」がないため、データ処理に苦戦しています。 マクロの知識がないので、マクロを使わない方法（複雑すぎなければ関数でも・・・）があれば嬉しいです。 最終的には、 Ａ　Ｂ　Ｃ　Ｄ Ａ　Ｂ　Ｃ　Ｄ Ａ　Ｂ　Ｃ　Ｄ とまとめる予定のデータです。 拙い説明で申し訳ありませんが、 もし、ご存知の方がいらっしゃっいましたら、よろしくお願いいたします。

注目のQ&A

カテゴリ

専門家に質問してみよう

職業から探して質問する

あなたにピッタリな商品が見つかる！ OKWAVEセレクト

質問する