Live-Forum - Die aktuellen Beiträge
Datum
Titel
20.04.2024 00:49:19
Excel Sheet in einen Excel Kalender einfügen
20.04.2024 00:08:11
In Ordner nur das Speichern von Dateien erlauben
19.04.2024 21:26:15
mehrfache Texte finden
19.04.2024 19:41:34
Bei VBA Ausführung Anzeige einfrieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1564to1568
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1564to1568
1564to1568
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Buchstaben rausfiltern und groß schreiben

Buchstaben rausfiltern und groß schreiben
06.07.2017 16:13:34
jens
Hallo,
gibt es eine Möglichkeit per VBA aus E-Mailadressen die ersten vier buchstaben nach dem @-zeichen in eine Variable schreiben zu lassen.
z.b Variable a ist die E-Adresse
ab@werner.de
Varibale b sind die Buchstaben also
wern
jedoch sollen
die Buchstaben in der Variable b noch Groß geschrieben sein also
WERN
Hat hierzu jemand eine Idee?
Die E-Maildresse kommt dabei aus eine Zelle z.b A1

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

Betreff
Datum
Anwender
Anzeige
AW: warum VBA wäre auch mit ner Formel möglich owT
06.07.2017 16:19:29
...
Gruß Werner
.. , - ...
AW: Buchstaben rausfiltern und groß schreiben
06.07.2017 16:27:34
UweD
Hallo
Per Formel. in B1

Tabelle1
 AB
1ab@werner.deWERN

verwendete Formeln
Zelle Formel Bereich N/A
B1=GROSS(TEIL(A1;SUCHEN("@";A1)+1;4))  
http://excel-inn.de/dateien/vba_beispiele/tabellenanzeige_in_html_addin.zip
http://Hajo-Excel.de/tools.htm
XHTML-Tabelle zur Darstellung in Foren, einschl. der neuen Funktionen ab Version 2007
Add-In-Version 21.10 einschl. 64 Bit


LG UweD
Anzeige
wenn doch VBA ..
06.07.2017 16:39:07
UweD 

Sub ATTT()
Dim strEmail As String, intStelle As Integer, strErg As String
strEmail = Range("A1")
intStelle = InStr(strEmail, "@")
If intStelle > 0 Then
strErg = UCase(Mid(strEmail, intStelle + 1, 4))
MsgBox strErg
Else
MsgBox "Kein @ enthalten"
End If
End Sub

Dann noch die VBA-Variante...
06.07.2017 16:36:29
Michael
Hallo,
...weil angefragt:
Sub a()
Dim a$, b$
a = "ab@werner.de"
b = Mid(a, InStr(1, a, "@") + 1, 4)
Debug.Print b
End Sub
LG
Michael

308 Forumthreads zu ähnlichen Themen

Buchstaben abwechseln groß und klein
Andy

Hallo Leute!
Ich probiere schon ne ganz Weile an folgendem "Problem".
In der Zelle A1 steht ein beliebig langer Text. Ich hätte jetzt gern die Buchstaben abwechselnd groß und dann klein -- 'HaLlO LeUtE, HeUtE iSt mItTwOcH'
mir fällt allerding keine wirkliche Lösung dafür ein, wie ic...
15.10.2008 16:21:29
Thread-ID: 1016608
6 Beiträge
Anzeige
Groß- und Kleinschreibung für Variablen
Jürgen

Hallo Excel Profis.
Für eine Datei werden Rechte in Abhängigkeit des Benutzernamens vergeben.
Den Benutzernamen (Variable "Benutzer") liest daß Programm folgendermaßen:
Benutzer = Environ("Username")
Das funktioniert auch soweit einwandfrei.
Die Rechte werden dann über Selec...
29.07.2009 11:13:22
Thread-ID: 1092183
4 Beiträge
Gros- und Kleinbuchstaben
Erich

Hallo,
vielleicht kann mir jemand helfen. In einer Tabelle gebe ich über ein UF Namen in TextBox1 ein. Die Namen bestehen aus Nach- und Vorname. Alle in einer Zelle.
".Range("A" & lLetzte).Value = UCase(Trim(TextBox1.Value))".
Der Nachname, sowie der erste Buchstabe im Vornamen...
18.12.2009 12:44:13
Thread-ID: 1124874
21 Beiträge
Anzeige
Buchstaben aus der Zelle entfernen/Übertragen?
Djalil

Hallo zusammen,
wie kann man 2 Buchstaben, die in einer Zelle stehen, in eine anderen Zelle übertragen lassen?
Beispiel
In Zelle A1 steht: 06:00 - 08:00 TO. Die 2 Buchstaben (TO) sollen aus der Zelle A1 entfernt und in die Zelle B1 übertragen werden. Welche Uhrzeit in A1 steht, soll...
09.06.2010 16:31:54
Thread-ID: 1161132
7 Beiträge
1. Buchstabe großschreiben
peter

Hallo Freunde
Kann man mittels VBA den 1. Buchstaben eines Wortes in einer Excelzelle großschreiben.
Ich bitte um Hilfe
Gruß Peter
30.06.2010 07:52:46
Thread-ID: 1164632
4 Beiträge
Färben, wenn größer oder kleiner
Jockel

Hallo
ich habe eine Spalte (H) mit Prozentangaben, ich habe sie momentan noch als Zahl formatiert
(zB 0,8 oder 0,33 oder 0,5.....)
Nun möchte ich die Werte färben, wenn sie zwischen bestimmten Angaben liegen:
If Cells(x, 13).Value > "0.01" And Cells(x, 13).Value < "0.20" T...
10.11.2010 14:18:09
Thread-ID: 1186096
3 Beiträge
Nur Erster Buchstabe in Zelle groß
nuernberg@esm-ept.de

Guten Morgen zusammen,
ich bin auf der Suche nach einem Makro mit dem ich den ersten Buchtstaben (nur den ersten) in allen Zellen in einer Tabelle groß machen kann. Ich habe schon im Forum gesucht und habe leider nur Makros gefunden die immer jedes Wort groß anfangen - ich will aber nur da...
25.11.2010 08:14:56
Thread-ID: 1188658
6 Beiträge
Suche nach Text "Klein" oder "GROSS"...
kle

Hallo,
Ich habe aus dem archiv ein Code gefunden, um zellen nach einem String zu durchsuchen. Dabei wird der String aus der Textbox "TBSuche" übergeben.
If InStr(.Cells(lZeile, 3).Value, TBSuche.Text) "größer" 0 Then ' Das Größer-Symbol wurde hier nicht akzeptiert im Forum...
Doc...
08.03.2011 15:28:25
Thread-ID: 1204813
3 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
5
6
3
20
3
6
3
2
5
2
2
4
3
4
16
6
2
2
4
2
8
2
1
8
12