• ベストアンサー

Excelで画像の切り替え

misatoannaの回答

回答No.1

VBA での処理になると思います。 自動記録と寄せ集めですが、こんなのはいかがでしょうか。 Sheet1 の A1、A2 にはご質問の例題のように入力されていて、 Sheet2 の画像それぞれには名前ボックスを使って、Sheet1 の A1、A2 と同じ名前がつけられているとします。 Sheet1 タブの右クリックから「コードの表示」を選択し、表示 される画面に下記モジュールをコピペします。 実行は、シングルクリックではなくダブルクリックです。 Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, _ Cancel As Boolean) Dim DT As Variant, TGT As String Application.ScreenUpdating = False If Target.Row > 2 Or Target.Column > 1 Then Exit Sub Range("A1:A2").Select DT = Selection TGT = Target.Value ActiveSheet.Shapes.SelectAll Selection.Delete Sheets("Sheet2").Select ActiveSheet.Shapes(TGT).Select Selection.Copy Sheets("Sheet1").Select Range("C7").Select ActiveSheet.Paste Range("A1:A2") = DT Application.ScreenUpdating = True End Sub

関連するQ&A

  • Excelで画像の切り替え

    Excelで画像の切り替え お世話になります。 http://okwave.jp/qa/q905412.html ここで出された質問に似た内容なのですが、 画像の呼び出しをクリックではなく、 セルに画像の名称を入力すると出てくるように出来ますか? 宜しくお願い致します。

  • エクセルの質問です

    エクセルの質問です エクセルで、seet1のA1セルをクリックすると、seet2のA1セルに飛ぶようにするにはどうしたらよいのでしょうか? (当方、VBA知識はありません(関数は少々)簡単な方法でお願いします)

  • エクセルのセルの結合でのトラブル

     シート1のA1に山田と入力してシート2のA1とA2(セルの結合)のセルに=seet1!A1と入力してセルの右下の+印を押して下におろしたのですが上手くいきませんでした。 本来なら+印を下におろしたら(セルが結合されていないのであれば)=seet1!A1、A2、A3と順番にいくはずなのですがシート2の方にセルの 結合が使われているため上手くいきません。 どのようにすればいいでしょうか。

  • 画像の切り替えについてです。

    中途半端な知識で対応できず、苦しんでおります。 http://www.kanaya440.com/contents/tips/html/007.html 上のURLのサイト中段あたりにある「グローバルメニューに応用する」方法を参考に 8枚の画像をつなげた1枚の画像を使用でロールオーバーをCSSでやって出来たのですが この方法では、画像にマウスを乗せてたところが、画像からマウスが離れると最初の画像表示に戻ってしまい また、クリックした時の画像切り替え方法が記載されてないので、できれば更に、この方法に付け加える形で… 画像をクリックした時の画像切り替えするには、どうすればよいのでしょうか? イメージとしては、クリックした時も a:hover した時と同じ画像表示のままになるようにしたいのです。 ちなみに、分かりやすく詳しく教えて頂けると非常に助かります。 もし宜しければ何方か教えて下さい。宜しくお願いします。

  • ホームページでの画像切り替えについて

    ホームページ初心者です。 メニューとなる画像を3つ(A~C)と画像Xが表示されている画面を開き、 メニュー画像がクリックされると画像Xが表示されている位置にメニュー画像に紐付いた画像を表示したい(Aがクリックされたら画像A、Bがクリックされたら画像Bといった感じ)です。 画像を切り替えるに瞬時に切り替わるのではなく、画像A・画像Bがゆっくり表示されるようなモノをつくりたいのですが、どのように実装したらいいのかわかりません。 どおなたか、ご教授 お願いいたします。

  • エクセルの計算式で

    エクセルの計算式でこんな計算はできるのでしょうか? どの関数を使えばできのるかわからないのです・・・ ご存知の方教えていただけますか?よろしくお願いします。 SEET1にこのような表があります。    A    B   C 1  3:00   1   20 2  4:00   10  34 3  7:00   8   6 4  8:00   9   7 5  9:00   7   5 6  10:00  6   3  7   ・ 8   ・ これを別の表でSEET2に集計をしたいのです。 SEET2ではこのように集計をしたいのです。    A    B    C 1  7:00   19   60 2  8:00    9   7 3  9:00    7   5  4  10:00   6   3 5    ・ 6    ・ SEET1のA列の時間は3:00の時もあれば2:00の時もあり、時間は固定ではないのです・・・日々変動します。最大で1:00~7:00です。 これをSEET1のA列の時間が1:00~7:00であればのSEET2のB1に8:00であればSEET2のB2のセルへ集計するといった関数はあるのでしょうか? 説明がわかりにくかもしれませんが教えていただけますか?よろしくお願いします。

  • Excelで別シートから自動入力したい。

    「seet1」と名付けたシートがあります。 B-2のセルに品物のIDナンバーを入力する欄があります。 IDナンバーは1~100のどれかです。 またB-4のセルには、品物の発送先を入力する欄があります。 別の、「seet2」と名付けたシートがあります。 Aの列に品物のIDナンバーが上から番号順に入力する欄があります。 Bの列には、品物のIDナンバーに対応して、上から順にその品物の発送先を入力する欄があります。 私がやりたい事は、 (1)発送先が未入力の一番若いIDナンバーを、自動でseet1のB-2のセルに入力する事。 (2)B-4のセルに入力した発送先を、IDナンバーと対応させて、seet2の項目へ自動で入力する事。 (3)seet1は、エクセルのファイルを開くと、毎回何も入力されていない状態で立ち上がる。 (4)seet1が消去されても、seet2はそのまま残る様にする事。 どのようにすれば可能でしょうか。 (1)~(4)のうち、どれか一つだけでも教えて頂けたら幸いです。 よろしくお願いします。

  • エクセル・画像を文字よりも背面に

    エクセル・画像を文字よりも背面に エクセルに挿入した画像をセルに入力した文字よりも背面に移動させることはできますか? 言いかえると、エクセルに挿入した画像よりも全面に文字を入力できますか? ワードアートを使うのはナシでお願いします。 あくまで、セル内の文字を前面にしたいです。 何か方法がありましたらお願いします。

  • エクセル内の表示がじゃまして、入力できません

    エクセルの表のクリップアートを使用しようと思ったら、 クリップアートは、使用できませんがでて、この表示がじゃまして入力できません、どうしたらいいのでしょうか?

  • 《エクセル》クリップアートの画像をセルの中に挿入したい

    クリップアートの「チェックマーク」と呼ばれる種類のものを、“セル内に”挿入させることはできるでしょうか。 印刷用なので、×や○などの他の記号ですと、あまり都合がよくありません。 普通に画像を表示させるだけでもいいのですが、複数の人数で使うファイルでして、しかも使用するエクセルのバージョンや出力するプリンタもまちまちです。 それを考えると、画像を置いただけだと位置ずれをおこしそうで心配なので、“セル内に”という条件をつけさせて頂きました。 なお、私の使っているエクセルのバージョンは2000です。 よろしくお願い致します。