Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

76317 / 76733

←次へ　｜　前へ→


	【4839】Re:初めてのマクロで困ってます。

ポンタ - 03/4/10(木) 9:41 -


	引用なし

	パスワード

> この全ての画像は、ホームページから画像保存しているのですが、
> これを直接ホームページに読みに行く事は出来るのでしょうか？

できるはずですが、私はやったことがないので、分かりません。

【4838】のコードがちゃんと動くのであれば、

Cells(MyRow, 46 - Val(Right(設置場所, 2))).Value = ListBox1.Value
Set MyPicture = ActiveSheet.Pictures.Insert("G:\picture1\" & ListBox1.Value & ".jpg")

上記２行の間に、
「ListBox1.Value & ".jpg"という画像ファイルを
　http://www.detarame.co.jp/ からダウンロードし、
　G:\picture1\ というフォルダに ListBox1.Value & ".jpg"
　という名前で保存する」
というコードを挿入するだけ良いと思います。

今回の質問とは全然別の内容になりますから、
新規に質問し直した方がよいと思います。

それと、回答者はタイトルを見て答えられそうな質問だと判断したときだけ、
内容を読みに行きますから、質問内容が想像しやすいタイトルをつけたほうが
回答をもらいやすいです。

一応、HPから画像をダウンロードする方法を調べて見ますが、
もし、お役に立つことが出来なかったとしても、ご容赦ください。

2 hits

▼

【4787】初めてのマクロで困ってます。 まつじゅん 03/4/7(月) 16:43