Die Seite der Kursteilnehmer

>>> EXCEL

Funktion für eigene 5-er Rundung

Uebungsdateien aus den Kursen Mai & Juni 2003

Public Function FUENF(zahl As Single)
FUENF = Int(zahl * 20 + 0.5) / 20
End Function

Dieser Code unter:
EXTRAS / MAKRO / VISUAL BASIC EDITOR /
in einem Modul als neue Funktion einfügen

SIEHE: GENAUER VORGANG ALS PDF-DATEI

Aufruf der Funktion: =FUENF(Zelle od. Zahl)

Buchhaltung Zeit- und Datumsrechnen Dateiname muster_05_03.zip
neu neu neu neu neu neu neu aus dem Kurs Herbst 07 Ferienplanung für 2007 Dateiname ferienpl_07.zip
SVERWEIS Dateiname sverweis.zip Aufgaben und Lösung

Ein Makro mit einer ja nein Abfrage unterbrechen und 2 Möglichkeiten zulassen ( Nein als Vorgabe ).

Sub Abfrage()

Const Mldg = "Soll die Tafel gelöscht werden"
Const Stil = vbYesNo + vbCritical + vbDefaultButton2
Const Titel = "Löschen bestätigen"
Dim Ergebnis As Integer

Ergebnis = MsgBox(Mldg, Stil, Titel)
If Ergebnis = vbYes Then
    Range("C5:D17,F5:G17,I5:J17,L5:M17").Select
    Range("L5").Activate
    Selection.ClearContents
Else
    Exit Sub
End If

End Sub

so sieht das Resultat aus

rot sind die Befehle die ausgeführt werden wenn ja gedrückt wird.
(z.B. aufgezeichnetes Makro)

blau ist der Befehl die Routine zu verlassen

Formel für eine 5er Rundung bei Beträgen:

Uebungsdateien aus dem Kurs Januar 2003

*=RUNDEN(Zahl20;0)/20**	oder
*=GANZZAHL(Zahl20+0.5)/20**
z.B. SFr. 45.43 wird gerundet auf SFr. 45.45

Dateiname: excel_1_03.zip

Lagerverwaltung und Beispiel für eine Anwendung der Funktion WENN()

Übungsdateien aus den Herdt Unterlagen

Im Kurs erstellte Übungsdateien Kurs 2002

uebung_ex_1.zip Übungsdateien im ZIP-Format	67kb
ergebnis_ex_1.zip Lösungsdateien im ZIP-Format	82kb

beisp_2.zip
enthält folgende Dateien:

Jasstafel
Pivottabelle
Diagramme
Adressen im Textformat für Importübung
2 Aufgabendateien

24kb