Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 10:29:46
Wert aus einer Zelle bei jeder Eingabe in neue Zelle
26.09.2025 08:51:00
Teilinhalt einer Zelle vergleichen
25.09.2025 23:04:12
Einen von drei möglichen Einträgen in einer Zeile suchen
25.09.2025 19:59:48
Lebenserleichternde Datei, im Bezug auf die Essensauswahl
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
620to624
620to624
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zahlen mit 5 Nachkommastellen in Makro

Forumthread: Zahlen mit 5 Nachkommastellen in Makro

Zahlen mit 5 Nachkommastellen in Makro
13.06.2005 11:36:08
Daniel
Hallo Zusammen,
letzte Woche hat mir Udo mit einem Makro geholfen, in diesem Thread:
https://www.herber.de/forum/messages/622447.html
Ich möchte Zellenbereiche in eine .txt Datei kopieren.
Das funktioniert alles hervorragend.
Allerdings hätte ich nun gerne zusätzlich, dass die Zahlen der Spalten D-G IMMER 5 Nachkommastellen haben sollen, z.B. 45.34000.
Kann das bitte jemand in dem Makro noch anpassen?

Sub TextExport()
Dim i As Long, tmp As String
Open Range("B5") & ".txt" For Output As #1
For i = 5 To Range("G65536").End(xlUp).Row
tmp = ""
tmp = tmp & WorksheetFunction.Text(Cells(i, 3), "D/M/YYYY") & Chr(9)
tmp = tmp & WorksheetFunction.Substitute(Cells(i, 4), ",", ".") & Chr(9)
tmp = tmp & WorksheetFunction.Substitute(Cells(i, 5), ",", ".") & Chr(9)
tmp = tmp & WorksheetFunction.Substitute(Cells(i, 6), ",", ".") & Chr(9)
tmp = tmp & WorksheetFunction.Substitute(Cells(i, 7), ",", ".")
Print #1, tmp
Next i
Print #1, Chr(13)
Close 1
End Sub

Beste Grüße,
Daniel
Anzeige

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zahlen mit 5 Nachkommastellen in Makro
13.06.2005 12:25:13
EffHa
kann man auch mittels "Format" machen:
Format(Cells(1, 1), "#,##0.00000")
AW: Zahlen mit 5 Nachkommastellen in Makro
13.06.2005 12:27:47
Daniel
Hi,
sorry, ich habe leider nicht so viel Ahnung:
wo muss ich das denn ins Makro einfügen?
Grüße,
Daniel
AW: Zahlen mit 5 Nachkommastellen in Makro
13.06.2005 12:43:03
EffHa 

Sub TextExport()
Dim i As Long, J&, tmp As String
Open Range("B5") & ".txt" For Output As #1
For i = 5 To Range("G65536").End(xlUp).Row
For J = 4 To 7
Cells(i, J).NumberFormat = "0.00000"
Next
tmp = ""
tmp = tmp & WorksheetFunction.Text(Cells(i, 3), "D/M/YYYY") & Chr(9)
tmp = tmp & WorksheetFunction.Substitute(Cells(i, 4), ",", ".") & Chr(9)
tmp = tmp & WorksheetFunction.Substitute(Cells(i, 5), ",", ".") & Chr(9)
tmp = tmp & WorksheetFunction.Substitute(Cells(i, 6), ",", ".") & Chr(9)
tmp = tmp & WorksheetFunction.Substitute(Cells(i, 7), ",", ".")
Print #1, tmp
Next i
Print #1, Chr(13)
Close 1
End Sub

Anzeige
AW: Zahlen mit 5 Nachkommastellen in Makro
13.06.2005 13:01:45
Daniel
Danke.
Ich habe aber Ingos Makro benutzt!
Grüße,
Daniel
AW: Zahlen mit 5 Nachkommastellen in Makro
13.06.2005 12:34:16
IngoG
Hallo Daniel,
versuchs mal so:

Sub TextExport()
Dim i As Long, tmp As String
Open Range("B5") & ".txt" For Output As #1
For i = 5 To Range("G65536").End(xlUp).Row
tmp = ""
tmp = tmp & WorksheetFunction.Text(Cells(i, 3), "D/M/YYYY") & Chr(9)
tmp = tmp & WorksheetFunction.Substitute(format(Cells(i, 4),"0.00000"), ",", ".") & Chr(9)
tmp = tmp & WorksheetFunction.Substitute(format(Cells(i, 5),"0.00000"), ",", ".") & Chr(9)
tmp = tmp & WorksheetFunction.Substitute(format(Cells(i, 6),"0.00000"), ",", ".") & Chr(9)
tmp = tmp & WorksheetFunction.Substitute(format(Cells(i, 7),"0.00000"), ",", ".")
Print #1, tmp
Next i
Print #1, Chr(13)
Close 1
End Sub

Bei der deutschen Excelversion wird das "VBA"-format 0.00000 als 0,00000 dargestellt und muß anschließend mit substitude ersetzt werden...
Gruß Ingo
PS eine Rückmeldung wäre nett...
Anzeige
AW: Zahlen mit 5 Nachkommastellen in Makro
13.06.2005 12:57:07
Daniel
Hallo Ingo,
danke. So funktioniert es wie gewünscht!
Beste Grüße,
Daniel
Danke für die Rückmeldung oT
13.06.2005 13:24:45
ingoG
.
;

Forumthreads zu verwandten Themen

Zahl vorn/hinten vom Text trennen + Komma
StefanK

Hallo Excel-Freunde
ich möchte gern per Formel folgendes lösen:
in zelle a3 steht
1 haley, bill rock around the clock 1956
jetzt soll in b3 die "1" stehen --- löse ich per Formel mit =LINKS(A3;SUCHEN(" ";A3)-1)
in e3 soll "1956" stehen --- löse ich mit Array-Formel {=...
25.09.2008 19:00:21
Thread-ID: 1012407
12 Beiträge
Zelle auswerten nach Komma
walter

Hallo Fachexperten und Frauen,
ich habe in einer Zelle Daten stehen, die mit einem Komma getrennt sind.
z.b. A10 steht: 12,3,5,2,1000 (es könnte auch mal eine3.5 also mit Punkt
drin stehen.
nun möchte ich in a11= 12
in a12= 3 u.s.w.
stehen haben also die Werte immer b...
04.07.2010 17:15:56
Thread-ID: 1165337
14 Beiträge
Ganzzahl oder mit Nachkommastellen
Dieter(Drummer)

Hi Formelspezialisten,
ich suche eine Wenn-Formel, die es ermöglicht, eine Zahl in einer Zelle zu prüfen, ob es eine Zahl OHNE Nachkommastellen ist oder MIT. Die Zahlen werden per Functionsmakro ermittelt.
Danke für's drum kümmern und evtl. Hilfe.
Gruß, Dieter(Drummer)
14.03.2012 09:29:33
Thread-ID: 1254896
6 Beiträge
Anzahl der Nachkommastellen für geschützte Tabelle
Michael Veigel

Hallo Miteinander,
habe folgende Aufgabe. Muß eine Vorlage zum Auswerten von Messwerten erstellen. Dabei sollen diese Messwerte (bzw. Mittel-, Höchst- Minimalwerte) einmal in mm, ein andermal in µm vorliegen. (Soll wählbar sein).Die Anzahl der Nachkommastellen soll abhängig vom gewählten Mes...
14.06.2002 11:59:11
Thread-ID: 128689
3 Beiträge
Gültigkeit - Zahl mit 2 Nachkomma - nur Viertel
Werner

Hallo und guten Abend Excel-Freunde
ich möchte eine Gültigkeit hinter Zellen legen,
dass der User nur eine Zahl erfassen kann mit
2 Nachkommastellen a la 0,00 -- 0,25 -- 0,50 -- 0,75
also immer "ein Viertel"
in einem anderen Fall dürfen Nachkommastellen im 0,1 Bereich er...
07.06.2013 22:17:41
Thread-ID: 1316711
3 Beiträge
In ComboBox 2 Stellen nach dem Komma anzeigen
Frank

Guten Morgen an Alle,
ich habe eine kurze Frage. Ich füge eine ComboBox in Excel hinzu und verweise anschließend mit ListFillRange auf einen Bereich - alles gut. Wenn ich nun bspw. die 1,00 auswähle, wird anschließend nur die 1 angezeigt. Mit welcher Eigenschaft/Befehl lässt sich dieses Ver...
05.07.2013 08:14:01
Thread-ID: 1321214
4 Beiträge
Null in den Nachkommastellen anzeigen
Jens

Hallo zusammen,
ich habe ein kleines Problem mit der Darstellung von Nachkommastellen in einem Textfeld.
Beispiel: In der Zelle G20 steht eine berechnete Summe in Höhe von 20,60 €
Diese Summe möchte ich nun in einem anderem Feld mit weiterem Text inklusiver der letzten Null ausgeben...
02.01.2014 17:28:33
Thread-ID: 1343956
4 Beiträge
Wenn Wert dann Nachbarzeile ausgeben
Torsten

Hallo,
ich habe eine Excel Liste mit 3 Spalten
Spalte A Artikelnummern
Spalte B Bildername alt
Spalte C Bildername neu
Wenn nun in Spalte B (Bildername alt) ein Wert steht, dann soll in Spalte C (Bildername neu) der Wert A (Artikelnummer) ausgegeben werden. Zwischen den Zeil...
05.04.2014 12:43:58
Thread-ID: 1356230
4 Beiträge
erste Zahl mit Komma aus Zelle auslesen
R.

Hallo,
wie filtere ich aus einer Zelle mit vielen Texten und Zahlen die erste Zahl mit Komma heraus?
z.B.
A1 = Hallo 123 hier 345 da ist eine Zahl 1,0 dddf xxxxx ddd
B1= 1,0
wobei da alle möglichen kommazahlen stehen können, aber nicht immer an der gleichen Stelle.
Danke...
13.02.2015 11:10:18
Thread-ID: 1409270
17 Beiträge
Dezimahlzahlen mit 2 Nachkommastellen
Karl

Hallo zusammen,
ich habe festgestellt Dezimalzahlen in Excel unterschiedlich dargestellt werden.
Bsp.: Zelle 10,00 Bearbeitungszeile 10
Zelle 10,95 Bearbeitungszeile 10,95
Zelle 10,40 Bearbeitungszeile 10,4
Das Problem ist wenn ich diese Excel Tabelle in eine CSV-Datei umge...
20.03.2015 17:41:12
Thread-ID: 1416246
3 Beiträge
Anzeige
Laufzeitfehler 1004 / Nachkommastellen in Funktion
Patrick

Hallo,
ich habe ein Problem mit Excel VBA. Ich programmiere zur Zeit einen Code, bei dem in einer Spalte die Kalenderwochen eines bestimmten Zeitraums abgefragt wird.
Solange eine KW vorhanden ist (Not IsEmpty), soll Excel in eine benachbarte Zelle eine Funktion schreiben.
Dim StdS...
14.04.2015 07:57:01
Thread-ID: 1420606
5 Beiträge
Wie kommt Excel auf den Wert, s. Nachkommastelle
Christian

Ich habe eine einfache Eingabe von Beträgen in einer Zeile, welche ich addiere und subrahiere. Dagegen Prüfe ich auf Differenz mit dem Ergebnis aus einer anderen Quelle. Stimmen Beide überein ist die Differenz 0,00 und soll aber nicht angezeigt werden. "0,00" wird jedoch angezeigt, weil das Erg...
21.01.2016 10:00:15
Thread-ID: 1470171
5 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

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