Thema Datum  Von Nutzer Rating
Antwort
25.08.2008 12:19:35 Alexander Kalkbrenn
NotSolved
Blau Aw:excel pfad in zelle prüfen
 26.08.2008 10:47:47 Holger
NotSolved
26.08.2008 11:26:14 Alexander Kalkbrenn
NotSolved

Ansicht des Beitrags:
Von:
Holger		 Datum:
26.08.2008 10:47:47		 Views:
1230		 Rating:
     
Antwort:
  Ja
Thema:
Aw:excel pfad in zelle prüfen
Hallo Alexander Kalkbrenner ,
ich gehe davon aus, dass in den Zellen der vollstängige Pfad zu den Bildern steht (z.B.: C:\...\img3333.jpg).
Ansonsten musst du den gemeinsamen Pfadanteil in die Zeile Pfad= als String einfügen.
Dateien, die nicht existieren, werden in meinem Vorschlag gelb unterlegt.
Sub Pfad_prüfen()
r = InputBox("Spalte mit den Bilderpfaden?")
If r = "" Then Exit Sub
c = Columns(r).Column
Pfad = "" 'angeben, falls Pfad in den Zellen nicht vollstandig
lz = Cells(Rows.Count, c).End(xlUp).Row
Set Fso = CreateObject("Scripting.FileSystemObject")
For i = 1 To lz
If Fso.FileExists(Pfad + CStr(Cells(i, c))) = False Then
Cells(i, c).Interior.Color = 65535
End If
Next i
End Sub
Gruß
Holger


Alexander Kalkbrenner schrieb am 25.08.2008 12:19:35:

Hallo,

gibt es eine Möglichkeit mit VBA in Excel einen Pfad, welcher in einer Zelle steht auf Richtigkeit zu überprüfen?

Es ist folgendermaßen: Ich habe in meiner Exceldatein in einer Spalte untereinander lokale Bilderpfade stehen. Nun möchte ich sehen, welche Pfade eventuell nicht funktionieren. (da kein Bild gefunden wurde oder Pfad falsch geschrieben etc)

Vielen Dank für eure Hilfe

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
25.08.2008 12:19:35 Alexander Kalkbrenn
NotSolved
Blau Aw:excel pfad in zelle prüfen
 26.08.2008 10:47:47 Holger
NotSolved
26.08.2008 11:26:14 Alexander Kalkbrenn
NotSolved