Live-Forum - Die aktuellen Beiträge
Datum
Titel
20.10.2025 19:34:56
Eine Zelle in 3 Spalten teilen
20.10.2025 19:24:08
Excel Form befüllen
20.10.2025 19:03:51
wenn istleer funktioniert nicht wegen formel
20.10.2025 13:56:55
Wenn Funktion mit Xverweis oder ähnlich
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
124to128
124to128
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Formatierungsproblem

Forumthread: Formatierungsproblem

Formatierungsproblem
03.06.2002 12:38:01
Martin
Hallo,

ich stelle in einer Tabelle ein Verhältnis zweier Werte untereinander dar (2:1, 1:3, usw)
Formatiert habe ich es als

0.0":1"

weil ich insbesondere das negative Verhältnis genauer darstellen will (0:1 ist halt nicht dasselbe wie 0.8:1). Dadurch habe ich aber natürlich auch bei einem positiven Verhältnis eine Darstellung mit Nachkommastelle. Diese Nachkommastelle bei positivem Verh. will ich raus haben!

Geht so etwas?

Gruss,
Martin

Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
0":1";0.0":1"
03.06.2002 13:06:18
Daniel R.
Gruss Daniel R.
Re: 0":1";0.0":1"
03.06.2002 13:15:59
Martin
Hallo Daniel,

0.8:1 stellt er so leider auch nur als 1:1 dar!?!

Martin

Re: Formatierungsproblem
03.06.2002 13:23:02
Daniel R.
Hallo Martin
Du musst mir nochmals erklären, wann ein Verhältnis negativ, und wann positiv ist. Gibt es nur ein negatives Verhältnis nämlich 0:1?
Gruss Daniel R.
Anzeige
Re: Formatierungsproblem
03.06.2002 14:01:20
Daniel R.
Also ich gehe davon aus, dass ein Verhältnis dann negativ ist, wenn der Wert der ersten Verhältniszahl kleiner "1" ist z.B. "0.7". Damit ist "0.7" aber immer noch keine negative Zahl. Insofern lässt sich Dein Problem nicht über benutzerdefinierte Formate lösen, würde ich jetzt mal behaupten.
Schreibe deshalb den folgenden Code in ein Tabellenmodul:

Private Sub Worksheet_Change(ByVal target As Excel.Range)
wert = ActiveCell.Value
Dim bereich1 As Range
Set bereich1 = Range("e1:e10")
If Not Intersect(target, bereich1) Is Nothing Then
If wert >= 1 Then
Selection.NumberFormat = "0"":1"""
Else
Selection.NumberFormat = "0.0"":1"""
End If
Else
Exit Sub
End If
End Sub

Wenn Du im Bereich E1-E10 eine Zahl eingibts und die Entertaste drückst, wird die Zahl entsprechend Deinen Wünschen formatiert, insofern ich das mit dem negativen Verhältnis richtig verstanden habe.
Gruss Daniel R.

Anzeige
ja, so scheint es zu funktionieren!
03.06.2002 14:15:04
Martin
vielen Dank!!

Gruss,
Martin

;

Forumthreads zu verwandten Themen

Cursor springt in die Pampa - MultiLine TextBox
Kilo

Hallo liebe VBA Profis
ich bin auf ein für mich nicht lösbares Problem - vielleicht sogar Phänomen gestoßen...
Leider kann ich keine Phänomene dieser Art gebrauchen.
Damit es für Sie etwas anschaulicher wird, hab ich mein Problem als Beispiel (https://www.herber.de/bbs/user/54427.xl...
07.08.2008 20:31:08
Thread-ID: 1000095
2 Beiträge
Eingabe formatiert zurückgeben (Komma und Punkt)
Lemmi

Hallo zusammen,
ich möchte Euch eine wahrscheinlich einfache Frage stellen, die ich mir gerade mal nicht beantworten kann!
Wie stelle ich sicher das auch wenn ein Punkt als Trennzeichen eingegeben worden ist, am Ende immer ein Komma in der Zelle steht?
Eingabe 10,0........Ausgabe...
07.08.2008 21:35:00
Thread-ID: 1000105
5 Beiträge
Pivot-Bezug verformeln?
Stefan

Hallo zusammen!
Ich möchte eine Auswertungspivot machen was ich aber immer auf den aktuellen Monat anpassen möchte.
Tabellenblatt :Auswertung A1 : Monat ( auswählbar über Gültigkeitsliste) Tabellennamen:Monate
ich wollte es so machen :
Pivotbezug : =indirekt(Auswertung!A1&...
08.08.2008 13:03:00
Thread-ID: 1000262
3 Beiträge
Frage - Spalten einfügen & Spalten untereinander z
André

Hallo zusammen!
Ich habe da als blutiger Anfänger in VBA zwei Fragen:
1.) Wie kann ich in meiner Tabelle in jeder zweiten Spalte 4 leere Spalten einfügen lassen?
2.) Dann möchte ich unter den Inhalt der ersten fünf Spalten (A-E) den Inhalt der zweiten 5 Spalten (F-J) usw. In der grö...
08.08.2008 16:00:00
Thread-ID: 1000340
3 Beiträge
Anzeige
Schwellenwerte für eine Gruppierung setzen
Michi

Hallo zusammen,
in einer excel-Tabelle muss ich für eine Variable Schwellenwerte setzen, um eine Dreiergruppierung zu erhalten (hochentwickelte Länder, Länder mittlerer Entwicklung und schwach entwickelte Länder).
Welche Formel könnte helfen? Ich hätte da die zwei 25%-Quartile und den M...
10.08.2008 11:48:00
Thread-ID: 1000605
3 Beiträge
Makro ohne Pfadbezug erstellen.
George

Hallo,
Ich würde gerne eine Analysefunktion mit immer gleichem Zellenbereich in verschiedenen Dateien (immer gleicher Aufbau) per Makro ausführen. Wenn ich eine neue Datei öffne, will sich das böse Makro immer auf den Pfad der Datei beziehen, mit der das Makro erstmalig erstellt wurde. Ande...
11.08.2008 08:46:50
Thread-ID: 1000712
3 Beiträge
Anzeige
Cursor springt in Pampa (MultiLine TextBox)
Kilo

Hallo liebe VBA Profis
(Danke an Jürgen, der sich meines Problems annehmen wollte, aber der UpLoad meiner Datei war irgendwie fehlgeschlagen - hier der 2. Versuch)
ich bin auf ein für mich nicht lösbares Problem - vielleicht sogar Phänomen gestoßen...
Leider kann ich keine Phänomene...
11.08.2008 12:15:00
Thread-ID: 1000795
5 Beiträge
Zellen prüfen / Ausgabe wenn Bedingung erfüllt
Kay

Hallo,
Ich brauche dringend Eure Hilfe. Unter https://www.herber.de/bbs/user/54533.xls findet Ihr eine Mappe, in welcher in Spalte A
1 für "Kaufen"
0 für " "
-1 für "Verkaufen"
steht. IN SPALTE B SIND BISHER NUR MANUELL ERSTELLTE BEISPIELEINTRÄGE ENTHALTEN, DAMIT ERSICHTLIC...
12.08.2008 09:51:36
Thread-ID: 1001078
3 Beiträge
Anzeige
Pfad festlegen, brauch ma hilfe!
sockel939

Private Sub CommandButton8_Click() Sheets("Req.No.").Visible = 1 UserForm1.Show Dim oldWB As Workbook, newWB As Workbook Dim str As String Set oldWB = ActiveWorkbook With oldWB Selection.Copy str = oldWB.Sheets("Req.No.").Range("A1").Value End With Set newWB = Workbooks.Add With newWB.ActiveS...
12.08.2008 10:10:18
Thread-ID: 1001087
6 Beiträge
spaltenbezeichnungen ändern sich einfach
Julia

Hallo!
ich habe ein Problem: ich habe mehrere .xml dateien erstellt, die spalten oben waren immer durchbuchstabiert. jetzt stehen da aber bei den identischen datein plötzlich zahlen oben...
warum und wie kann ich das rückgängig machen?
dankeschön!
julia
12.08.2008 13:33:00
Thread-ID: 1001182
3 Beiträge
Erweiterung der Schleife für mehrere Spalten
Fred


Hallo zusammen
Ich habe eine Schleife gefunden, die für meine Zwecke fast perfekt ist. Leider führt sie Ihre Funktion nur in einer Spalte aus. Ich würde diese Funktion gerne auf andere Spalten erweiter.
Also ausgeführt wird die Such und auswertfunktion in Spalte D. Ich bräuchte die...
12.08.2008 13:57:31
Thread-ID: 1001195
3 Beiträge
Code sorgt für 99%CPU Last und endet nicht?!?
Lauren

Hallo zusammen
folgender code bewirkt eine Art Endlosschleife jemand ne Idee woran das liegen könnte, übersehe ich hier etwas?!?!
Range("M2").Select ActiveCell.FormulaR1C1 = "=IF(COUNTIF(C[-12],RC[-12])>=3,RC[-3]*RC[-9],"""")" Selection.AutoFill Destination:=Range("M2:M" & Rang...
12.08.2008 14:04:00
Thread-ID: 1001198
10 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