Top-Themen

Aktuelle Themen (A bis Z)

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit

Problem mit einer Formel

Mitglied: Uesch

Uesch (Level 1) - Jetzt verbinden

10.01.2007, aktualisiert 11.01.2007, 4339 Aufrufe, 5 Kommentare

Hi zusammen!

Ich suche eine Formel.
Folgende Aufgabenstellung:

Erzeugen sie ein Textfeld, in dem folgender Text erscheinen soll:
Wenn der Wert im Feld "Verleihdatum" länger als 30 Tage zurückliegt, soll erscheinen "seit über 30 Tagen fällig"; liegt der Wert mehr als 60 Tage zurück, soll erscheinen "seit x Tagen überfällig".
In allen anderen Fällen soll das Feld leer bleiben!

Also meine zusammengebastelte Formel lautet wie folgt:
=Wenn(Datum()-[Verleihdatum]>30;Wenn(Datum()-[Verleihdatum]>60;"überfällig seit x Tagen";"überfällig seit 30 Tagen");"")

Soweit so gut! Nur soll anstatt das x eben dann der genaue Abstand der Tage vom Verleihdatum bis zum heutigen Datum erscheinen....
Kann mir dabei jemand nen Denkanstoß verpassen? Die Lösung wäre natürlich auch nicht schlecht

MfG, Uesch


[Edit Biber] Im Juni 2008 immer noch ohne Feedback. Geschlossen. [/Edit]
Mitglied: vip3234
10.01.2007 um 22:09 Uhr
Hallo,

also ich versteh dein Problem nicht ganz; Was genau meinst du mit "anstatt x soll dann der genaue Abstand der Tage stehen " ? In welcher Progammiersprache soll das ganze denn ablaufen ?

Vip
Bitte warten ..
Mitglied: vip3234
10.01.2007 um 22:44 Uhr
In Visual Basic NET sieht das ganze so aus:

Programmcode start ---------------------------------------
'Variable für das Verleihdatum als Datumstyp definieren; Variable für die Ausleihdauer
'als Integer (ganze Zahlen) definieren
Dim verleihdatum As Date
Dim ausleihdauer As Integer

'Der Wert der Variable für das Verleihdatum wird gleich einem Textfeld für die Eingabe des
'Ausleihdatums gesetzt, alternativ auch aus einer Datenbank gelesen etc.
verleihdatum = txtverleihdatum.Text

'Die Differenz zwischen dem Ausleihdatum und der heutigen Datum wird berechnet und die
'Zeitdauer in ganzen Tagen angegeben
ausleihdauer = DateDiff(DateInterval.Day, verleihdatum, System.DateTime.Today)


'Sollte die Ausleihdauer größer 30 Tage sein bekommt das Textfeld txtnachricht einen Wert.
'Ist das nicht der Fall wird das Feld geleert.
If ausleihdauer > 30 Then
txtnachricht.Text = "seit über 30 Tagen fällig"
Else
txtnachricht.Text = ""
End If

'Ist die Ausleihdauer größer als 60 Tage so bekommt das Textfeld einen anderen Wert;
'im anderen Wert kommt die Variable "ausleihdauer" wieder vor und gibt somit den Wert x an
'seit wie vielen Tagen etwas ausgeliehen ist.
If ausleihdauer > 60 Then
txtnachricht.Text = "seit " & ausleihdauer & " Tagen überfällig"
End If

' Das Textfeld hier zu leeren ist nicht nötig, da die If-Anweisung sowieso nur abläuft wenn der Wert
' >30. Andernfalls ist das Textfeld sowieso schon von der oberen If-Anweisung geleert worden

Programmcode ende ---------------------------------------

Alle Zeilen mit einem ` voraus werden von VB NET nicht gelesen, sind also lediglich Kommentare.

Falls benötigt kann ich das Programm auch per eMail zusenden.

VIp
Bitte warten ..
Mitglied: Biber
10.01.2007 um 23:19 Uhr
... oder, wenn Du ganze in die Formel oben pressen willst:

=Wenn(Datum()-[Verleihdatum]>30;Wenn(Datum()-[Verleihdatum]>60;"überfällig seit "& Datum()-[Verleihdatum] & " Tagen";"überfällig seit mehr als 30 Tagen");"")

... wobei ich vip3234's Ansatz auf jeden Fall vorziehen würde.
Denn Einzeiler können immer vergleichsweise wenig Kommentarzeilen verkraften und sind deshalb naturbedingt etwas schlecht les- und wartbar.

Gruß
Biber
Bitte warten ..
Mitglied: bastla
11.01.2007 um 00:12 Uhr
@vip3234

... und wenn Du schon dabei bist, Nachhilfe zu geben, könntest Du vielleich noch ein "Select Case" unterbringen ...

Grüße
bastla
Bitte warten ..
Mitglied: vip3234
11.01.2007 um 00:19 Uhr
@bastla

könnte man. Theoretisch müsste man auch abfragen ob im textfeld txtverleihdatum.text auch wirklich ein Datum drin steht, damits keinen Typenkonflikt gibt.

Von daher kann man das immer noch erweitern. Aber so ist es eben recht einfach und zweckmäßig. Allerdings ist ja auch noch nicht klar, wie das ganze programmiert werden soll oder ob das nur ein Gedankenexperiment ist etc....
Bitte warten ..
Ähnliche Inhalte
Microsoft Office
Excel-Formel-Problem
gelöst Frage von MiStMicrosoft Office2 Kommentare

Guten Morgen Excel-Interessierte, ich sitzte gerade vor einem kleinem Excel-Problem. Ich hoffe mir kann jemand helfen. Hier mein Problem: ...

Entwicklung
VBA wenn Formel
Frage von TheSB891Entwicklung1 Kommentar

Hallo Zusammen Ich hab da ein kleines Problem und finde leider keine Lösung. Ich habe eine Tabelle die ich ...

Windows 8

Excel: Ergebnis einer Formel als Wert in andere Formel verrechnen

Frage von missmurphyWindows 89 Kommentare

Hallo zusammen, ich sitze an einer 2 blättrigen Excel Datei mit einer Budgetübersicht auf dem einen und der Belegliste ...

Microsoft Office

Excel 2000: Einzelteile der Formel funktionieren, gesamte Formel nicht

Frage von NickMcNaimMicrosoft Office9 Kommentare

Hallo zusammen! Ich kann auf der Arbeit nur Excel 2000 nutzen und versuche folgende Formel zum Laufen zu bekommen: ...

Neue Wissensbeiträge
Windows 10
Zero-Day-Lücke in Microsoft Edge
Information von kgborn vor 1 TagWindows 10

In Microsofts Edge-Browser klafft wohl eine nicht geschlossene (0-Day) Sicherheitslücke im Just In Time Compiler (JIT Compiler) für Javascript. ...

Sicherheit
Microsoft und Skype: Sicherheit
Information von kgborn vor 1 TagSicherheit

Die Tage gab es ja einige Berichte zur Sicherheit des Skype-Updaters. Der Updater von Skype läuft unter dem Konto ...

Datenschutz

Behörden ignorieren Sicherheitsbedenken gegenüber Windows 10

Information von Penny.Cilin vor 2 TagenDatenschutz8 Kommentare

Hallo, passend zum Thema Ablösung LIMUX in München ein Beitrag bei Heise (siehe Link folgend). Behörden ignorieren Sicherheitsbedenken gegenüber ...

Sicherheit
Information Security Hub Munich airport
Information von brammer vor 2 TagenSicherheit

Hallo, Neues Center für Cyber Kriminalität am Münchener Flughafen brammer

Heiß diskutierte Inhalte
DSL, VDSL
Mindestgeschwindigkeiten DSL Telekom
Frage von justlukasDSL, VDSL13 Kommentare

Hallo zusammen, Seit diesem Jahr habe ich Verständnisprobleme mit dem Verhalten der Telekom. Wir haben seit einem Jahr VDSL ...

Switche und Hubs
LANCOM-Switch: Probleme (no link) mit SFP-Modulen?
Frage von THETOBSwitche und Hubs10 Kommentare

Hi zusammen, ich habe folgendes Problem: Und zwar habe ich an einem Standort drei Switche verbaut - LANCOM GS-2326P+, ...

Debian
Wie finde ich den betroffenen user
Frage von ProtectedDebian8 Kommentare

Hallo, Wie kann ich den User finden der dies verursacht hat? Betriebsystem ist Debian 7 your Server/Customer with the ...

Firewall
RB2011 Firewall Rule eine bestimmte Mac oder IP Adresse nicht zu blockieren
Frage von lightmanFirewall8 Kommentare

Hallo liebes Forum mit ihren Spezialisten. Ich habe meine Firewall so konfiguriert das kein Endgerät ohne meine Speziellen Erlaubnis ...