Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1740to1744
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
Inhaltsverzeichnis

Wortkombinationen

Wortkombinationen
22.02.2020 15:14:07
El.
Hallo Forum,
gibt es eine Möglichkeit, mit VBA die möglichen verschiedenen Kombinationen (Schreibweisen) eines Wortes mit Sonderzeichen wie ".",":";"-"_" und Ziffern von 0-9 zu erstellen. Das Beispielwort heisst: 01.April.1950

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Wortkombinationen
22.02.2020 15:20:57
Daniel
HI
das kommt darauf an, welches die Regeln sind, nach denen die Kombinationen aus dem jeweiligen Wort erstellt werden sollen.
Es wäre hilfreich, wenn du diese Erstellungsregeln vollständig beschreiben könntest.
Gruß Daniel
AW: Wortkombinationen
22.02.2020 15:42:52
El.
Hallo Daniel,
das Wort "01.April.1950" kann man so schreiben oder z. B. auch so "01-April_1950", oder mit zig verschiedenen anderen Satzzeichen kombiniert (klein und groß). Hauptsächlich geht es hier um die bereits aufgeführten Satzzeichen, die zwischen der 01 und dem Wort "April" und 1950 stehen und da kommen eben nur diese 6 Zeichen in Frage. Die Zahlen wären nicht so wichtig, die könnte ich notfalls auch von Hand ergänzen.
Viele Grüße
Elfriede
Anzeige
AW: Wortkombinationen
22.02.2020 18:58:12
Daniel
Hi
vielleicht so.
du musst die Positionsnummern, an welchen die Einzelnen Satzzeichen stehen, festlegen:
dim SatzZeichen
dim Wort as string
dim z as long
dim SZ1, SZ2
dim Pos1 as long
dim Pos2 as long
SatzZeichen = Array(".", ",", "_", "-", ";")
Wort = "01.April.2015"
Pos1 = 3
Pos2 = 9
for each SZ1 in SatzZeichen
Mid(Wort, Pos1, 1) = SZ1
for each SZ2 in SatzZeichen
Mid(Wort, Pos2, 1) = SZ2
z = z + 1
Cells(z, 1) = wort
Next
next

Gruß Daniel
AW: Wortkombinationen
22.02.2020 22:53:23
El.
Hallo Daniel,
entschuldige bitte, dass ich mich erst jetzt melde, aber es funktioniert.
Dehalb auch vielen Dank dafür. Wünsche noch ein schönes Wochenende und bis irgendwann wieder mal.
Viele Grüße
Elfriede
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige