Thema Datum  Von Nutzer Rating
Antwort
06.08.2019 21:51:42 Kati
NotSolved
07.08.2019 08:22:48 Gast64631
NotSolved
07.08.2019 09:46:29 Kati
NotSolved
Blau Zelleninhalte mit Dateinamen vergleichen Dateien verschieben
07.08.2019 11:11:14 Gast65885
NotSolved
07.08.2019 23:56:04 Kati
NotSolved
08.08.2019 09:39:07 frau
NotSolved
10.08.2019 18:29:11 Kati
NotSolved
11.08.2019 18:12:58 frau
NotSolved
13.08.2019 22:37:38 Kati
Solved

Ansicht des Beitrags:
Von:
Gast65885
Datum:
07.08.2019 11:11:14
Views:
25
Rating: Antwort:
  Ja
Thema:
Zelleninhalte mit Dateinamen vergleichen Dateien verschieben
ungeprüft:

sub Kati()
for i = i to cells(rows.count, 1).end(xlup).row
	if cells(i, 2) = "Gekauft" then
		f = dir("c:\Warenkorb\" & cells(i,1) & "*.*)
		NAME "c:\Warenkorb\" & f AS "c:\Warenkorb\Verkauft\"
	end if
next i
end sub

 


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst genau und ausführlich
  • 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
  • Bitte markieren Sie Ihre Anfrage als erledigt wenn Ihnen geholfen wurde
Thema: Name: Email:

 
 

Thema Datum  Von Nutzer Rating
Antwort
06.08.2019 21:51:42 Kati
NotSolved
07.08.2019 08:22:48 Gast64631
NotSolved
07.08.2019 09:46:29 Kati
NotSolved
Blau Zelleninhalte mit Dateinamen vergleichen Dateien verschieben
07.08.2019 11:11:14 Gast65885
NotSolved
07.08.2019 23:56:04 Kati
NotSolved
08.08.2019 09:39:07 frau
NotSolved
10.08.2019 18:29:11 Kati
NotSolved
11.08.2019 18:12:58 frau
NotSolved
13.08.2019 22:37:38 Kati
Solved