Live-Forum - Die aktuellen Beiträge
Datum
Titel
17.01.2025 21:30:26
Punktediagramm mit verschieden vielen Punkten
17.01.2025 20:50:45
Fehlerquotient für Schultest berechnen (Formel)
17.01.2025 19:14:40
Power Query ignoriert die letzte Spalte - Warum ? Hilfe
17.01.2025 18:21:02
vba-editor öffnet sich,- aber kein Fehler
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
212to216
212to216
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

VBA und Format(Range("..") ..?!?

Kategorie
VBA
Tags
#vba-anpassung #vba-formatierung #vba-rundungsfunktionen
Relevante Fragen
Anzeige
VBA und Format(Range("..") ..?!?
31.01.2003 23:14:49
Martin
Hallo,
ich versuche seit geraumer Zeit die Werte mehrerer Zellen mittels VBA auszulesen und zu verrechnen. Dabei soll das Ergebnis auf 3 Nachkommastellen beschränkt werden.

(Format((Range("FX_EUR").Value) * (Range("FX_CHF").Value)), "0.000"))

multipliziert zwar die Werte, hält sich aber nicht an die 3 Nachkommastellenregel. Was mache ich falsch?
Martin

Anzeige

14
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: VBA und Format(Range("..") ..?!?
31.01.2003 23:16:28
Boris

Hi Martin,

was hälst du von der Worksheetfunction.Round(Wert, 3)?

Gruß Boris

Re: VBA und Format(Range("..") ..?!?
31.01.2003 23:20:24
Martin

klingt gut Boris, aber wie baue ich das in meine Formel ein?
So fit bin ich in VBA leider noch nicht.

Gruss,
Martin

Re: VBA und Format(Range("..") ..?!?
31.01.2003 23:28:00
Ronald

Hallo,
Bei Excel 9 kann VBA auch runden:
Round(Range("FX_EUR")* Range("FX_CHF"),3)
Gruß Ronald


Anzeige
Re: VBA und Format(Range("..") ..?!?
31.01.2003 23:28:27
Boris

Hi Martin,

da sind wir schon zu weit, denn VBA ist alles andere als mein Fachgebiet...aber:

Format(Round(Range("FX_EUR").Value * Range("FX_CHF").Value, 3), "#.000")

sollte funktionieren.

Gruß Boris

Danke an Boris & Ronald! oT
31.01.2003 23:40:24
Martin

M.

against the topic
31.01.2003 23:59:24
L.Vira

Hallo, Boris,
Datei nicht bekommen!
Gruß L.Vira

Anzeige
Rien à faire!
01.02.2003 00:00:13
Boris

Hi L.Vira,

trotzdem danke!

Gruß Boris

Re: Rien à faire!
01.02.2003 00:26:08
L.Vira

Hallo, Boris,
hab gerade in spotlight deinen Vorschlag sheets.add(Quartal)
gelesen: Top!
Du wirst noch ein VBA- Genie!
Ist ja eigentlich auch einfacher als Excel.
Gruß L.Vira

Re: Rien à faire!
01.02.2003 00:36:49
Boris

Hi L.Vira,

danke! Das ehrt mich...
Sowas klappt auch schon einigermaßen, aber viel komplizierter darfs auch noch nicht werden;-))
Da schau ich lieber noch ein bisschen von dir ab!

Gruß Boris

Anzeige
Re: Rien à faire!
01.02.2003 00:45:13
L.Vira

Hallo,
leider kaum interessante Anfragen. Immer nir Doppler eleminieren
wird langweilig. Etwas weiter unten ist eine Anfrage nach blinkender Zelle. Willst du mal eine Lösung? Kommt dann aber per email.
Gruß L.Vira

Re: Rien à faire!
01.02.2003 00:47:37
Boris

Hi L.Vira,

immer gerne.
Mail hast du noch...?

Gruß Boris

Anzeige
Re: Rien à faire!
01.02.2003 00:52:22
L.Vira

Aber klar,
übrigens zu deien Sheets.add- Lösung:
Es geht ja erstmal gar nicht darum, unheimlich sophistische Lösungen zu bieten, aber sauber deklariert und logisch vom Ablauf her. Aber das sollte dir als Formelfuchs nicht schwerfallen.
Gruß L.Vira

Re: Rien à faire!
01.02.2003 01:05:35
Boris

Ich geb mir Mühe...
So ging´s mir ja auch mit den Formeln: Erst über zig Hilfsspalten, bis es dann irgendwann zu ner Lösung mit einer einzigen Formel kam.
Na ja, und das geht nur über probieren und tüfteln - im übrigen etwas, was ich bei manchen Fragern vermisse:
Sobald aus nem Semikolon ein Komma werden muss, wird vorher nochmal gefragt, statt es selbst auszupobieren.

Da ich weiss, dass unser Gechatte auch von anderen aufmerksam gelesen wird:
Ich hab nix gegen Fragen. Ohne die wär hier naturgemäß nix los. Nur manchmal vermisse ich halt ein bisschen die Experimentierfreudkigkeit.

Zurück zu dir:
Werde weiterhin aufmerksam beobachten, was du so von dir gibst. Denn ich konserviere es mir bei Bedarf, um es Stück für Stück nachzuvollziehen und anzuwenden.

So, Mail ist übrigens noch nicht da...;-)))

Gruß Boris




Anzeige
Sollte natürlich "zu Zweit" heissen...;-))
01.02.2003 01:41:09
Boris



Forumthreads zu verwandten Themen

Zellen formatieren mit vorangehenden "Nullen"
Addi

Hallo zusammen,
ich habe eine lange Liste, in der in einer Spalte Daten stehen, wo ab und zu vorangehende Nullen nötig sind (mal eine - mal 2...etc.) - und manchmal auch keine.
Wie kann ich diese Zellen formatieren, das die vorangehenden "Nullen" nicht automatisch weggelassen werden?
11.08.2008 10:37:00
Thread-ID: 1000746
8 Beiträge
Anzeige
Formel über VBA in Range.
Tom

Hi,
ich Versuch eine Summenformel
=SUMME(A3:A29)
verzweifelt über VBA dynamisch einzutragen.
Die Summe muss von A bis J eingetragen werden. Jedesmal mit dem entpsrechenden Buchstaben nicht immer mit A.
Hab das so versucht:
For k = 2 To 10 'Range(Cells(k, 29), Cells(...
13.08.2008 11:41:00
Thread-ID: 1001455
4 Beiträge
VBA - if anweisung mit variable
Thomas

Hallo,
ich habe ein blöds Problem und zwar habe ich folgendes If Abfrage in einer Forschleife in Pseudo:
Wenn A1 kleiner als A2 tu dies sonst tu das
VBA:
For i = 2 To 5 If "A" & i
Irgendwie trifft dort immer nur Else ein, ich glaube es liegt an der Bedingungsformulier...
16.10.2008 10:10:50
Thread-ID: 1016763
4 Beiträge
VBA Range Definition
Karen

Hallo Forum,
ich habe ein kleines Problem in meinem Makro.
Ich möchte eine Range abbilden, leider überträgt das Makro aber immer nur die Zeile 6.
For i = 2 To 256
If Cells(3, i).Value = datum Then
Range(Cells(6, i), Cells(40, i)).Copy
Selection.Copy
Cells(6, i + 1)...
22.12.2008 16:21:00
Thread-ID: 1034798
14 Beiträge
Im Range("A1:C15") anderes Cursor-Symbol?
Reinhardt

Hallo,
ist es möglich im Bereich Range("A1:C15") statt dem Kreuz ein Finger-, oder Pfeil Cursor-Symbol erscheinen zu lassen?
Gruß Reinhardt.
28.01.2009 09:25:00
Thread-ID: 1044456
2 Beiträge
Kurze Variablendeklaration in VBA?
Gunnar

Hi Leute,
gibt es in VBA keine andere Möglichkeit, Variable zu deklarieren außer
Dim abc As Integer, abd As Integer abe As Integer
usw.? Brauch über 100 Variable, das ist mühselig.
Typenkennzeichen dürfen übrigens nicht verwendet werden, falls das wichtig ist.
Grüße Gunnar...
28.01.2009 18:36:11
Thread-ID: 1044672
5 Beiträge
Daten fortlaufend von Formular in Range schreiben
Formular

Hi,
wie kann ich denn folgende Abfrage bzw kopieren erledigen:
Ich habe Ein Formular mit Textbox'n und Combobox'n
auf einem Bestimmte Tabellenblatt ("Daten") möchte ich nun die Folgenden Inhalte kopieren (button)
Auf dem Tabellenblatt ("Daten") habe ich ein Range B33 : F42 (also...
29.01.2009 09:26:24
Thread-ID: 1044806
3 Beiträge
Range einer Variable zuweisen
Mario

Hallo
Ich wollte die selection.Range einer variablen zuweisen, damit ich danach die selection verändern kann und trotzdem noch weiss, was vorher selectiert war.
Ich habe schon folgende Varianten versucht:
Dim r As Range r = selection.Range ''Fehlermeldung r = Range(Cells(selection...
07.02.2009 08:42:07
Thread-ID: 1047988
21 Beiträge
Destination:=.Range("A" & zeile)
Michael

Hallo!
Was mach ich hier falsch?
Die letzte Zeile ist 151. Er schreibt alle hinein, bis close 1, dann ist ende. Er soll immer in die letzte Zelle gehen und dann den Befehl ausführen.
Danke
Gruß Michael
Sub TextdateiEnlesen() Dim zeile As Integer Dim strInhalt As String ze...
11.02.2009 18:00:00
Thread-ID: 1049724
4 Beiträge
VBA Abspeichern in variablen Ordner
Danomat

Hi,
folgendes Problem
In Zelle C1 steht der aktuelle Monat. Nun möchte ich die Datei als PDF abspeichern:
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
"G:\Dokumente\Berichtswesen\Monatsreporting\02 Februar\Test.pdf" _
, Quality:=xlQualityStandard, IncludeDo...
13.03.2009 12:37:34
Thread-ID: 1059831
10 Beiträge
variable Zeilenanzahl kopieren, einfügen (VBA)
Alex

Hallo Leute,
In meiner Arbeitsmappe kopiere ich eine! Zeile (aus dem TabBlatt „Grundformular“) - via Doppelklick auf einen Namen in „Übersicht“ - in andere TabBlätter.
(das geht wunderbar)
Sieht jemand eine Möglichkeit ob/wie das ganze mit einer variablen Zeilenanzahl, die im „Grund...
18.03.2009 17:23:56
Thread-ID: 1061522
3 Beiträge
variabler SVerweis mit VBA
Jonathan

Hallo zusammen,
in einer Tabelle sind verschiedene Zeilen mit einem "x" in Spalte C markiert. Die Anzahl der "x" variert.
Nun versuche ich ein Makro zu erstellen, welches mir, wenn eine Zeile mit einem "x" markiert ist in
Spalte B einen SVerweis (Suchwert steht in Spalte A) einträg...
17.06.2009 14:28:57
Thread-ID: 1082250
3 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