Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Suche den größten gemeinsamen Teiler zweier zahlen
zurück: Kriterium entspricht Feldinhalt weiter: Abfragen Datenbankübergreifend verwenden Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Antwort Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
VR2008
Gast


Verfasst am:
03. Jul 2009, 10:33
Rufname:

Suche den größten gemeinsamen Teiler zweier zahlen - Suche den größten gemeinsamen Teiler zweier zahlen

Nach oben
       Version: Office 2007

Hallo,
ich muss eine Aufgabe bearbeiten, die folgendesmaßen lautet:
Ich suche den größten gemeinsamen Teiler zweier Zahlen, wobei ich ein UserForm erstellen muss worin die Zahlen eingegeben werden können und ein Meldungsfenster in welchem dann der gr. gemeinsame Teiler der eingegebenen Zahlen erscheint.
Zudem müssen die eingegebenen Zahlen in Spalte A1 ,B1 und der gemeinsame Nenner in C1 geschrieben werden.
Wer kann mir dabei helfen? Smile

Liebe Grüße
MrBlonde
Alles etwas: ITA


Verfasst am:
03. Jul 2009, 10:53
Rufname:
Wohnort: Wadgassen


AW: Suche den größten gemeinsamen Teiler zweier zahlen - AW: Suche den größten gemeinsamen Teiler zweier zahlen

Nach oben
       Version: Office 2007

Hi VR2008

Kennst du dich ein wenig mit VB aus?

Wenn ja kannst du dir doch eine Funktion schreiben, die beide Zahlen nach und nach durch alle Zahlen teilt, die kleiner sind als die Zahlen. Dann lässt du dir das größte Ganzzahlige Ergebnis in C1 anzeigen.

Allerdings kann ich dir die Funktion nicht sofort selbst schreiben, da ich im moment keine Zeit habe, aber wenn das nicht zu dringend ist kann ich mich bis Montag oder Dienstag vielleicht darum kümmern.

Vielleicht gibt es auch einen einfacheren Weg, aber mir fällt gerade keiner ein.

_________________
Greetz
MrBlonde

Bitte um Rückmeldung... aber nicht als PM, sondern hier für alle!

Nur tote Fische schwimmen mit dem Strom
MAPWARE
Access Profi(l)neurotiker


Verfasst am:
03. Jul 2009, 11:22
Rufname:
Wohnort: Hannover

AW: Suche den größten gemeinsamen Teiler zweier zahlen - AW: Suche den größten gemeinsamen Teiler zweier zahlen

Nach oben
       Version: Office 2007

Hi,

Ist das überhaupt Access? Nicht eher Excel? Wo liegt das Problem eigentlich, im Erstellen eines Forms, eines Moduls oder des Algorithmus. Welche Vorarbeit hast Du geleistet, bevor Du hier nach eine Antwort gesucht hast?

hier eine Variante zum ggT() in VBA, die ich gesonders elegant/rekursiv fand. Habe ich aus diesem Wiki-Artikel.

Wikipedia: Euklidischer Algorithmus
Code:
Public Function ggT(A As Long, B As Long) As Long
    If B = 0 Then ggT = A Else ggT = ggT(B, A Mod B)
End Function
(Wärs kürzer schafft, bekommt von mir nen Preis Razz)
_________________
Grüße
Marcus

Wer Controls nicht sinnvoll benennt, wird es später bereuen.
VR2008
Gast


Verfasst am:
06. Jul 2009, 11:31
Rufname:

AW: Suche den größten gemeinsamen Teiler zweier zahlen - AW: Suche den größten gemeinsamen Teiler zweier zahlen

Nach oben
       Version: Office 2007

Vieln Dank für eure Bemühungen.
Ich hatte vergessen hinzuzufügen, dass ich dies mit VBA in Excel bearbeiten muss.
Ich habe mir schon gedanken gemacht wie ich die Aufgabe lösen soll, aber ich komme alleine nicht auf die Lösung. Ich muss die Aufgabe bis spätestens in 1 Woche abgeben.

Liebe Grüße
Willi Wipp
Moderator


Verfasst am:
06. Jul 2009, 12:29
Rufname:
Wohnort: Raum Wiesbaden


Re: Suche den größten gemeinsamen Teiler zweier zahlen - Re: Suche den größten gemeinsamen Teiler zweier zahlen

Nach oben
       Version: Office 2007

Hi VR2008,

ich sehe jetzt nicht warum das nicht auch in Excel so funktionieren sollte Wink

@MAPWARE,

den Preis bitte senden an ... Very Happy
Code:
Public Function ggT(A As Long, B As Long) As Long
    ggT = IIf(B = 0, A, ggT(B, A Mod B))
End Function

_________________
Eine kurze Rueckmeldung waere nett
SL Willi Wipp

(Anleitung fuer das Anhaengen von Dateien: Klicke links auf [www], Gaeste muessen sich dafuer anmelden)
Sinister
Access-Programmierer


Verfasst am:
06. Jul 2009, 16:29
Rufname:

AW: Suche den größten gemeinsamen Teiler zweier zahlen - AW: Suche den größten gemeinsamen Teiler zweier zahlen

Nach oben
       Version: Office 2007

Hallo,

Willi Wipp, keinen Preis für dich. Very Happy
IIf wertet immer sowohl den Teil truepart als auch den Teil falsepart aus (VBA Hilfe)
Kürzer als bei MAPWARE:
Code:
Public Function ggT(A As Long, B As Long) As Long
    If B Then ggT = ggT(B, A Mod B) Else ggT = A
End Function

_________________
Warum einfach, wenn es kompliziert geht!?
Willi Wipp
Moderator


Verfasst am:
08. Jul 2009, 05:35
Rufname:
Wohnort: Raum Wiesbaden

Re: Suche den größten gemeinsamen Teiler zweier zahlen (II) - Re: Suche den größten gemeinsamen Teiler zweier zahlen (II)

Nach oben
       Version: Office 2007

@Sinister,

da stand nichts von schneller sondern nur von kuerzer Smile

_________________
Eine kurze Rueckmeldung waere nett
SL Willi Wipp

(Anleitung fuer das Anhaengen von Dateien: Klicke links auf [www], Gaeste muessen sich dafuer anmelden)
DBKlempner
Datenbank-Klempner ;)


Verfasst am:
08. Jul 2009, 07:49
Rufname:

Re: Suche den größten gemeinsamen Teiler zweier zahlen - Re: Suche den größten gemeinsamen Teiler zweier zahlen

Nach oben
       Version: Office 2007

Willi Wipp - 06. Jul 2009, 12:29 hat folgendes geschrieben:
ich sehe jetzt nicht warum das nicht auch in Excel so funktionieren sollte Wink
Ich auch nicht, ich sehe nur, dass das in Excel überflüssig wäre ;) - Excel hat für kgV und ggT "eingebaute" Funktionen. Das sind zwar Zellfunktionen, aber die lassen sich über die Methode .Worksheetfunctions auch in VBA nutzen.

Edit: es handelt sich dabei um die funktionen "Gcd()" für den ggT (GCD=Greatest common divisor) und "Lcm()" für das kgV (LCM = Lowest common multiple)

Volker

_________________
Linux is like a wigwam: no gates, no windows and an apache inside
-----
Ich beantworte keine ACCESS-Fragen per PN!


Zuletzt bearbeitet von DBKlempner am 08. Jul 2009, 11:35, insgesamt einmal bearbeitet
Sinister
Access-Programmierer


Verfasst am:
08. Jul 2009, 11:25
Rufname:

AW: Suche den größten gemeinsamen Teiler zweier zahlen - AW: Suche den größten gemeinsamen Teiler zweier zahlen

Nach oben
       Version: Office 2007

@ Willi Wipp
Ich nehme an, die Funktion muss auch funktionieren? Bei dir steht eine Division durch 0.

_________________
Warum einfach, wenn es kompliziert geht!?
MAPWARE
Access Profi(l)neurotiker


Verfasst am:
08. Jul 2009, 17:22
Rufname:
Wohnort: Hannover

AW: Suche den größten gemeinsamen Teiler zweier zahlen - AW: Suche den größten gemeinsamen Teiler zweier zahlen

Nach oben
       Version: Office 2007

Hi,

interessant, Willis Variante geht tatsächlich nicht/nie, das ist wirklich einer der Fälle, wo iif() seine Heimtücke zeigt. Insbesondere in einer rekursiven Funktion, wo sich dadurch das Laufzeitverhalten von linear zu exponentiell verändern könnte.

Mal davon ab - kann es sein, dass sich das hier jetzt ein bisschen verselbständigt hat?. Hört VR2008 überhaupt noch zu? Very Happy

_________________
Grüße
Marcus

Wer Controls nicht sinnvoll benennt, wird es später bereuen.
Willi Wipp
Moderator


Verfasst am:
12. Jul 2009, 18:56
Rufname:
Wohnort: Raum Wiesbaden


Re: Suche den größten gemeinsamen Teiler zweier zahlen (III) - Re: Suche den größten gemeinsamen Teiler zweier zahlen (III)

Nach oben
       Version: Office 2007

@Sinister,

Ok ich gebe mich geschlagen Crying or Very sad Die Division durch 0 hatte ich nicht bedacht Confused

_________________
Eine kurze Rueckmeldung waere nett
SL Willi Wipp

(Anleitung fuer das Anhaengen von Dateien: Klicke links auf [www], Gaeste muessen sich dafuer anmelden)
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: Vergleich zweier Tabellen, Ausgabe nicht identischer Werte 13 isabel05 14441 02. Sep 2006, 19:39
isabel05 Vergleich zweier Tabellen, Ausgabe nicht identischer Werte
Keine neuen Beiträge Access Tabellen & Abfragen: Inhalt zweier Tabellen vergleichen 2 Matthes 3741 27. Jul 2006, 07:04
jens05 Inhalt zweier Tabellen vergleichen
Keine neuen Beiträge Access Tabellen & Abfragen: Suche nach dem Stern (*) in einem Textfeld? 3 Lueghi 2370 26. Jun 2006, 16:46
Lueghi Suche nach dem Stern (*) in einem Textfeld?
Keine neuen Beiträge Access Tabellen & Abfragen: zusammenführen zweier tabellen unterschiedlicher struktur 11 invisiblecat 1833 28. Apr 2006, 08:57
Willi Wipp zusammenführen zweier tabellen unterschiedlicher struktur
Keine neuen Beiträge Access Tabellen & Abfragen: + und - Zahlen 0 MiCHi2000 490 28. März 2006, 09:34
MiCHi2000 + und - Zahlen
Keine neuen Beiträge Access Tabellen & Abfragen: Suche nach einer Eingabevariablen in der Select-Zeile 1 neuer Gast 496 21. Feb 2006, 16:17
rita2008 Suche nach einer Eingabevariablen in der Select-Zeile
Keine neuen Beiträge Access Tabellen & Abfragen: Parameterabfrage mit Zahlen 2 friend 912 09. Jan 2006, 21:34
Gast Parameterabfrage mit Zahlen
Keine neuen Beiträge Access Tabellen & Abfragen: mehrere Zahlen in einer Spalte??? 11 FirefighterBM 701 05. Dez 2005, 16:58
Willi Wipp mehrere Zahlen in einer Spalte???
Keine neuen Beiträge Access Tabellen & Abfragen: Suche Strasse, Ort, PLZ Datenbank 0 Snow 3763 01. Sep 2005, 09:18
Snow Suche Strasse, Ort, PLZ Datenbank
Keine neuen Beiträge Access Tabellen & Abfragen: Suche Makroaktion um Tabellenerstellungsabfrage auszuführen 0 Steph@n 582 20. Jul 2005, 16:05
Steph@n Suche Makroaktion um Tabellenerstellungsabfrage auszuführen
Keine neuen Beiträge Access Tabellen & Abfragen: Berechnen auf Grundlage zweier Abfragen 2 anfängerin 710 15. Jun 2005, 08:34
anfängerin Berechnen auf Grundlage zweier Abfragen
Keine neuen Beiträge Access Tabellen & Abfragen: verknüpfung zweier spalten in einer tabelle 4 teja 3796 08. Jun 2005, 09:34
teja verknüpfung zweier spalten in einer tabelle
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: HTML CSS