- ベストアンサー
Excel2007 セルの値を連動させたい
keithinの回答
シート名タブを右クリックしてコードの表示を選ぶ 現れたシートに下記をコピー貼り付ける private sub Worksheet_Change(byval Target as excel.range) if target.count > 1 then exit sub if application.intersect(target, range("A1:E1")) is nothing then exit sub application.enableevents = false cells(target.row, "A").resize(1, 5).value = target.value application.enableevents = true end sub ファイルメニューから終了してエクセルに戻る A1:E1の1つのセルに記入すると勝手に反映する。 #おまけ range("A1:E1")の部分を例えばrange("A:E")と書き換えれば、動作範囲が変わります。
関連するQ&A
- 二つのシートのセルを比較して、あるセルの値が一致した場合に、片方のセル
二つのシートのセルを比較して、あるセルの値が一致した場合に、片方のセルの値を 別のシートに設定するには、どうしたらいいでしょうか? [シート1] --|A---B---C---D---E --+---+---+---+---+--- 01|A1 ??? 02|A2 yyy 03|B1 ??? 04|C1 sss [シート2] --|A---B---C---D---E --+---+---+---+---+--- 01|A1 aaa 02|A3 bbb 03|B0 xxx 04|B1 ccc 05|C1 sss シート1 [Aのセル]とシート2の[Aのセル] を比較し、同じ値だった場合に、 シート2の [B] の値を シート1の[C]に設定するための関数はどのようにしたら良いでしょうか? 最終的に、シート1が --|A---B---C---D---E --+---+---+---+---+--- 01|A1 ??? aaa 02|A2 yyy 03|B1 ??? ccc 04|C1 sss sss となります。 Excelの関数あマクロは、どうしても分からなく質問させてもらいました。 申し訳ありませんが、ご教授宜しくお願い致します。
- ベストアンサー
- オフィス系ソフト
- 複数セルの入力内容で異なる値を返すマクロ
次のようなマクロってどのように組めばいいのでしょうか。 例えば,A1のセルに「あ」B1に「1」C1に「2」が入力されているときにはD1に500を返す。A1に「い」B1に「2」C1がブランクのときにはD1に250を返す,のように複数のセルの入力内容によって異なる値を返したいのですが,このようなマクロってどのようにすれば組めますか。 マクロの初心者です。
- ベストアンサー
- オフィス系ソフト
- エクセルのマクロで、セルの値を参照してジャンプ
エクセルのマクロで、セルの値を参照して、 別シートにジャンプして貼り付けたいと思っています。 <Sheet1> | A B C ------------------------------------ 1| A1 あ 100 2| B5 い 50 3| C7 う 80 4| D3 え 20 5| E9 お 40 <Sheet2> | A B C D E ------------------------------------ 1| あ 2| 100 3| え 4| 20 5| い 6| 50 7| う 8| 80 9| お 10| 40 といったイメージです。(お分かり頂けますか?) Sheets1!B1:C1を選択し、A1のセルの値を参照して、Sheets2!A1にジャンプして、 行列入れ替えて貼り付ける、といったマクロを組みたいのですが、 セルの値を参照する部分が分かりません。 実際はSheets2の様なシートは複数あり、1つのリストから複数の形式を変えた表を 作りたいと思っています。 Sheets2以降のシートに見出し行を加え、VLOOK関数を組み込んだ表を作っておき、 結果を貼り付けて見出し行を削除する、といったマクロは組めるのですが、 セルを参照してジャンプして貼り付けてくれると便利だと思い質問させて頂きました。 どなたかお知恵を拝借できましたら嬉しいです。 宜しくお願い致しますm(_ _)m
- ベストアンサー
- オフィス系ソフト
- 【EXCEL】指定したセルの値を他セルに代入する
EXCELにおいて、 あるセルD1で記入したアルファベットX(列指定情報) あるセルE1に記入した数字Y、(行指定情報) において、 あるセルF1=X行Y列のセルの値 というふうにするにはどのようにすればよろしいでしょうか? よろしくお願いいたします。 以下は例です ---------------------------- # A B C D E F 1 12 ## A 3 34 2 23 3 34 4 54 5 89 ----------------------------
- ベストアンサー
- オフィス系ソフト
- エクセルでのセルの連動
エクセルでのセルの連動をさせたいのですが、うまくいきません。 たとえば、A1のセルに値がなにもない場合はB1のセルに5000、A1が50ならばB1は10000などとしたい場合、B1はどのような書式になるのでしょうか?よろしくお願いいたします。
- 締切済み
- オフィス系ソフト
- 2つのセルのどちらかに値が入れば
2つのセルのどちらかに値が入れば いつもお世話になります。 WINDOWS XP EXCELL2003です。 現在はD5に =IF(A5="","",SUM(D4+B5-C5)) の数式が入っています。 ※あたりまえですがA5に入力されたときにD5に値が表示されます。 ご教示いただきたいのは、 B5 若しくは C5 のいずれかに値が入力されたら D5 に値が表示をしたい。 ご指導の程よろしく御願いします。
- ベストアンサー
- その他MS Office製品
- 結合セルに結合していないセルの値を貼り付けたいです。
結合セルに結合していないセルの値を貼り付けたいです。 シート1の1行目の[A1-B1-C1-D1]を結合しています。以下同じように[E1-F1-G1-H1]…のように4つづつ結合しています。 この行に、シート2のA1→B1→C1と続く結合していないセルのデータを貼り付けたいのですが、やりかたがわかりません。色々やってみたのですが、うまくゆきません。ご教授お願いいたします。
- ベストアンサー
- Windows XP
- 【Excel】セルの改行処理について
下記について質問します。 関数、マクロどちらでも結構ですので、どのようにすれば実現できるかご教授ください。 各セルA1~D1にそれぞれA~Dが入っているとします。 → A1=A、B1=B、C1=C、D1=D そして、 E1にはA1~D1を結合させ、改行した状態で表示させます。 表示例: A B C D 本題: E1セルをメモ帳にコピー&ペースしたとき、上記の表示例のように縦にABCDとペーストされるようにするのはどのようにしたらよいでしょうか? ※改行タグも無しで。 よろしくお願い致します。
- ベストアンサー
- オフィス系ソフト
- セルの値に「カンマ \」等をつけたい
セルの値に「カンマ \」等をつけたい いつもおせわになります。 WINDOWS XP EXCELL 2003 E1:H1の結合セルの値に「カンマ 単位の\」をつけたいのですがご教示を御願いできませんか。 「現在の残高は\250,000です。」 にしたいです。 E1:H1 のセルにはユーザー定義は「標準」 =CONCATENATE("現在の残高は",SUM(D:D),"です。") D1 セルには =IF($C2="","",SUMIF($B$2:B2,"売上",C$2:$C2)*2-SUM($C$2:C2))
- ベストアンサー
- その他MS Office製品
- エクセルVBA セルの値を使ってのセル選択
セルに入力した値でセル選択の範囲を指定したいです セルの値がxの時 セルB1~Cx と セルD100~Ex+100 を同時に選択したいのですが どうすれば良いのでしょう? セルA1に50と入力されているとします Range("B1:C50,D100:E150").Select となってほしい訳です Range や Cells とか調べたのですが分かりませんでした
- ベストアンサー
- Excel(エクセル)
お礼
すごいです,見事にできました。 どうもありがとうございました。