0

私は VBA を初めて使用するので (つまり、本当に初めてです)、いくつかのヒントを教えてください。

SKU と media_gallery の 2 つの列を含む Excel ファイルがあります。また、フォルダーにストックされた画像もあります (/imageFolder という名前にしましょう)。

imageFolder を解析し、S​​KU.jpg でソートされたすべての画像を探し、それらをセミコロン (;) で区切られた media_gallery 列に入れる必要があります。

例: 私の SKU は「1001」です。1001 で始まるすべての画像の画像フォルダーを解析する必要があります (すべての画像には次のパターンがあります: 1001-2.jpg 、1001-3.jpg など...)

私は Java または C# でそれを行うことができますが、VBA にチャンスを与えたいと考えています。:)

どうやってやるの？

編集：はい、ファイル名だけが必要です！そして、私のフォルダーには 20,000 個の画像があり、8000 個の SKU があるので、20,000 個の画像名のループをどのように処理できるかわかりません。

EDIT2: SKU にダッシュ ( - ) が含まれている場合は、処理する必要がないため、次の SKU に渡すことができます。各 SKU には最大 5 つの画像があります (....;SKU-5.jpg)

皆さんありがとう。

4

1 に答える 1

0

列のセルごとに 1 つの画像名がある場合に画像を挿入する方法: 画像の URL を指定して Excel に画像を表示する方法

上記を使用して、ファイル名の内部ループを導入します。

if instr(url_column.Cells(i).Value, "-") = 0 then

  dim cur_file_name as string
  cur_file_name = dir("imageFolder\" & url_column.Cells(i).Value & "*.jpg")

  do until len(cur_file_name) = 0
    image_column.Cells(i).Value = image_column.Cells(i).Value & cur_file_name & ";"      
    cur_file_name = Dir
  loop
end if
于 2012-06-12T20:56:49.303 に答える