Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Umwandlung Zahlenwert in Text
zurück: Aktualisierunsabfrage ändert sich immer? weiter: ABfrage bzw Bericht Schützen Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Bitte Status wählen ! Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
Ernst Eberhardt
Access-Anfänger


Verfasst am:
17. Nov 2005, 12:09
Rufname:
Wohnort: Bad Nauheim

Umwandlung Zahlenwert in Text - Umwandlung Zahlenwert in Text

Nach oben
       

Guten Morgen,

ich habe heute leider mal wieder ein äusserst anspruchsvolles Problem, bei dem ich um Hilfe bitte.

Zur Verdeutlichung:
Nehmen wir an, wir haben eine Liste1 mit Gesellschaftern:
ID;Name1;Name2;Anteile

Liste2 mit dazugehörigen Adressen:
ID;Name_gesamt;Adresse;PLZ;Wohnort

Nun habe ich eine Abfrage, die aus den beiden Tabelle eine Steuerdatei für einen Seriendruck generiert (Zusammengesetzte Adressen).
Ausserdem wird über ein weiteres Feld (z.B. Höhe der Dividende, Parameter) der Inhalt eingegeben. Zum Schluß gibt es dann noch ein berechnetes Feld, in welchem die Gesamtdividende ausgerechnet wird:

So sieht das Ergebnis aus:
Code:
0815;Meier;Michael;Adresse;1;1,18;1,18;
4711;Müller;Peter;Adresse;2;1,18;2,37;
...
Nun zum Problem:

Ich möchte, nein, ich muss die letzte Spalte (der berechnete Wert=Gesamtdividende) umkonvertieren in Text.

Es soll also folgendes Ergebnis haben:
Code:
0815;Meier;Michael;Adresse;1;1,18;1,18;eins 18/100;
4711;Müller;Peter;Adresse;2;1,18;2,37;zwei 37/100
9876;Meyer;Anton;Adresse;20;1,18;23,6;dreiundzwanzig 60/100
9999;Maier;Elli;Adresse;1256;1,18;1486,48;Eintausendvierhundertsechsundachtzig 48/100
Ist sowas machbar?

In Excel heißt die dazugehörige Formel irgendwie wie:
Code:
=inworten(...)
Wer kann mir bitte helfen?

ach ja: Access2002

_________________
LG

Ernst Eberhardt
DF6GL
Im Profil kannst Du frei den Rang ändern


Verfasst am:
17. Nov 2005, 13:12
Rufname:


AW: Umwandlung Zahlenwert in Text - AW: Umwandlung Zahlenwert in Text

Nach oben
       

Hallo,

schau mal hier.

Globale, benutzerdefinierte Excel-Funktion um einen (Geld-)betrag in Worte umzuwandeln

Die Funktionen dürften 1:1 in Access verwendbar sein.

_________________
Gruß
DF6GL

Bitte immer Feedback auf Lösungsvorschläge geben!
rita2008
Im Profil kannst Du frei den Rang ändern


Verfasst am:
17. Nov 2005, 13:13
Rufname:
Wohnort: Berlin

AW: Umwandlung Zahlenwert in Text - AW: Umwandlung Zahlenwert in Text

Nach oben
       

In der Abfrage kannst Du
Code:
ZString(feldname)
schreiben

mfg Rita

_________________
mfg Rita

Antworten bitte hier im Forum, nicht als private Nachricht. Danke
Ernst Eberhardt
Access-Anfänger


Verfasst am:
17. Nov 2005, 13:25
Rufname:
Wohnort: Bad Nauheim

AW: Umwandlung Zahlenwert in Text - AW: Umwandlung Zahlenwert in Text

Nach oben
       

Vielen Dank für die Antworten.

Leider weiß ich nicht, wie ich den Quellcode in meine Access-Abfrage reinbekomme.
da brauche ich leider noch Hilfe.

_________________
LG

Ernst Eberhardt
rita2008
Im Profil kannst Du frei den Rang ändern


Verfasst am:
17. Nov 2005, 13:34
Rufname:
Wohnort: Berlin


AW: Umwandlung Zahlenwert in Text - AW: Umwandlung Zahlenwert in Text

Nach oben
       

Na einfach in ein leeres Feld schreiben:
Code:
Feldname:ZString([feldname])

mfg Rita

_________________
mfg Rita

Antworten bitte hier im Forum, nicht als private Nachricht. Danke
Ernst Eberhardt
Access-Anfänger


Verfasst am:
17. Nov 2005, 14:14
Rufname:
Wohnort: Bad Nauheim

AW: Umwandlung Zahlenwert in Text - AW: Umwandlung Zahlenwert in Text

Nach oben
       

Ich habe also in einer weiteren Spalte folgendes eingetragen:
Code:
inworten: ZString([Bruttodividende Gesamt])
und als Funktion "Ausdruck".

Nun gibt Access mir genau die gleichen (Zahlen)-Werte zurück wie in [Bruttodividende Gesamt].

Irgendwie muss ich ja den Quelltext aus dem Posting weiter oben da reinkriegen?

_________________
LG

Ernst Eberhardt
rita2008
Im Profil kannst Du frei den Rang ändern


Verfasst am:
17. Nov 2005, 14:38
Rufname:
Wohnort: Berlin

AW: Umwandlung Zahlenwert in Text - AW: Umwandlung Zahlenwert in Text

Nach oben
       

Ach ja, da hatte ich was falsch verstanden:

Erstelle einen neuen Modul und kopiere dort hinein den gesamten Code aus dem Link. In die neue Spalte der Abfrage musst Du richtig schreiben:
Code:
inworten: InWorten([Bruttodividende Gesamt])

mfg Rita

_________________
mfg Rita

Antworten bitte hier im Forum, nicht als private Nachricht. Danke
Ernst Eberhardt
Access-Anfänger


Verfasst am:
17. Nov 2005, 14:49
Rufname:
Wohnort: Bad Nauheim

AW: Umwandlung Zahlenwert in Text - AW: Umwandlung Zahlenwert in Text

Nach oben
       

Ha, schon wieder zwei Schritte weiter. Tausend Dank, rita2008.

Aber:
Leider, leider gibt er mir eine Fehlermeldung. AC will debuggen und hat in folgendem Code-Teil das Wort "WorksheetFunction." markiert:
Code:
Private Function GetHundertstel(Betrag)
    If Fünfer = 1 Then
        Betrag = Format(Application.WorksheetFunction.Round(Betrag / 5, 2) _
                        * 5, "#.00")
      Else
        Betrag = Format(Betrag, "#.00")
Access Fehlermeldung hierzu:
Zitat:
Fehler beim Kompilieren. Methode oder Datenbankobjekt nicht gefunden

_________________
LG

Ernst Eberhardt
rita2008
Im Profil kannst Du frei den Rang ändern


Verfasst am:
17. Nov 2005, 15:23
Rufname:
Wohnort: Berlin

AW: Umwandlung Zahlenwert in Text - AW: Umwandlung Zahlenwert in Text

Nach oben
       

Hallo,

ich hatte mir den Code nicht so genau angesehen...

Worksheetfunction ist natürlich Excel-spezifisch. Round gibt es aber auch in Access. Du kannst also einfach schreiben:
Code:
        Betrag = Format(Round(Betrag / 5, 2) * 5, "#.00")

mfg Rita

_________________
mfg Rita

Antworten bitte hier im Forum, nicht als private Nachricht. Danke
Ernst Eberhardt
Access-Anfänger


Verfasst am:
18. Nov 2005, 15:54
Rufname:
Wohnort: Bad Nauheim

AW: Umwandlung Zahlenwert in Text - AW: Umwandlung Zahlenwert in Text

Nach oben
       

rita2008

Tausend Dank, Danke, Danke, Danke!
Es klappt.

Auch wenn ich nicht weiß, was genau ich da jetzt gemacht habe, aber es klappt.
Deine Anregungen / Eure Anregungen waren mit eine riesengroße Hilfe.

Schön, das es Euch gibt und dass Ihr so Anfängern wie mir helft. Danke

_________________
LG

Ernst Eberhardt
rita2008
Im Profil kannst Du frei den Rang ändern


Verfasst am:
18. Nov 2005, 17:50
Rufname:
Wohnort: Berlin


AW: Umwandlung Zahlenwert in Text - AW: Umwandlung Zahlenwert in Text

Nach oben
       

Ernst Eberhardt hat folgendes geschrieben:
Auch wenn ich nicht weiß, was genau ich da jetzt gemacht habe, aber es klappt.
Es wäre natürlich sinnvoll, wenn Du Dich bei Gelegenheit näher damit befassen würdest. ..

Wenn Du noch Fragen hast, melde Dich doch nochmal.

Heute wünsche ich aber erstmal ein schönes Wochenende.

mfg Rita

_________________
mfg Rita

Antworten bitte hier im Forum, nicht als private Nachricht. Danke
Neues Thema eröffnen   Neue Antwort erstellen Alle Zeiten sind
GMT + 1 Stunde

Diese Seite Freunden empfehlen

Seite 1 von 1
Gehe zu:  
Du kannst Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum nicht posten
Du kannst Dateien in diesem Forum herunterladen

Verwandte Themen
Forum / Themen   Antworten   Autor   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Access Tabellen & Abfragen: Über Abfrage suchen (Text) 1 jolly mäh 510 29. Okt 2007, 19:11
Gast Über Abfrage suchen (Text)
Keine neuen Beiträge Access Tabellen & Abfragen: Zahl mit führender Null in Text umwandeln 1 deon 3261 29. Aug 2007, 12:54
KlausMz Zahl mit führender Null in Text umwandeln
Keine neuen Beiträge Access Tabellen & Abfragen: in Memo bestimmten Text suchen und Anzahl anzeigen 2 remote1 689 05. Aug 2007, 14:31
remote1 in Memo bestimmten Text suchen und Anzahl anzeigen
Keine neuen Beiträge Access Tabellen & Abfragen: Zahlen vom Text im Feld trennen 3 SteffenB 3226 19. Jul 2007, 11:12
Gast Zahlen vom Text im Feld trennen
Keine neuen Beiträge Access Tabellen & Abfragen: Text in zwei Spalten gleichzeitig suchen 11 Gormigust 812 14. Mai 2007, 19:35
KlausMz Text in zwei Spalten gleichzeitig suchen
Keine neuen Beiträge Access Tabellen & Abfragen: Feldtyp Text > Datum/Uhrzeit und Alter Errechnen 1 harto69 910 03. Apr 2007, 18:00
Nouba Feldtyp Text > Datum/Uhrzeit und Alter Errechnen
Keine neuen Beiträge Access Tabellen & Abfragen: Text in Spalte splitten 6 Mar307 1619 21. Feb 2007, 18:51
Mar307 Text in Spalte splitten
Keine neuen Beiträge Access Tabellen & Abfragen: als Text formatierte Zahlen sortieren 2 tom_r 1440 16. Feb 2007, 12:33
tom_r als Text formatierte Zahlen sortieren
Keine neuen Beiträge Access Tabellen & Abfragen: text -> zahl formatierung 7 archit.ten 4020 25. Jan 2007, 16:00
sql text -> zahl formatierung
Keine neuen Beiträge Access Tabellen & Abfragen: Text und Zahlen trennen 1 Tomte 1971 29. Dez 2006, 11:41
Nouba Text und Zahlen trennen
Keine neuen Beiträge Access Tabellen & Abfragen: Zahlenwert vergleichen 1 RobArb 495 16. Okt 2006, 20:02
jens05 Zahlenwert vergleichen
Keine neuen Beiträge Access Tabellen & Abfragen: Felder zusammenführen aus Text und Zahl 4 Nachtrapp 4458 18. Apr 2006, 17:24
Nachtrapp Felder zusammenführen aus Text und Zahl
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: Frontpage Forum