Power Query Challenge 3

[shift-del]

Hallo PQ-Interessierte

Ken Puls hat mal wieder eine Herausforderung gestellt:
https://www.excelguru.ca/blog/2018/09/11...allenge-3/

Nachdem ich eine Lösung hatte viel mir noch ein etwas kürzerer Weg ein.

[Matthias84]

Hallo Shfit-del,

es geht sogar mit noch einem Schritt weniger. Die Subtraktion von 64 kannst du direkt auch in dem Schritt vorher (Umwandlung Buchstabe in Zahl) berechnen.

[shift-del]

Hallo Matthias

Ich bin sicher dass die Profi-Experten-Gurus und Guru-Profi-Experten es schaffen den Code in noch weniger Zeilen zu quetschen.

[snb]

I used power-VBA:

UDF:

Code:

Function F_snb(c00)
    F_snb = Evaluate("sum(code(mid(""" & UCase(c00) & """,row(1:" & Len(c00) & "),1))-64)")
End Function

und Power Excel: (matrix Formel)

PHP-Code:

=SUM(CODE(MID(UPPER(A2);ROW(OFFSET(A$1;;;LEN(A2)));1))-64) 


[shift-del]

Hallo snb

Thema verfehlt. Punktabzug.

[snb]

Ola :19: ,

Dann richtiges VBA:

Code:

Function F_snb_vba(c00)
    Dim sn() As Byte
    sn = UCase(c00)

    F_snb_vba = Application.Sum(sn) - 64 * (UBound(sn) \ 2 + 1)
End Function

[Jockel]

Ola :19: ,

Dann richtiges VBA

Ja, nee is klar eine (richtiges VBA) bei einer Power Query Challenge, bei der es um was geht? Um VBA? Hieße das dann nicht VBA Challenge..?

[snb]

Könnte VBA-Excel-PowerQuery challenge heissen.

[Jockel]

Könnte VBA-Excel-PowerQuery challenge heissen.

Könnte, heißt es aber nicht. Es geht um? Richtig: Um Power Query. Es geht nicht? Richtig: Um VBA... Schade, aber es gibt eine Aufgabenstellung für Power Query nicht für VBA und nicht für VBA-Excel-PowerQuery. 

Obwohl ein Zusammenspiel (nicht für diese Aufgabe relevant) durchaus Sinn macht. ABER NICHT HIER!!! :20:

[snb]

Schöne Großbuchstaben.