Guten Tag,
ich habe folgendes Problem, ich habe eine Spalte in der in jeder Zelle nur ein Buchstabe steht. Entweder a, b, c oder d, die Buchstaben sind durcheinander gewürfelt. Insgesamt sind es 500 Zeilen.
Ich möchte jetzt herausfinden wie oft eine bestimmte Buchstabenfolge untereinander steht wie z.B. abc. Da ich schon etwas länger am rumprobieren bin möchte ich euch um hilfe bitten
LG
Hallo,
nach welchen Kombinationen soll gesucht werden?
- gleiche
- Sequenz
- etc
Erkläre bitte noch den Hintergrund.
mfg
Ich habe ein paar Excel-Einführungsaufgaben, in denen man mit verschiedenen Formeln arbeiten soll, um sich mit dem Programm vertraut zu machen..
Gefiltert werden soll in dieser abfolge nur wie oft z.B. die Kombination abc untereinander steht.
Hallo,
solche Übungen möchte ich etwas erweitern:
Für das beigefügte Workbook geht der Code:
Code:
option vbasupport 1
Sub Main
Ar = join(application.transpose(activesheet.usedrange.columns(1)), vbnullstring)
TT = split(Ar,"abc") ' cells(1,4).value)
cells(1, 5) = ubound(TT)
End Sub
Aufgabe: den Code zu verallgemeinern, sodass in Spalte D beliebig viele Varianten geprüft werden können. UND: Was ist der Unterschied zwischen Excel und LO.
Viel Spaß
mfg
(aus Sicherheitsgründen ist die Trennung von Workbook und VBA-Code nötig)
Danke für deine Hilfe.
jetzt bekomme ich aber deinen code da nicht eingefügt.
Hallo,
ich will dich nicht ärgern, aber ich kann die Frage nicht mit Formeln lösen (andere vermutlich). Hier der Code, der in ein allgemeines Modul gehört. (alt-F11, im Menü "Einfügen": Modul)
Code:
Sub Main
Ar = join(application.transpose(activesheet.usedrange.columns(1)), vbnullstring)
for i = 1 to cells(rows.count, 4).end(xlup).row
TT = split(Ar, cstr(cells(i,4).value))
cells(i, 5) = ubound(TT)
next i
End Sub
Der Versuch die Datei mit dem Code zu speichern ging schief, LO speichert keine VBA-Codes.
mfg
Hallo,
probier mal
=(LÄNGE(TEXTKETTE(A1:A500))-LÄNGE(WECHSELN(TEXTKETTE(A1:A500);"abc";)))/3
Bereich ggf. anpassen.