Gruppen
- Top Gruppen
- Betriebsysteme
- Windows classik
- Linux
- BS-Sonstige
- Software
- Datenbanken
- Bildbearbeitung
- Audio/mp3/Video
- Security/Viren
- SW-Sonstige
- Hardware
- Mainboard/CPU
- Grafikkarten
- Peripherie
- Laptop/Notebook
- HW-Sonstiges
- Netzwerk
- Telefon,ISDN,Modem
- W-Lan
- NW-Sonstiges
- Programmierung
- PHP,ASP,Perl...
- Java,C++...
- Webseiten/HTML
- Sonstiges
- PC-Sonstiges
- Plauderecke
- SN Intern
- Test
/ Forum / Tabellenkalkulation
Tabellenkalkulation
Fragevon Rastermen vom 06.04.2021, 23:17 Options
Formatierung v. Text und Zahlen Excel 2000
Hallo ,
ich habe mich jetzt schon stundenlang durch die Foren gelesen und komme nicht auf meine Lösung.
( Ich stehe auch auf Kriegsfuß mit den benutzerdef. Formatierungen )
Frage: ich möchte -- nur aus optischen Gründen -- nicht zum Berechnen --
in der Zelle A1 z.B.: "CH4056" oder "FR68300" eingeben (das sind Postleitzahlen)
und ich möchte das sie dann so aussehen : CH - 4056 oder FR - 68300
Kann man dies mit einer benutzerdefinierten Formel bewerkstelligen ???
Ganz herzlichen Dank - ich würde mich auf eine Lösung freuen.
Rudolfo
ich habe mich jetzt schon stundenlang durch die Foren gelesen und komme nicht auf meine Lösung.
( Ich stehe auch auf Kriegsfuß mit den benutzerdef. Formatierungen )
Frage: ich möchte -- nur aus optischen Gründen -- nicht zum Berechnen --
in der Zelle A1 z.B.: "CH4056" oder "FR68300" eingeben (das sind Postleitzahlen)
und ich möchte das sie dann so aussehen : CH - 4056 oder FR - 68300
Kann man dies mit einer benutzerdefinierten Formel bewerkstelligen ???
Ganz herzlichen Dank - ich würde mich auf eine Lösung freuen.
Rudolfo
Antwort 1 von Rastermen vom 06.04.2021, 23:55 Options
Korrektur:
Sollte natürlich : benutzerdefiniertes Format heißen - nicht Formel.
Rudolfo
Sollte natürlich : benutzerdefiniertes Format heißen - nicht Formel.
Rudolfo
Antwort 2 von rainberg vom 07.04.2021, 07:15 Options
Hallo Rudolfo,
das lässt sich über die Formatierung nicht lösen.
Entweder Du gibst den Bindestrich mit ein oder verwendest ein Makro.
Folgender Code wirkt in der gesamten Tabelle, kann aber auf bestimmte Bereiche beschränkt werden.
Gruß
Rainer
das lässt sich über die Formatierung nicht lösen.
Entweder Du gibst den Bindestrich mit ein oder verwendest ein Makro.
Folgender Code wirkt in der gesamten Tabelle, kann aber auf bestimmte Bereiche beschränkt werden.
Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False
Target.Value = Left(Target.Value, 2) & " - " & Mid(Target.Value, 3, 99)
Application.EnableEvents = True
End Sub
Gruß
Rainer
Antwort 3 von Rastermen vom 07.04.2021, 07:53 Options
Hallo Rainer,
herzlichen Dank für deine Antwort.
Habe dazu noch zwei Fragen bevor ich das alles eingebe:
1. könntest du mir ein bisschen detailierter die Eingabe des VBA erklären,
-ich möchte dies nur auf ein Blatt ( Register : "Adresse") eingeben.
2. es betrifft die Zellen "C14" und "C20" auf die ich den Code beschränken will,-könntes du mir das noch dazu einfügen ?
Dankeschön
Rudolfo
herzlichen Dank für deine Antwort.
Habe dazu noch zwei Fragen bevor ich das alles eingebe:
1. könntest du mir ein bisschen detailierter die Eingabe des VBA erklären,
-ich möchte dies nur auf ein Blatt ( Register : "Adresse") eingeben.
2. es betrifft die Zellen "C14" und "C20" auf die ich den Code beschränken will,-könntes du mir das noch dazu einfügen ?
Dankeschön
Rudolfo
Antwort 4 von rainberg vom 07.04.2021, 08:31 OptionsLösung
Hallo Rudolfo,
dann lautet der Code so:
Mache einen Rechtsklick auf die Registerzunge des relevanten Arbeitsblattes und wähle "Code anzeigen", damit gelangst Du in den VBA-Editor.
Den vorher kopierten Code fügst Du im rechten großen Fenster ein und verlässt den Editor wieder.
Nun reagiert das Makro auf Eingaben in den genannten Zellen.
Gruß
Rainer
dann lautet der Code so:
Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False
If Not Intersect(Target, Range("C14,C20")) Is Nothing Then
Target.Value = Left(Target.Value, 2) & " - " & Mid(Target.Value, 3, 99)
End If
Application.EnableEvents = True
End Sub
Mache einen Rechtsklick auf die Registerzunge des relevanten Arbeitsblattes und wähle "Code anzeigen", damit gelangst Du in den VBA-Editor.
Den vorher kopierten Code fügst Du im rechten großen Fenster ein und verlässt den Editor wieder.
Nun reagiert das Makro auf Eingaben in den genannten Zellen.
Gruß
Rainer
Antwort 5 von Rastermen vom 07.04.2021, 08:52 Options
Hallo,
habe mich mit der VBA Eingabe versucht - und hat dann geklappt,
wäre dann nur noch die Pos.
2. es betrifft die Zellen "C14" und "C20" auf die ich den Code beschränken will,-könntes du mir das noch dazu einfügen - offen.
Danke
Rudolfo
habe mich mit der VBA Eingabe versucht - und hat dann geklappt,
wäre dann nur noch die Pos.
2. es betrifft die Zellen "C14" und "C20" auf die ich den Code beschränken will,-könntes du mir das noch dazu einfügen - offen.
Danke
Rudolfo
Antwort 6 von Rastermen vom 07.04.2021, 08:55 Options
Hallo Rainer,
Dankeschön-
deine Antwort hat sich gerade mit meiner Rückrage überschnitten-
Gruß -
Rudolfo
Dankeschön-
deine Antwort hat sich gerade mit meiner Rückrage überschnitten-
Gruß -
Rudolfo
Ähnliche Themen
Als Text formatierte Zahlen konvertieren
Mikoop 06.02.2008 - 174 Hits - 5 Antworten
Bedingte Formatierung für eine Spanne von Zahlen
mavida 12.02.2008 - 51 Hits - 3 Antworten
Zahlen in Text umwandeln
RoberS 15.05.2008 - 144 Hits - 1 Antwort
Excel: Funktion Verweis mit Text statt Zahlen
Berty 11.06.2008 - 45 Hits - 6 Antworten
Zahlen aus Text filtern
Trudi 05.12.2008 - 31 Hits - 2 Antworten
Hinweis
Diese Frage ist schon etwas älter, Sie können daher nicht mehr auf sie antworten. Sollte Ihre Frage noch nicht gelöst sein, stellen Sie einfach eine neue Frage im Forum..
Neue Einträge
