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 Anfrageformular

  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

  • 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...

  • xls-Bankleitzahlen Verzeichnis

    Das xls-Bankleitzahlen Verzeichnis basiert auf den jeweils aktuellen öffentlichen Bankleitzahlen, die von der Deutschen Bundesbank veröffentlicht werden. Das Excel-Tool beinhaltet eine Suchfunktion, über die...

  • Kurze URL erzeugen (Tiny URL)

    Unter einem Kurz-URL-Dienst oder Tiny-URL-Dienst versteht man einen Dienst, der die Erstellung von Weiterleitungs-URLs auf andere URLs erlaubt, die idealerweise aus möglichst kurzen Zeichenketten...

  • xls-Konverter zur Umrechnung von bis zu 660 Maßeinheiten

    Der xls-Konverter ist ein Excel-Programm, mit dem sehr viele Maßeinheiten ganz einfach umgerechnet werden können. Im Internet stehen zwar verschiedene Online-Tools zur Verfügung wie beispielsweise...

  • Excel-Soccer 2012 zur Fußball EM

    So, nun ist es wieder soweit. Ich freue mich, dass ich an dieser Stelle den neuen Excel-Soccer 2012 vorstellen darf, der seit gestern zur Verfügung steht.{phocagallery...