Excel/VBA のトリックを行ってからしばらく経ちました。私は 1500 を超える画像ファイルのディレクトリと約 900 のファイル名のスプレッドシート リストを持っています (基本的に、これは Web サイトでこれまでに使用されたすべての画像のディレクトリと、現在使用されているファイル名のスプレッドシートです)。そのため、スプレッドシートにないディレクトリ内のファイルを削除したいと思います。さまざまなファイル名変更マクロのツールキットを持っていますが、このシナリオで機能するものを思いつくことができません。前もって感謝します...
更新: OK、ファイル名変更マクロを使用した解決策を見つけました。
Sub Test()
For N = 2 To Cells(Rows.Count, 1).End(xlUp).Row
If Dir(Cells(N, 1)) <> "" Then
Name Cells(N, 1) As Cells(N, 2)
End If
Next N
End Sub
Excel で追加の列を作成し、数値シリーズを入力してから、マクロを実行しました。次に、ディレクトリに移動し、番号に名前が変更されていないすべてのファイル名を削除しました。次に、スプレッドシートの列 1 と列 2 を交換し、再度マクロを実行して名前を元のファイル名に戻しました。誰かがいつかこのマクロが役に立つと思った場合に備えて、これを投稿しました。しかし、誰かが私の問題に対するより直接的な解決策を持っているなら、私はそれを感謝します!