Projektanfrage

Projektanfrage über Web Formular   per Online-Formular 
Projektanfrage über E-Mail  Diese E-Mail-Adresse ist vor Spambots geschützt! Zur Anzeige muss JavaScript eingeschaltet sein!
Projektanfrage per Telefon  +49 (0)151 / 164 55 914
Projektanfrage weitere Informationen  weitere Informationen 

Sie benötigen Hilfe oder Unter-stützung? Nutzen Sie für Ihre Anfrage unser Online-Formular, senden Sie uns eine Diese E-Mail-Adresse ist vor Spambots geschützt! Zur Anzeige muss JavaScript eingeschaltet sein! oder rufen Sie uns einfach an.

   
      Referenzen 

 Bosch 
  T-Systems
  Hagebau
  Siemens
 Areva  VW
 Haufe-Lexware  British American Tobacco
  nagel group farbe
   
     Programmierung
Excel Auftragsprogrammierung Access Auftragsprogrammierung
Word Auftragsprogrammierung Outlook Auftragsprogrammierung
   
   

Projektanfrage

 Sie benötigen eine Auftragsprogrammierung?
 Oder suchen Unterstützung bei der Lösungs-
 findung?

  Nutzen Sie unser Auftragsformular

  Jetzt anrufen unter 0151 / 164 55 914

 Diese E-Mail-Adresse ist vor Spambots geschützt! Zur Anzeige muss JavaScript eingeschaltet sein! Projektanfrage per Diese E-Mail-Adresse ist vor Spambots geschützt! Zur Anzeige muss JavaScript eingeschaltet sein! senden

  Weitere Informationen

sitepanel question2

P
r
o
j
e
k
t
a
n
f
r
a
g
e
   

Ermittlung des größten gemeinsamen Teilers

In diesem Beispiel sehen Sie ein kleines Tool das in Kombination von Standardfunktionen und VBA den größten gemeinsamen Teiler (ggT) von zwei Zahlen ermittelt.

So funktioniert das Tool:

1. Über die Schaltfläche "GGT-Berechnung aufrufen" wird das Dialogfenster "Ermittlung GGT" aufgerufen

2. In dem Dialogfenster können zwei Zahlen eingetragen werden.

3. Mit einem Klick auf die Schaltfläche Berechnen wird das Ergebnis in einer MessageBox ausgegeben und die erfassten Werte sowie das Ergebnis, also der ggT werden in die Excel-Tabelle fortlaufend eingetragen.

Zur Berechnung des größten gemeinsamen Teilers sowie zur Anzeige der Userform wurde folgender VBA-Code verwendet:

 

Sub Ermittlung_GGT()
'** Ermittlung des größten gemeinsamten Teilers zweier Zahlen

'** Errorhandling
On Error GoTo errorhandling

'** Dimensionierung der Variablen
Dim z1, z2, tmp, erg 'As Long
Dim lngLz As Long

'** vorgaben definieren
Set wsakt = ThisWorkbook.Sheets("Ergebnis")

'** Zahl 1 und 2 auslesen
z1 = frm1.TextBox1.Value
z2 = frm1.TextBox2.Value

'** Eintragen der Werte in das Tabellenblatt
lngLz = wsakt.Cells(Rows.Count, 1).End(xlUp).Row + 1
With wsakt
  .Cells(lngLz, 1).Value = z1
  .Cells(lngLz, 2).Value = z2
  .Cells(lngLz, 3).FormulaLocal = "=GGT(A" & lngLz & ":B" & lngLz & ")"
End With

'** Ergebnis in Msgbox ausgeben
MsgBox "Der ggT von " & z1 & " und " & z2 & " lautet " & wsakt.Cells(lngLz, 3).Value

'** Programm beenden
Exit Sub

'** Fehlerroutine
errorhandling:
Set wsakt = Nothing
MsgBox "Bitte geben Sie gültige Zahlen zur Berechnung des GGT ein!", vbCritical, "Hinweis"

End Sub


Sub Berechnung_Starten()
frm1.Show vbModeless
End Sub

Um den ggT zu berechnen wurde die Standardfunktion =GGT() verwendet, welche über VBA in die entsprechende Zelle eingefügt wurde. Alternativ hätte die Berechnung auch über eine VBA-Funktion erfolgen können.

Das Tool können Sie nachfolgend herunterladen.


   

Relevante Artikel

  • Excel Gewichtsrechner für Briefe / Porto

    Mit Hilfe des Gewichtsrechners für Briefe / Porto können Sie ganz einfach das Gewicht eines Briefs in Excel berechnen. Dazu müssen einfach folgende Parameter vorgegeben werden: 1. Angaben zum...

  • Excel Universal-Kalender

    In diesem Beitrag stellen wir Ihnen den Universal-Kalender vor und geben Ihnen damit die Möglichkeit an die Hand, den Kalender ggf. zu erweitern oder noch besser an Ihre individuellen Bedürfnisse...

  • Suche nach Ländercodes und Ländernamen

    Das folgende kleine Tool enthält alle Ländercodes sowie die deutschen und englischen Ländernamenauf einem separaten Tabellenblatt. Über drei verschiedene Auswahlfelder kann nach Ländern und...

  • Checkliste abhaken

    Aufgabe:Eine Checkliste soll so funktionieren, dass die einzelnen Punkte mit der Maus abgehakt werden können.Demonstration:In der Tabelle stehen in Spalte B die Aufgaben. Links davon befinden...

  • Darlehens- und Annuitätenrechner

    Mit Hilfe des vorgestellten Darlehens- und Annuitätenrechners können Sie Ihre Darlehen ohne Schwierigkeit kalkulieren. Nachdem der Darlehensbetrag, der Zinssatz, die Laufzeit in Jahren sowie eine...