Excel VBA質問箱 IV

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

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


38206 / 76732 ←次へ | 前へ→

【43667】画像のパスをエクセルA列に表示させる方法
質問  PiPo  - 06/10/22(日) 17:12 -

引用なし
パスワード
   同じフォルダーの中に、
「画像のファイル」と
「エクセルのファイル」とを入れています。
エクセル上のA列に画像のファイルを表示しようとしました。
下のコードで実行すると、画像の有無にかかわらず、
0001〜0060の画像のパスが表示されてしまいます。
画像のあるパスのみを明示したいのですが、下の
コードのどの部分を修正すると良いのでしょうか。

Sub PhotoCall()
Dim i As Integer
For i = 1 To 60
If ThisWorkbook.Path & "IMG_" & Format(i, "0000") & ".jpg" <> "" Then
  Range("A" & i).End(xlUp).Offset(1) = ThisWorkbook.Path & "IMG_" & Format(i, "0000") & ".jpg"
End If
Next
End Sub

1 hits

【43667】画像のパスをエクセルA列に表示させる方法 PiPo 06/10/22(日) 17:12 質問
【43668】Re:画像のパスをエクセルA列に表示させる方... かみちゃん 06/10/22(日) 17:25 発言
【43669】Re:画像のパスをエクセルA列に表示させる方... PiPo 06/10/22(日) 17:43 質問
【43670】Re:画像のパスをエクセルA列に表示させる方... かみちゃん 06/10/22(日) 17:51 発言
【43671】Re:画像のパスをエクセルA列に表示させる方... Kein 06/10/22(日) 17:53 回答
【43724】Re:画像のパスをエクセルA列に表示させる方... PiPo 06/10/23(月) 21:36 質問
【43725】Re:画像のパスをエクセルA列に表示させる方... ぱっせんじゃー 06/10/23(月) 21:50 発言
【43726】Re:画像のパスをエクセルA列に表示させる方... かみちゃん 06/10/23(月) 21:51 発言
【43727】Re:画像のパスをエクセルA列に表示させる方... PiPo 06/10/23(月) 22:40 お礼

38206 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free