Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
808to812
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
808to812
808to812
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

groß- bzw. kleinbuchstaben durch vba

groß- bzw. kleinbuchstaben durch vba
11.10.2006 12:28:14
Hans
Mahlzeit,
ich habe mir mit VBA einen kleinen Datei-Manager gebastelt, der auch sehr gut funktioniert. Allerdings gibt mir der Code im Tabellenblatt exakt die Schreibweise wieder, wie die Dateien und Ordner im Dateisystem geschrieben sind. Ich möchte nun aber, dass die Ordner in Großbuchstaben und die Dateien in Kleinbuchstaben dargestellt werden. Wie müsste ich also die Befehlszeile
Cells(k, i) = f1.Name
ändern, damit f1.name zu groß- bzw. kleinbuchstaben formatiert wird?
Ich bitte um Hilfe.
Grüße
Hans

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: groß- bzw. kleinbuchstaben durch vba
11.10.2006 12:32:33
Reinhard
Hi Hans,
If Right(f1.Name, 4) = ".xls" Then
Cells(k, i) = UCase(f1.Name)
Else
Cells(k, i) = LCase(f1.Name)
End If

Gruß
Reinhard
ps: Ich freue mich über eine Rückmeldung ob diese Antwort hilfreich war oder nicht..
Danke
11.10.2006 13:09:05
Hans
Danke schön, funktioniert prima.
Grüße Hans
AW: groß- bzw. kleinbuchstaben durch vba
11.10.2006 12:33:35
Uduuh
Hallo,
ucase(f1.name) bzw lcase(f1.name)
Gruß aus’m Pott
Udo

AW: groß- bzw. kleinbuchstaben durch vba
11.10.2006 12:37:55
EtoPHG
Hallo Hans,
Cells(k, i) = UCase(Left(Cells(1, 1), InStrRev(Cells(1, 1), "\"))) & LCase(Right(Cells(1, 1), Len(Cells(1, 1)) - InStrRev(Cells(1, 1), "\")))
Gruss Hansueli
Anzeige
Korrektur
11.10.2006 12:39:30
EtoPHG
Hallo Hans,
Cells(k, i) = UCase(Left(f1.name, InStrRev(f1.name, "\"))) & LCase(Right(f1.name, Len(f1.name) - InStrRev(f1.name, "\")))
Gruss Hansueli
nochmals Danke an Alle
11.10.2006 13:13:06
Hans
Dank von Hans

302 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige