Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.10.2025 13:18:36
Übersicht von Excel Konstanten
16.10.2025 11:48:44
Makro von Excel in Word aufrufen
16.10.2025 11:16:26
SUMMEWENN erweitern
16.10.2025 09:40:53
Mehrere Konferenzen ohne Personenüberschneidung terminieren
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
272to276
272to276
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Buchstaben zu Zahlen mit Case

Forumthread: Buchstaben zu Zahlen mit Case

Buchstaben zu Zahlen mit Case
24.06.2003 18:14:30
Thomas
Hallo Forum,
ich habe leider gaaanz wenig Ahnung von VB mit Excel und muss nun folgendes lösen: wenn ich in eine Zelle einen Buchstaben gebe, soll nach verlassen der Zelle eine entsprechende Zahl stattdessen angezeigt werden, also wenn da A drin steht, kommt eine 1, wenn B ein 2 etc. Ich weiss, es geht irgendwie mit Case, aber ich weiss nicht wo ich das hinschreiben soll und ich kenne auch die Syntax nicht.
Bitte seid so nett und helft einem Laien. Danke schön!

Gruss, Thomas

Anzeige

9
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Buchstaben zu Zahlen mit Case
24.06.2003 18:31:49
Bernd Held

Hallo Thomas,

gebe folgende Funktion ein und weweitere Sie ein wenig.

Function BuchstZuZahl(r As Range)
Application.Volatile
Select Case r
Case "A"
BuchstZuZahl = 1
Case "B"
BuchstZuZahl = 2
'usw
End Select
End Function


Aufruf in Tabelle:
=BuchStZuZahl(A1)

Viele Grüße
Bernd
MVP für Microsoft Excel
Excel-Tipps, VBA-Bücher mit Leseproben(PDF) und VBA-Schulungen unter: http://held-office.de



Anzeige
Re: Buchstaben zu Zahlen mit Case
24.06.2003 18:34:54
Thomas

Danke schön, ist das "r" richtig am Ende von Case? Und wo schreibe ich die Funktion hin?

Gruss
Thomas

Re: Buchstaben zu Zahlen mit Case
24.06.2003 18:39:44
Bernd Held

Hallo Thomas,
ja das ist richtig. Das R entspricht dabei der Zellenadresse, auf die Du in der Tabelle verweist.
Kopiere den Code in ein neues Modul.

Viele Grüße
Bernd
MVP für Microsoft Excel
Excel-Tipps, VBA-Bücher mit Leseproben(PDF) und VBA-Schulungen unter: http://held-office.de



Anzeige
Re: Buchstaben zu Zahlen mit Case
24.06.2003 18:45:53
PeterW

Hallo Thomas,

der ANsatz von Bernd ist schon richtig, wenn allerdings direkt bei Eingabe in Spalte A der Buchstabe in eine Zahl gewandelt werden soll gehört der Code in das Worksheet_Change-Ereignis. Rechtsklick auf das Tabellenregister Code anzeigen. In das sich öffende Fenster folgenden Code kopieren:

Gruß
Peter

Anzeige
... oder Lösung ohne Case
24.06.2003 18:52:13
Klaus Schubert

Mit Alt+F11 in die VBA-Umgebung wechseln,links oben im Projektfenster das entsprechende Tabellenblatt doppelklicken z.B. Tabelle1 (Tabelle1), und dann im rechten, großen Codefenster folgenden Code kopieren:

VBA verlassen und dann in Tabelle1 in jeder beliebigen Zelle einen Buchstaben eingeben.

Gruß Klaus



Anzeige
Re: ... oder Lösung ohne Case
24.06.2003 18:56:33
Thomas

Auch vielen Dank, das ist für eine ganze Seite sehr gut, aber die Lösung von PeterW ist auf eine Spalte bezogen, das ist auch das, was ich brauche.

Gruss, Thomas

Re: ... oder Lösung ohne Case
24.06.2003 19:01:17
PeterW

Hallo Thomas,

pass den Ansatz doch auf eine Spalte an. Erste Zeile im Code:
If Target.Column>1 then Exit Sub

... es sei denn, du schreibst gernbe viele Codezeilen. :-)

Gruß
Peter

Anzeige
Re: ... oder Lösung ohne Case
24.06.2003 19:05:49
Thomas

Ok, das probier ich nachher mal aus, jetzt bin ich schon echt froh, dass ich Deinen Ansatz easy hinbekommen habe.

Danke nochmal für die super-schnelle Hilfe hier im Forum.
Gruss
Thomas


ach je, war was durcheinander
24.06.2003 19:09:06
Thomas

äh...war was durcheinander jetzt, natürlich hatte ich das script schon angepasst.

Gruss
Thomas

Anzeige
;

Forumthreads zu verwandten Themen

Zahl vorn/hinten vom Text trennen + Komma
StefanK

Hallo Excel-Freunde
ich möchte gern per Formel folgendes lösen:
in zelle a3 steht
1 haley, bill rock around the clock 1956
jetzt soll in b3 die "1" stehen --- löse ich per Formel mit =LINKS(A3;SUCHEN(" ";A3)-1)
in e3 soll "1956" stehen --- löse ich mit Array-Formel {=...
25.09.2008 19:00:21
Thread-ID: 1012407
12 Beiträge
Zellinhalte Zahlen und Text extrahieren
Marky

Hallo Excel Spezialisten !
Ich würde gerne aus zwei nebeneinander stehenden Spalten die Zellinhalte extrahieren.
Die Zellinhalte bestehen aus Zahlen und Text. Die aus den Zellen zu extrahierenden Zahlen und Texte
stehen immer in den Spalten K10 und N10.
Die Zielzellen sind immer...
29.09.2008 12:55:00
Thread-ID: 1013076
6 Beiträge
Text und Ziffern farblich trennen
Joachim

Hi,
kann ich mit einem Makro einen Zellinhalt unterschiedlich färben. Hintergrund ist folgender: ich prüfe einen Range, ob dort Einträge sind, die nicht Nummern sind.
For Each c In .Range("DD2:DD1000")
If Not IsNumeric(c) Then .... wenn nicht
... springe ich in diese Zell...
29.11.2008 13:45:19
Thread-ID: 1028831
15 Beiträge
Text_Zahlenwert suchen und Zahlen "ablegen"
Lemmi

Hallo zusammen,
ich möchte aus einer drei spaltigen Tabelle Zahlen auslesen, die dann Monatsweise abgelegt werden sollen!
Es soll immer nach einem " Schlüsselwort" (...kann auch eine x beliebige Zahlfolge in der Benennungsliste sein) die Auslesung der Zahlenwerte durchgeführt werden.
03.01.2009 22:11:00
Thread-ID: 1036655
4 Beiträge
Buchstaben suchen und trennen
Ralle

Hallo sehr geehrte Forumsmitglieder,
ich benötige Eure Hilfe.
In Zeile A1 steht z.B: AntonBiber.
Nun möchte dieses Wort trennen, jeweils beim Grossbuchstaben.
Wenn möglich auch in VBA. Weils ne größere Datei ist.
Vielen Dank.
mfg Ralle
09.02.2009 16:21:00
Thread-ID: 1048703
5 Beiträge
Anzeige
Text und Zahlen teilen
Bernie

Hallo Leute,
ich suche ganz dringen nach einem Makro, mit dem ich aus einer Tabelle mit Straßennamen - diese sind oft chaotisch geschrieben- z.B. Bahnhofstraße45A
a) die Straße in eine Spalte
b) die Hausnummer (mit A usw.) in eine Spalte
ausgeben kann.
Hat jemand ein zünd...
05.03.2009 14:39:23
Thread-ID: 1056861
7 Beiträge
Text und Zahlen in einer Zelle
Sammy

Hallo liebes Forum
Ich bekomme eine Liste mit ca. 200 Namen mit Personalnummeren.
die Zelle um die es geht sieht so aus.
Zelle A1 143(Gerda Becker)
Ich benötige allerdings die Zahl 143 in einer Zelle und (Gerda Becker) in einer Zelle.
Falls das nicht möglich ist, würde e...
24.05.2009 10:20:18
Thread-ID: 1076915
7 Beiträge
Zahl mit führenden Buchstaben
gerhard

Hallo,
Bitte um VBA Hilfe,
Wie kann ich nach Eingabe einer Nummer in der Spalte ab C6 zwei führende Buchstaben automatisch
anhängen.
z.B.
Eingabe in Zelle C10 die Nummer 4711 dann sollte nach Abschluß der Zelleingabe die
beiden führenden Buchstaben VA automatisch angefüg...
14.07.2009 13:22:48
Thread-ID: 1088460
13 Beiträge
Zahl und Datum als formatierten Text übergeben
k

Hallo,
sicherlich stelle ich mich nur wieder zu blöd an, aber ich komm nicht weiter.
Ich habe in einer Tabelle Werte (Umsatzzahlen) sowie Datums-Werte(Tag der Rechnung) und möchte diese gern aber als "TEXT" an ein Listview-element weiter gegeben.
Dabei soll aber optisch es noch wie...
21.08.2009 10:03:57
Thread-ID: 1097614
7 Beiträge
Zahlenwert von Text trennen
Text

Hallo zusammen,
habe mal wieder ein kleines Problem mit Zahlen und Einheiten!
Ich habe heute eine Zahl mit Einheit (verschiedenen Einheiten) in einer Zelle z. B. in A1 123,03 Nm oder A2 123,123456 kg
Wie kann ich die Einheit von dem Zahlenwert trennen?
Mein ergebnis soll Zelle...
15.09.2009 19:31:11
Thread-ID: 1103044
5 Beiträge
Text und Zahlen trennen
Frank

Hallo Zusammen!!!
Allen einen schönen Abend! Ein für mich schier unlösbares Problem fordert euch Profis!
Ich habe in Spalte A untereinander Namen stehen: z.B. so Max, Mustermann (1), Paul, Fröhlich (33). Nun möchte ich, dass in Spalte G untereinander der Name wieder erscheint, aber ohne...
14.10.2009 19:43:00
Thread-ID: 1109680
4 Beiträge
SVERWEIS 2 Suchkriterien Text und Zahl
Student

HILFE:
14110 BSTD 36
14110 ESTD 36
14110 MSTD 11
14110 WKZA 1
14115 BSTD 36
14115 ESTD 36
14115 MSTD 11
A1 = 14110 B1=BSTD
Ich will zuerst nach der Nummer suchen und dann nach dem Text und der Zahlenwert soll ausgegeben werden.
1 Versuch:
=VERWEIS(2;...
23.10.2009 11:58:21
Thread-ID: 1111616
8 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige