Thema Datum  Von Nutzer Rating
Antwort
16.07.2020 11:29:59 Lars
Solved
16.07.2020 12:38:22 Gast18710
NotSolved
16.07.2020 12:48:55 Gast76803
NotSolved
16.07.2020 12:50:45 Gast42948
NotSolved
16.07.2020 12:54:28 *Ähem*
NotSolved
16.07.2020 12:58:04 Gast71655
NotSolved
16.07.2020 19:07:11 Lars
NotSolved
Blau Tage zu Datum addiieren
 19.07.2020 16:47:34 ralf_b
NotSolved

Ansicht des Beitrags:
Von:
ralf_b		 Datum:
19.07.2020 16:47:34		 Views:
575		 Rating:
     
Antwort:
  Ja
Thema:
Tage zu Datum addiieren

du kannst die Eingabe in einer inputbox machen. Mußt dann aber das Datum und die Tageanzahl von einander trennen.

zb. gibst du  10, 1.1.2020 ein dann muß der Text auseinandergenommen werden. Und nicht zuletzt die EIngabe auch auf Fehleingaben geprüft werden. Das geht nicht in einem 2 Zeiler. 

Sub Makro1()

Dim Arr As Variant

Arr = Split(Application.InputBox("Eingabe", ">Tage, Datum< eingeben", Type:=2), ",")
If Arr(0) = "Falsch" Then Exit Sub
MsgBox DateAdd("d", Arr(0), Arr(1))
End Sub

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
16.07.2020 11:29:59 Lars
Solved
16.07.2020 12:38:22 Gast18710
NotSolved
16.07.2020 12:48:55 Gast76803
NotSolved
16.07.2020 12:50:45 Gast42948
NotSolved
16.07.2020 12:54:28 *Ähem*
NotSolved
16.07.2020 12:58:04 Gast71655
NotSolved
16.07.2020 19:07:11 Lars
NotSolved
Blau Tage zu Datum addiieren
 19.07.2020 16:47:34 ralf_b
NotSolved