String bearbeiten

Forumthread: String bearbeiten
6 Beiträge zu diesem Forumthread
Anzeige

Forumthread: String bearbeiten

String bearbeiten

16.07.2002 11:34:03

Ralf Sögel

Hallo Leute,
ich habe Dateinamen: Grafik1.jpg, Grafik2.jpeg, Datei1.hta
Datei2.html usw. Nun muss ich die Dateinamen ohne Extension in einem VBA-Code weiterverarbeiten. Wie kann ich die Extension
aus dem Dateinamen wegkriegen(left,mid???) kriegs irgenswie nicht gebacken.
Danke für eure Hilfe

6
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Re: String bearbeiten

16.07.2002 11:39:52

sam
danke, aber nicht ganz...

16.07.2002 11:44:52

Ralf Sögel
Re: danke, aber nicht ganz...

16.07.2002 11:55:48

sam
danke, aber noch nicht ganz...

16.07.2002 12:06:59

Ralf Sögel
Gut Ding braucht Weile ;-)

16.07.2002 12:12:08

sam
Wow, thats a lot, 1000 Dank!

16.07.2002 12:20:45

Ralf Sögel

Re: String bearbeiten

16.07.2002 11:39:52

sam

hi,

ganz einfach:

datei = Left(datei, Len(datei)-4)

Viel Spaß,
Sam

danke, aber nicht ganz...

16.07.2002 11:44:52

Ralf Sögel

das trifft aber nur für eine Extension mit 3 zeichen zu, oder?
Wie muss ich das machen, um beide Fälle zu berücksichtigen
extension mit 3 und 4 Zeichen?

Re: danke, aber nicht ganz...

16.07.2002 11:55:48

sam

Hallo,

hast recht, dann nehmen wir einfach die ersten linken Zeichen bis zum auftreten des Punktes. Damit sollte es passen :-)

Datei = Left(Datei, InStr(Datei, ".")-1)

Gruß
Sam