• 締切済み

ExcelでWEB上のJPGを読み込ませる方法

いろいろとためしてみたのですが、うまくいかなかったので教えてほしいです。  |A  |B| 1|URL|画像 2|URL|画像 3|URL|画像 4|URL|画像 こんな形のものを考えているのですが、どうやればいいのでしょうか? A1の値はhttp://www.image.image01.jpg B1にその画像を表示させたいです。 一番いいのは、 B1に「=ImgYomikomi(A1)」 と、関数でA1セルを参照させて表示させることができればいいのですが・・・ ほとんど画像は変わらないので、読み込みのタイミングはファイルを開いたときとかで大丈夫です。 VBAを使って実現するのでしょうか? どうぞ宜しくお願いします。 使っているExcelは、2003です。

みんなの回答

  • toshi_2000
  • ベストアンサー率30% (306/1002)
回答No.2

No.1です。 B1に「=Macro1(A1)」という方法は、できません。 A1~A4にURLを入力して、マクロを実行してください。 画像を表示することしかマクロに記述していないので、ほかにも実現したいことがあれば、お尋ねください。

  • toshi_2000
  • ベストアンサー率30% (306/1002)
回答No.1

以下の通りでどうでしょう。 Sub Macro1() For i = 1 To 4 Cells(i, 2).Select ActiveSheet.Pictures.Insert Cells(i, 1) Next End Sub

misaki1348
質問者

補足

ご回答ありがとうございます。 B1に「=Macro1(A1)」と参照してみたのですが、#Nameと出てしまいました・・・

関連するQ&A

  • 複数の画像をVBAでエクセルに貼り付ける方法

    VBA初心者です。 多数のJPG画像が指定のフォルダ内に保存してあります。 JPG画像には、img_001.jpg、img_002.jpg・・・というように連番の名前が記載されています。 EXCELファイルのA列のセルに入力されているランダムな数値に対応した画像が 同じ行のB列に表示するようにしたいと考えています。 (たとえば、A1のセルに1を入力したら、B1のセルにimg_001.jpgが表示される) このような操作を、VBAを使用して作成することはできるのでしょうか。

  • エクセルでの抽出と円記号サブレス方法について

    セルA1に最大6桁の数値があり、これをセルB1~H1に円記号サプレス したかたちで桁の抽出をしたいのですが、関数(組み合わせ)だけで可 能でしょうか? 例1) セルA1→120897 BCDEFGH \120897 例2) セルA1→120 BCDEFGH _______\120 (__はスペースです) ※HTMLになるとうまく表示されないので画像を参照してください。 B1からH1に入れる関数を教えてください。 直接B1からH1に入れる関数で不可能であれば間接的な方法、VBAマクロ での方法でもありがたいです。教えてください。 よろしくお願いします。--以上

  • エクセル2003でハイパーリンクのセルからURLアドレスを取得する関数はありますか?

    エクセル2003でハイパーリンクのセルからURLアドレスを取得する関数はありますか? ハイパーリンクを作成する関数は、=HYPERLINK("URLアドレス", "表示名称")で可能ですが、この逆で、"URLアドレス"を取得する関数を探しています。 例えばこのセルが、A1にあったとして、B1に =A1とすると、B1には「表示名名称」が表示されます。 C1に「URLアドレス」を表示させるVBAでなく関数が知りたいです。 無ければ、VBAでも構いません。 よろしくお願いいたします。

  • Excelを2つ起動してセルを参照する方法

    ご質問させていただきます。 Excel2007を2つ起動して、他方のシートのセルを参照したいのです。 具体的に説明いたしますと、1つ目のExcel2007をExcel(1)と呼び、2つ目のExcel2007をExcel(2)と呼ぶことにします。Excel(2)のsheet1のA1セル~A48セルまでcalculateイベントでリアルタイムに変化する値が入っています。それらの値をExcel(1)のsheet2のB1セル~B48セルで参照したいのです。 できるのでしょうか? どなたか教えていただけないでしょうか? よろしくお願いいたします。 もしVBAを使わなくてもできるようでしたら、そちらの方法も教えてください。 よろしくお願いいたします。

  • エクセルの関数について

    エクセルの関数について いつもご回答者の皆様方にはお世話になっております。 また一つ関数で実現したいことができたのですが、 添付画像のように同一シート内に形式が同じデータベースが複数あった場合に、 指定した条件のデータベースを参照し、値を返すような関数は可能でしょうか? B22セルで2010/1/1と指定した場合に、A2-B5のデータベースを参照し、さらにC22セルで指定してある「りんご」の個数を表示させるといった内容になります。 B22とC22の値を変えるだけで、それぞれのデータベースの指定した項目の個数を割り出したいのです。 識者の方々よろしくお願いいたします。m(_ _)m

  • Excelで関数の参照先をセルの値で指定するには?

    Excel2000を使用しています。 関数が参照するセルを指定する場合、例えばSUM、のとき。 セルA1には"B1"と入力されており、 同様にセルA2には"B5"が入力されていたとして(もちろん " は実際には入力されてません)、 この セルA1 と A2 のテキストデータを参照して、SUM(B1:B5) を得るにはどのように範囲を指定したらよいのでしょうか? 別にセルA1 と A2 が "B1" 及び "B5" でなくてそれに代わるものでも構いません。 要は関数が参照するセルをほかのセルの値で指定したいのですが。

  • エクセル関数について

    エクセルの関数についてなのですが、例えば「セルA3」に「セルB2」の値を表示させるには「=(B2)」と「セルA3」に表示させてます。別のSheetの値も表示できるのでしょうか?例えば「Sheet1.Range("A3")」の値をSheet2のA1に表示させたい場合Sheet2のA1にはどのような関数を入力していけばよいのでしょうか?VBAは使わずに表示したいのですが。関数はまだほとんど使ったことがないので分かる人いたら教えてください。よろしくお願いします。

  • Excelでこんな事。。。

    皆さんこんにちは、宜しくお願いしますm(_ _)m。  現在Excelで作り物している最中で、以下のような事が実現できないかと悩んでいます。 【シートの状況】  ・A1からA10セルまでに1~10の数字を記入  ・B1セルをデータ入力セルとする  ・B2セルに関数を入れて、機能を実現したい  ・・・つまり質問したいのはB2セルに入れる関数部分です(^^)。 【実現したい機能】  B1に数字を入力します。B1の数字がA1~A10セルの中に  あれば、B2セルに○を、無ければ×を表示。  ・・・つまり、検索をして○×判定したいんです。シンプルな関数で実現出来るだろうとタカをくくって取りかかったのですが。。。出来ない(^^;)。  この機能を基礎に、少し機能を膨らませる予定ですのでこの機能自体は極力シンプルな方法で実現させたいと思っています。  Excelが得意な皆さん、是非教えてくださいm(_ _)m。

  • 表示されている文字列を取得するエクセル関数

    例えば、 A1セル「平成28年1月5日」(シリアル値で入力) A2セル「H28.1.5」(シリアル値で入力) A3セル「12345」(数値) と入っている場合に、 関数を使って、 B1セル「平成28年1月5日」(文字列) B2セル「H28.1.5」(文字列) B3セル「12345」(文字列) と表示させることはできるでしょうか? 形式を選択して貼り付け、とか、VBAでできるのはわかるのですが、 関数だけで(しかも、できれば汎用的な形の関数で) 実現できるのかが知りたいです。

  • EXCEL 1分ごとに決まった値を足し続ける方法

    EXCEL2007を使用しています。 1分ごとに事前に決まっている値を足し続ける方法を教えてください。 例えば、A2セルに「3」が入力されているとします。 9時から11時までの間、1分ごとに3を足し続けて計算結果をB2に表示したいのです。 つまり、9時にはB2セルはゼロで、9時1分にはB2セルは3、9時2分にはB2セルは6、9時3分にはB2セルは9,・・・というふうにしたいのです。 そして、11時まで計算したら、今度は、12時半から15時までB2セルの値に3を足し続けたいのです。 どなたか教えていただけないでしょうか? なお、上記の例では3を足し続けることになっていますが、何を足すかはその日によって変わります。 従いまして、A2セルの値を足し続けるようにしたいのです。 よろしくお願いいたします。 なお、私はVBAは初心者レベルです。 もし比較的簡単にワークシート関数だけでできるようでしたら、そちらも教えてください。 よろしくお願いいたします。

専門家に質問してみよう