Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 23:47:55
Datum ausweisen, wenn definierte Summe erreicht ist
25.04.2024 21:40:53
Excel Datenquelle aus dem Web mit Anmeldung?
25.04.2024 21:21:16
Zellkommentar in UserForm anzeigen und bearbeiten
25.04.2024 21:13:13
Kalenderwochen addieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
476to480
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
476to480
476to480
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Alle Werte werden in € angezeigt. Warum?

Alle Werte werden in € angezeigt. Warum?
31.08.2004 14:08:25
christoph
Hallo.
Ich stehe vor einem Rätsel!
Ich habe ein Berechnungstool mit VBA entwickelt, und bei sämmtlichen Probedurchläufen lief alles wie gewollt.Jetz werden allerdings sämtliche Werte die mittels VBA bestimmt werden in € (!!!) angezeigt ohne das ich wüsste das ich es irgendwoe festgelegt oder bestiimmt habe.
Was ist hier passiert ?
Wie kann ich das rückgängig machen?
Danke im voraus für Erklärungen und Hilfen
Christoph

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

Betreff
Datum
Anwender
Anzeige
AW: Alle Werte werden in € angezeigt. Warum?
Karl
Wenn in dem Tool der Datentyp Currency verwendet worden ist, dann wird bei übertragen in eine Zelle diese automatisch formatiert (hier also mit EUR-Zeichen). Ein Typcast behebt das Problem, oder Zellenformat angleichen.
Gruß Karl
Typcast ?
Christoph
Habe Ein paar Variablen als Currency bestimmt.Ein Grossteil wird aber nur Eingelesen und Bearbeitet.Hatte aber bis eben immer die Anzeige ohne € gehabt.
Habe den VBA-Code in eine ältere Speicher-Versin koppiert und jetzt ist alles wieder normal.
Kann trotz deiner Auskunft die Logik immer noch nicht ganz nachvollziehen.
Was ist ein "Typcast" und wie benutzt ich ein "Typcast"
Danke für deine Antwort
Christoph
Anzeige
AW: Typcast ?
Karl
Du wandelst den Currencydatentyp in zB Double:

Dim x as currency
Dim y as double
x = 193.2842
y = cdbl(x)

CDbl ist die Typumwandlungsfunktion in den Datentyp Double. Wenn nun ein Wert in die Zelle übertragen wird, bleibt das Zellformat bestehen.
Gruß Karl
Danke
31.08.2004 14:57:10
christoph
Ich danke dir.
Ist doch einfacher wenn ich die Variablen von Anfang an als Double definieren oder?
Gruß Christoph

51 Forumthreads zu ähnlichen Themen

Unerklärbar - Combobox gibt nicht alle Werte aus
Jonathan

Hallo liebe Experten,
ich habe in einem Excel-File eine Userform mit Combobox erstellt. Diese soll mir Namen ausgeben, welche als Kriterium "A" in Spalte A und "Y" in Spalte B haben.
Die Daten werden gleichzeitig auch nur einmal ausgegeben.
Bis hierher funktioniert auch alles wunde...
16.01.2009 16:01:00
Thread-ID: 1040614
4 Beiträge
Anzeige
Alle Werte einmal auslesen - zwei Spalten
mat

Hallo Leute,
ich erfasse im Tabellenblatt Auswertung jeden Namen aus Tabellenblatt data jeweils einmal, egal wie oft der Name in der Liste auftaucht. Muster = https://www.herber.de/bbs/user/77404.xls
Nun hat sich meine Aufgabenstellung aber geändert. Wenn der Name in data Spalte C eine...
08.11.2011 18:43:40
Thread-ID: 1237049
2 Beiträge
Alle Werte einer Zelle teilen
Sandra

Hallo Excelfreunde!
Ich nutze folgenden VBA-Code:
Function AlleWerte _ (rErg As Range, _ sMatch As String, _ rMatch As Range, _ Optional sDelim As String = " ") _ As String 'rErg=Ergebnisspalte, sMatch=Suchbegriff 'rMatch=Suchspalte, sDelim=Trennzeichen Dim objErg As Object, lngC As Lon...
24.04.2012 14:32:24
Thread-ID: 1260728
7 Beiträge
Anzeige
Alle Werter einer Range in einem String?
Melanie

Hallo Zusammen,
weiß jemand, wie ich ohne viel Aufwand alle Values einer Range als String erhalte?
Ich habe das bisher so gemacht:
Dim SelNames As String Dim SelName As Range For Each SelName In Selection SelNames = SelNames & SelName.Value & "," Next
Dachte mir, das...
24.11.2013 13:27:37
Thread-ID: 1339824
3 Beiträge
Alle Werte (keine Formeln) auslesen
mctobler

Hallo,
ich habe ein kleines Problem, welches ich so einfach nicht finden kann, es gibt unzählige Threads dazu aber keiner passt genau. Vielleicht kann mir jemand helfen.
Ich würde gerne alle Werte (also keine Formeln) über alle Tabs auslesen und in einen automatisch neuangelegten Tab "T...
09.04.2014 18:19:12
Thread-ID: 1356758
6 Beiträge
Alle Werte aus einer Bedienung in einer Zelle
Sdravi

Hy,
folgende Tabelle
Spalte 1- Spalte B
A1-290
A1-290
A1-291
A1-297
Wenn in Zelle D3 A1 steht dann sollen alle Werte mit kommer getrennt in einer Zelle ausgegeben werden, doppelte nur einmal.
Bei dieser Formel bekomm ich nur 290
=WENNFEHLER(SVERWEIS(D3;A:B;...
16.05.2016 00:24:12
Thread-ID: 1493558
14 Beiträge
alle Werte einer Listbox in eine Zelle schreiben.
Robert

Hallo Zusammen,
ich suche nach einer Möglichkeit die Werte einer Listbox in eine einzige Zelle zu Schreiben.
Beispiel:
Listbox 1
Apfel
Zitrone
Birne
Cmb_Übernehmen_Click()
A1 = Apfel / Zitrone / Birne
Kann mir da jemand weiter helfen?
Danke und Gruß
...
25.10.2016 08:58:30
Thread-ID: 1521515
10 Beiträge
Alle werte eine Tabelle durch 2 dividieren
Peter

Hallo Zusammen,
ich bitte wie so oft um Eure Hilfe.
Ich habe eine Tabelle in einer Range(C9:G1000).
Nun sollen alle Zahlen dieser Range durch Range("B2")dividiert werden.
Wie müsste der Code dazu aussehen?
LG, Peter
14.03.2017 10:05:03
Thread-ID: 1547214
5 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
3
15
1
6
4
2
5
13
9
4
3
8
4
1
2
8
5
2
4
4
2
2
4
5
4