- 締切済み
エクセルのマクロ
mar00の回答
- mar00
- ベストアンサー率36% (158/430)
とくにでやる必要はないと思うのですが。 結果をB1に表示するとして =IF(A1="","◎",IF(A1=1,"○",IF(A1=2,"△",IF(A1=3,"□",IF(A1=4,"×",""))))) で十分だと思います。 マクロにこだわるなら Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address() <> "$A$1" Then Exit Sub Select Case Range("A1") Case 1 Range("B1") = "○" Case 2 Range("B1") = "△" Case 3 Range("B1") = "□" Case 4 Range("B1") = "×" Case "" Range("B1") = "◎" Case Else Range("B1") = "" End Select End Sub とか。 空白と1から4以外は空白が返ります。
関連するQ&A
- Excelのマクロについて
分かる人がいれば、教えてください!! Excel上のセル(A1～A10)をクリックしたら"○"をB1～B10のセルをクリックしたら"×"になるようなマクロを作りたいんですけど、どうすれば良いのでしょうか？ ちなみに例えばA1～A10に○がついていて、そのA列のどれかをクリックしたら空白になるようなマクロもお願いします。 大変困っているのでよろしくお願いします。
- 締切済み
- オフィス系ソフト
- エクセルにマクロが！
エクセル（Excel2000）で、マクロを使っていないのにマクロが使われてしまいます。 例えば、 まず普通にスタート→プログラムと表示していき、エクセルを立ち上げる。 次にどこのセルでもいいから適当に文字を入力する。（例えば、A1にaと入力する） そして、ファイル→名前を付けて保存で保存する。 こうしてできたエクセルのファイルを普通に立ち上げると、「このファイルはマクロが使われています」と、マクロを有効にするか、無効にするかを確認する画面が出てきてしまいます。 どうしてでしょうか。直す方法はあるのですか。よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- Excel（セルの結合マクロ）
いつもお世話になっております。 Excelのマクロで、選択範囲の中で、下のセルが空白のものは、上のセルと結合されるマクロを作りたいと考えています。 （例１：A1セルに”TEST”が入力されており、A2,A3セルが空白として、A1:A3を選択し、マクロを実行するとA1からA3がセル結合される 例２：A1に”TEST2”B2に"TEST3"が入力されており、A1:B3を選択すると、A1からA3が結合され、B2とB3も結合される） 説明が下手で申し訳ないのですが、お力を貸していただけませんでしょうか？ よろしくお願いいたします。
- ベストアンサー
- オフィス系ソフト
- エクセル マクロ 入力制限について
検索で探したのですが、うまくヒットしないため、質問させていただきます。 エクセルのセル入力制限についての質問です。 Ｄ１セルが空白でなかったら、Ａ１・Ｂ１・Ｃ１に入力できないようにする と言う条件です。 それを、Ｄ１セルだけでなく、行すべてに適用したいのですが、 （Ｄ２ に入力されていたら、Ａ２・Ｂ２・Ｃ２を入力できなくする） マクロで処理できるでしょうか？ マクロ実行は、オープンしたときに実行するようにしたいと考えております。 ご教授お願いします。
- ベストアンサー
- Visual Basic
- エクセルで連番をマクロで
こんにちは いつもお世話になっています。 Windows7、エクセル2010で教えてください。 B3から仮にB100まで文字列があるとします、空白セルはありません。 この状態でA3からA100まで１から始まる連番をマクロで実行したいのです。 実際はB列のデータの最終行は不定です。つまり、B列にデータがなくなるまで（空白セルになるまで）A列に連番をつけたいのです。現在はA3,A4に１，２と入力し、オートフィルで該当セルを選択し「予測」で連番をつけています。 マクロ記録ではB列にデータがなくなる判断ができなくて作れません。 この作業が頻繁にあるものですからマクロができれば助かります。 よろしくお願いいたします。
- ベストアンサー
- オフィス系ソフト
- Excelマクロ 入力の有無を判定するマクロを組みたい
はじめまして。 マクロの初心者です。 エクセルマクロを利用して、セルに何か入力（文字でも数値でも）がある場合の判定をしたいのですが、うまくいきません。 具体的には、 ・（A1セルが空白で）B1からC10セル（10個のセル）のいずれかのセルに何か入力された場合 → D1セルに"○"を出力。 ・（A1セルが空白で）B1からC10セル（10個のセル）のいずれかのセルに何も入力がない場合 → D1セルは"（空白）"。 ・但し、大前提として、A1セルに"×"が入力されている場合 → D1セルに"×"を出力。 （B1からC10セル（10個のセル）のいずれかのセルに何か入力されている場合でも、A1セルが"×"ならばD1セルは"×"とする） としたうえで、同様の判定を ・A11セルおよびB11からC20を判定しD11セルに結果を出力、 ・A21セルおよびB21からC30を判定しD21セルに結果を出力、 … と繰り返して、A100セルまで実行させたいと考えています。 （D1、D11、D21、D31、D41、D51、D61、D71、D81、D91の10個のセルに"○"、"×"、"（空白）"の結果を出力したいです） 過去の投稿や解説書などを参照にしているのですが、なにぶん本当に初心者のためうまくいきません、、、 どなたかお力添えをお願いします。
- ベストアンサー
- その他(Windows)
- エクセルのマクロで、できると思うのですが・・・。
例えば、Ａ１から下にリストを入力していき、Ａ１００まで入力したとします。 他のシートなどで作業後、シートを戻し、再度リストを入力しようとした時、すぐにＡ１０１のセルに入力したいのです。 つまり、Ａ列のなかで、【現在一番上に位置している空白セル】をアクティブにするマクロが知りたいのです。 ただ、アクティブになるだけでは無く、それが画面上に現れて、すぐに入力できるようになっていないと困るのです。 どうでしょうか。
- ベストアンサー
- その他([技術者向] コンピューター)
- エクセルexcelの関数やマクロ教えて下さい！
エクセルexcelについて教えて下さい。 数字が入力されたセルに数を加えていきたいのですが、 "1"が入力されたセルに"3"と入力すると"4"と表示されるようにする方法を教えて下さい。関数やマクロなど勉強中ですが、難しくて出来ません。お願いします。
- ベストアンサー
- オフィス系ソフト
- エクセルマクロ、ご教示ください。
このようなことを考えています。 セルA5からA20までに、１から１６の番号を入力しています。 このセルA5からA20の範囲の中で、セルをダブルクリックすると、ダブルクリックしたセルの番号を常にセルC5に表示させたいのです。 例えば、セルA6をダブルクリックすると、入力されている番号２を、セルC５に表示、 セルA８をダブルクリックすると、番号４をセルC5に表示 このような、マクロは可能でしょうか。 どなたか、よろしくお願いします。 エクセルは2003を使用しています。
- ベストアンサー
- オフィス系ソフト
補足
回答ありがとうございました。セルA1に入力した文字・数字等を他のセルではなく同じセル(A1)に表示させたいのですが、何か方法はありますか？