Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 00:20:14
Bestimmte Spalten als xls exportieren per Makro
23.04.2024 22:08:10
Auflisten in Spalte VBA
23.04.2024 21:33:46
Nur farbige/nicht farbige Zellen markieren
23.04.2024 21:29:56
Bestimmte Zellen auf andere Arbeitsblätter kopieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
972to976
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
972to976
972to976
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Ersten Buchstaben per Makro groß machen

Ersten Buchstaben per Makro groß machen
25.04.2008 10:16:00
Thomas
Hallo,
brauche mal wieder eine kleine Hilfe und zwar den Code dafür, wie ich bei einer Variable den ersten Buchstaben in Großbuchstaben umwandle!
Vielen Dank!
Thomas

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Ersten Buchstaben per Makro groß machen
25.04.2008 10:23:00
UweD
Hallo

Sub erstes_Groß()
Dim i
For i = 1 To 100
Cells(i, 1) = WorksheetFunction.Proper(Cells(i, 1))
Next
End Sub


Gruß UD

AW: Ersten Buchstaben per Makro groß machen
25.04.2008 10:31:00
Thomas
Perfekt! Die Proper Sache funktioniert astrein, damit ist auch mein anderes Problem erledigt!!! Danke!

AW: Ersten Buchstaben per Makro groß machen
25.04.2008 10:24:36
Thomas
Obwohl, mir fällt gerade auf, dass der erste Buchstabe nicht reichen würde aber ich auch nicht alle Buchstaben haben möchte.
Ok, folgendes: Ich habe ganz viele Tabellenblätter, die alphabetisch geordnet werden sollen, dazu folgender Code:

Sub TabellenSortieren()
Dim WS As Worksheet
Dim X As Integer
Dim Y As Integer
Set WS = ActiveSheet
For X = 1 To ActiveWorkbook.Worksheets.Count
For Y = X To ActiveWorkbook.Worksheets.Count
If Worksheets(Y).Name


Kann man dort irgendwie einbauen, dass er Groß und Kleinschreibung NICHT beachtet?
Danke!

Anzeige
AW: Ersten Buchstaben per Makro groß machen
25.04.2008 10:47:10
UweD
Hallo
das geht so:
If UCase(Worksheets(Y).Name) &lt UCase(Worksheets(X).Name) Then
Gruß UD

AW: Ersten Buchstaben per Makro groß machen
25.04.2008 10:50:00
Thomas
Noch schöner, Danke dir vielmals!

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige