Supportnet / Forum / Tabellenkalkulation
Excel-Help!
Frage
Hallo !
Kannst mir jemand sagen, wie ich in einer Tabelle hinter Textwerten Zahlen hinterlegen kann, damit ich beim summieren der Textfelder, die Zahlen summiere?
Beispiel: hinter F steht der Wert 6. F F F summiert gleich 18.
Antwort 1 von Electronic
Diese Funktion als Modul in deine Arbeitsmappe im Visual-Basic-Editor einfügen (-> Extras/Makro/Visual-Basic-Editor, dort die aktuelle Arbeitsmappe auf der linken Fensterseite markieren und aus dem Menü Einfügen/Modul wählen):
Function TEXTWERT(Zeichenkette As String) As Integer
z$ = UCase$(Zeichenkette)
l = Len(z$)
For x = 1 To l
t = t + (Asc(Mid$(z$, x, 1)) - 64)
Next
TEXTWERT = t
End Function
Alles speichern und in der Excel-Tabelle aus den Benutzerdefinierten Funktionen die Funktion TEXTWERT auswählen. Wenn deine "Zahl" in Zelle A1 steht, bekommst du sie mit =TEXTWERT(A1) berechnet.
Gruß
Armin
Function TEXTWERT(Zeichenkette As String) As Integer
z$ = UCase$(Zeichenkette)
l = Len(z$)
For x = 1 To l
t = t + (Asc(Mid$(z$, x, 1)) - 64)
Next
TEXTWERT = t
End Function
Alles speichern und in der Excel-Tabelle aus den Benutzerdefinierten Funktionen die Funktion TEXTWERT auswählen. Wenn deine "Zahl" in Zelle A1 steht, bekommst du sie mit =TEXTWERT(A1) berechnet.
Gruß
Armin
Antwort 2 von want2cu
hallo maik,
schön, dass du im SN postest ;-)
Armin hat schon eine tolle Lösung vorgeschlagen. Ich könnte mir auch eine Praktikerlösung über eine Hilfsspalte vorstellen. Ín dieser Hilfsspalte steht dann z.b. die Funktion SVERWEIS, wobei dann die Vergleichsmatrix in einer separaten Tabelle steht. In dieser Vergleichsmatirx steht dann in Spalte A der Buchstabe und in Spalte B die Zahl.
Dann müßtest du die Additon in der Hilfsspalte mit der Funktion SVERWEIS vornemhmen.
Beschreib dich mal genauer, was du berechnen möchtest. Vielleicht gibt es ja noch besser Lösungen für dein Problem.
HTH+CU
Klaus
schön, dass du im SN postest ;-)
Armin hat schon eine tolle Lösung vorgeschlagen. Ich könnte mir auch eine Praktikerlösung über eine Hilfsspalte vorstellen. Ín dieser Hilfsspalte steht dann z.b. die Funktion SVERWEIS, wobei dann die Vergleichsmatrix in einer separaten Tabelle steht. In dieser Vergleichsmatirx steht dann in Spalte A der Buchstabe und in Spalte B die Zahl.
Dann müßtest du die Additon in der Hilfsspalte mit der Funktion SVERWEIS vornemhmen.
Beschreib dich mal genauer, was du berechnen möchtest. Vielleicht gibt es ja noch besser Lösungen für dein Problem.
HTH+CU
Klaus
Antwort 3 von pelle
@maik
so ganz verstehe ich noch nicht Dein Problem bzw. Deinen Tabellenaufbau!
Ein paar Infos mehr wären nützlich.
Hat Dir die Lösung von Armin weitergeholfen??
@Klaus,
liegt vielleicht an der Problembeschreibung,
sehe aber für SVERWEIS keine Lösung!
Irrtum nicht ausgschlossen!
gruss
pelle
so ganz verstehe ich noch nicht Dein Problem bzw. Deinen Tabellenaufbau!
Ein paar Infos mehr wären nützlich.
Hat Dir die Lösung von Armin weitergeholfen??
@Klaus,
liegt vielleicht an der Problembeschreibung,
sehe aber für SVERWEIS keine Lösung!
Irrtum nicht ausgschlossen!
gruss
pelle
Antwort 4 von want2cu
@Pelle:
In der Basistabelle stehen in Spalte A die entsprechenden Buchstaben. In der Spalte B steht die Funktion SVERWEIS.
In einer separaten Matrix stehen in der linken Spalte die Buchstaben und rechts daneben die Zahlenwerte.
Die Funktion müßte dann in B1 so lauten:
=sverweis(A1;Matrix;2)
Der name Matrix steht für den Tabellenbereich, in dem gesucht wird.
Die Funktion gibt dann als Ergebnis den dem jeweiligen Buchstaben zugeordneten Zahlenwert zurück.
CU
Klaus
In der Basistabelle stehen in Spalte A die entsprechenden Buchstaben. In der Spalte B steht die Funktion SVERWEIS.
In einer separaten Matrix stehen in der linken Spalte die Buchstaben und rechts daneben die Zahlenwerte.
Die Funktion müßte dann in B1 so lauten:
=sverweis(A1;Matrix;2)
Der name Matrix steht für den Tabellenbereich, in dem gesucht wird.
Die Funktion gibt dann als Ergebnis den dem jeweiligen Buchstaben zugeordneten Zahlenwert zurück.
CU
Klaus
Antwort 5 von Electronic
Hallo,
SVERWEIS löst aus meiner Sicht nur den Fall, dass EIN Buchstabe in dem Feld steht. Das war auch der Grund, weshalb ich die Formel geschrieben habe. Aber vielleicht gibt's ja wirklich noch eine Möglichkeit, alles zu addieren.
Ich habe meine Funktion nochmal überarbeitet, weil ich gesehen habe, dass wohl Leerzeichen zwischen den Buchstaben vorkommen. Dann müsste die Funktion folgendermaßen lauten:
SVERWEIS löst aus meiner Sicht nur den Fall, dass EIN Buchstabe in dem Feld steht. Das war auch der Grund, weshalb ich die Formel geschrieben habe. Aber vielleicht gibt's ja wirklich noch eine Möglichkeit, alles zu addieren.
Ich habe meine Funktion nochmal überarbeitet, weil ich gesehen habe, dass wohl Leerzeichen zwischen den Buchstaben vorkommen. Dann müsste die Funktion folgendermaßen lauten:
Function TEXTWERT(Zeichenkette As String) As Integer
z$ = UCase$(Zeichenkette)
l = Len(z$)
For x = 1 To l
a = Asc(Mid$(z$, x, 1))
If a > 64 And a < 91 Then t = t + (a - 64)
Next
TEXTWERT = t
End Function
Antwort 6 von Electronic
Ooops, das kleine "L" sieht oben genauso aus wie die 1, also zur besseren Kenntlichmachung:
Function TEXTWERT(Zeichenkette As String) As Integer
z$ = UCase$(Zeichenkette)
L = Len(z$)
For x = 1 To L
a = Asc(Mid$(z$, x, 1))
If a > 64 And a < 91 Then t = t + (a - 64)
Next
TEXTWERT = t
End Function
Antwort 7 von want2cu
@maik,
wir würden uns sehr freuen, wenn du mal einen dezeneten Hinweis geben könntest, ob und wie dein Problem gelöst wurde.
<neugierigbin....>
CU
Klaus
wir würden uns sehr freuen, wenn du mal einen dezeneten Hinweis geben könntest, ob und wie dein Problem gelöst wurde.
<neugierigbin....>
CU
Klaus