Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1484to1488
1484to1488
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Arabische automatisch in römische Zahlen wandeln

Forumthread: Arabische automatisch in römische Zahlen wandeln

Arabische automatisch in römische Zahlen wandeln
01.04.2016 12:57:36
Mike

Arabische automatisch in römische Zahlen wandeln
Hallo,
aus der Eingabe arabischer Zahlen sollen automatisch römische Zahlen werden!
Für alles weitere siehe Anlage:
https://www.herber.de/bbs/user/104708.xlsx
Gruß
Mike

Anzeige

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: arabisch > römisch und retours
01.04.2016 13:05:18
Mike
Halo WF,
ich schaue mir das später an!
Gruß
Mike

stimmt: automatisch geht nur per VBA
01.04.2016 13:23:48
WF
zu flüchtig gelesen.
WF

Anzeige
Geht nur mit VBA
01.04.2016 13:07:03
RPP63
Hi!
In einer Zelle kann nur ein Wert ODER eine Formel stehen.
Geht nur mit VBA (bis 3999).
Bei Deiner Version auch vice versa.
Interesse?
Gruß Ralf

AW: VBA
01.04.2016 13:14:33
UweD
Hallo
- Rechtsclick auf den Tabellenblattreiter
- Code anzeigen
- Diesen Code dort reinkopieren

Private Sub Worksheet_Change(ByVal Target As Range)
On Error GoTo Fehler
If Not Intersect(Range("C6:E6"), Target) Is Nothing Then
If Target.Count = 1 And IsNumeric(Target) Then
If Target.Value > 3999 Then MsgBox "zu groß (max 3999)": Exit Sub
Application.EnableEvents = False
Target = WorksheetFunction.Roman(Target)
End If
End If
Fehler:
Application.EnableEvents = True
End Sub
Gruß UweD
Über Rückmeldungen würde ich mich freuen

Anzeige
AW: VBA
01.04.2016 19:52:13
Mike
Hallo WF, Ralf (RPP63) und Uwe,
ich danke für Eure Antworten und Mühe!
Uwes Code habe ich in meiner ursprünglich gesendeten Anlage ausprobiert; dort funktioniert er wunderbar.
Er funktioniert aber seltsamerweise nicht in meiner sehr umfangreichen Mappe, die ich jeweils nach Programmier-Änderungen mit Schreibschutz versehe!
Da ich keine VBA-Kenntnisse habe, habe ich am Nachmittag nach einer Alternativ-Lösung gesucht. Und so bin ich nach etwas Grübeln auf eine Excel-Intern-Programmier-Lösung des Problems gekommen!
Ich habe aufgeteilt in Eingabe- und Ausgabe-Zelle/n,
was optisch auch besser zu einer anderen Situation auf demselben Tabellenblatt passt:
- In der Eingabe-Zelle können neben römischen Zahlen auch arabische Zahlen eingegeben werden.
- Die Ausgabezelle wandelt dann arabische Zahlen in römische; weil ich nur Werte in niedrigem Ganzzahl-Bereich brauche ist, die Programmierung anhand Wenn-Bedingung leicht.
Für mich ist dies die einfachste Lösung, ohne dass ich mich hierzu in VBA-Problematik einarbeiten muss! Sie funktioniert.
Nochmals Danke für Eure Zeit und Mühe!
Gruß
Mike

Anzeige

Forumthreads zu verwandten Themen

Spalte bis zur nächsten freien Zelle?
Tom

Hi,
großes Problem für mich kleines wahrscheinlich fr euch.
Hab eine Tabelle in der ich automatisch hinter den letzten Eintrag etwas einfügen möchte. Leider brauch ich unten eine Summen, also wäre das die letzte Zeile mit Füllung. ich will sozusagen die erste freie Zeile nach den befüll...
12.08.2008 15:12:47
Thread-ID: 1001232
3 Beiträge
VBA - Zelle kopieren bis Wert einer Zelle null ist
Schulze

Halli Hallo,
ich bin ziemlicher Neuling in VBA. Daher würde ich euch bitten mir bei meiner Fragestellung zu helfen und zwar wie folgt: Ich möchte aus einer Tabelle aller Zellen kopieren, bis der Wert einer Zelle 0 annimmt. Diesen bestimten Bereich möchte ich in einer neuen Datei abspeichern...
19.08.2008 08:39:35
Thread-ID: 1002782
17 Beiträge
aufrunden bis zu nächstem listeneintrag
lukas

moin moin die excelianer!
habe wiedermal ein kleines problem, bei welchem ihr mir behilflich sein könntet...
ich habe eine liste, die in etwa so aussieht: (die werte können variieren!)
45
100
300
500
...
jetzt habe ich noch eine zahl, die ich gerne jeweils zur nä...
08.09.2008 13:09:00
Thread-ID: 1008127
10 Beiträge
Anzeige
Range bis zu einer bstimmten Zeile kopieren
Joachim

Hi,
ich habe eine Sub, um Daten eines Ranges von einem Tabellenblatt zu einem andren Tabellenblatt zu kopieren:
Sub Kopieren() Dim intS As Integer Sheets("Daten einlesen").Range("C2:H150").Copy With Sheets("Übersicht") intS = .Cells(4, Columns.Count).End(xlToLeft).Column .Cells(5, in...
19.09.2008 20:57:12
Thread-ID: 1011139
5 Beiträge
Bereich markieren bis zur ersten Zahl
michael

Hallo zusammen,
ich möchte in einem bestimmten Bereich alle Leerzellen bis zum Ersten Eintrgag pro Zeile markieren.
Habe schon verschiedene probiert, z.B. gehe zu Leerzellen, da sich aber zwischen den Einträgen Zellen ohne Werte befinden und ich die Leerzellen nur die Leerzellen vor dem...
21.09.2008 12:38:00
Thread-ID: 1011285
5 Beiträge
Subtraktion bis Wert erreicht (Zirkelbezug)
Tom

Hallo,
ich probiere mich seit 2 Tagen mit der Problematik Zirkelbezug. Ich möchte diese Funktion benutzen, um so lange Werte aus einigen Zellen zu subtrahieren, bis der in einer anderen Zelle definierte maximale Wert erreicht ist.
Hintergrund:
Für eine gesonderte Auszahlung steht mi...
27.10.2008 11:54:40
Thread-ID: 1019597
4 Beiträge
Anzeige
Zahl 1 bis 7 nur in Zelle eintragen dürfen
Korl

Hallo,
ich möchte in einem Zellbereich z.B. "B7:BI103" in den jeweiligen Zellen nur die Zahlen von "1 bis"7 eintragen dürfen und sofort den Cursor in der jeweiligen Zeile um eine Zelle nach rechts setzen lassen ohne "Enter" tippen zu müssen.
Den Bereich könnte ich mit Gültigkeitskriteri...
17.11.2008 19:55:00
Thread-ID: 1025380
8 Beiträge
Anzeige
Alle Leerzeichen bis rechts von Ziffer löschen
Ziffer

Hallo Freaks,
ich habe in der Spalte B 1700 Zeilen, die mit Artikelbezeichnungen folgenden Musters befüllt sind:

Mein Ziel ist es, alle Leerzeichen bis auf zwei nach der letzten Ziffer und dem ersten Buchstaben zu löschen. Also ab der 11 Stelle bis zur 16 Stelle alle Leerzeichen bi...
13.12.2008 21:41:36
Thread-ID: 1032708
3 Beiträge
Makro Spalte S bis letzter Wert Spalte A markieren
Jonathan

Hallo zusammen,
ich habe folgendes Probelem:
Ich möchte gerne Spalte S bis zum letzten Wert von Spalte A (variabel) markieren (damit im Anschluss der Spalte ein Rahmen gegeben werden kann).
Gibt es hierfür ein Makro?
Vielen Dank schon mal für eure Hilfe.
Gruß
Jonathan
30.01.2009 12:31:58
Thread-ID: 1045358
3 Beiträge
Alee Zeilen bis auf bestimmte löschen
Silke

Hallo,
in meiner Liste muss ich Zählerstände den Kostenstellen zuordnen.
https://www.herber.de/bbs/user/59754.xls
Ich importiere eine TXT-Datei, die ich vom Drucker exportiere ins Excel. Leider sind viele Zeile dabei, die ich für die Auswertung nicht brauche.
In meiner Liste se...
25.02.2009 11:09:02
Thread-ID: 1053794
13 Beiträge
Bei wert in Spalte zeile A bis P in Neues Blatt
juergen

Hallo liebe Excel Freunde
Hab da ein kleines Problem.
Ich hab da 2 Tabellen eine mit Eingaben und eine zum Auswerten.
Nun soll das Makro:
Wenn in der Spalte (D) der Tabelle Eingaben eine Wert bzw.eine Zahl steht , dann soll die Zeile von A bis P in die Tabelle Rechentab fortlauf...
25.02.2009 18:12:34
Thread-ID: 1054119
2 Beiträge
Anzeige
Spalte bis zur letzten Zeile mit akt. Datum füllen
Stefan

Hallo,
ich habe eine Tabelle mit mehreren gefüllten Spalten (z.B. A, C, E, F) und leeren Spalten dazwischen.
Nun möchte ich Spalte I mit dem aktuellen Datum füllen, und zwar bis zur letzten gefüllten Zeile einer Spalte mit Inhalt.
Wie gehe ich da am besten vor?
Die gefüllten Spa...
03.03.2009 13:35:30
Thread-ID: 1055961
4 Beiträge

Beliebteste Forumthreads (12 Monate)

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