Mirko danke dir für deine Mühen. Schau mir es gerne an, bin für jede hilfe dankbar weil ich davon null verstehe. Wird aber bestimmt erst Montag, denn morgen wollen in meinem 2.leben 500 Leut beköstigt werden... was tut man nicht alles für die Familie.

Mirko  Das sieht sehr gut aus!  Bin begeistert was man alles machen kann, wenn man Ahnung davon hat.

Ich würde deinen Kalender jedoch nicht direkt für die Planung in der Kalenderwoche nehmen. Bräuchte Ihn als überblick für den ganzen Monat um auf den ersten Blick zu sehen wie die Auslastung ist , bzw. wo noch was zu füllen ist.

Quasi als vollbild nur mit einer Monatsauswahl. 

Mirko hab mal nen Video gemacht, in den Reiter Monatskalender müsste dein geiler html Kalender. (muss nicht unbedingt klickbar sein, denn es hilft schon ungemein wenn ich die Termine für den Monat so ordentlich sehen kann)

Mirko danke dir, so bekomme ich das hin.

Mirko bekomm es doch nicht ganz hin 

wenn Liefertermine über 2 Tage gehen bekomm ich den 2. Tag nicht eingebunden, so das der Termin da im Kalender auftaucht. (ist der erste Tag drin, doch der 2. fehlt)

In Aufträge gibt das Feld: bis Liefertermin (bei mehrtägigen Montagen) den 2. Tag vor. Wie bekomm ich das dem ary im Kalender zugeordnet ?? 

----------------------------------------------------------------------------------------------------

Das ist der Bezug zum 1. Liefertermin

-----------------------------------------------------------------------------------------------------

let kw := record('Aufträge',number('AUSWAHL der ersten angezeigten KW')).week(Liefertermin);
let kw2 := kw + 1;
let kw3 := kw + 2;
let kw4 := kw + 3;
let yr := record('Aufträge',number('AUSWAHL der ersten angezeigten KW')).year(Liefertermin);
let counter := days(date(yr, 1, 1), date(yr, 12, 31)) + 1;
let ary := for i in range(0, counter + 1) do
        if week(date(yr, 1, 1) + i) = kw then
            format(date(yr, 1, 1) + i, "dd - DD.MM.YYYY")
        end
    end;
let ary2 := for i in range(0, counter + 1) do
        if week(date(yr, 1, 1) + i) = kw2 then
            format(date(yr, 1, 1) + i, "dd - DD.MM.YYYY")
        end
    end;
let ary3 := for i in range(0, counter + 1) do
        if week(date(yr, 1, 1) + i) = kw3 then
            format(date(yr, 1, 1) + i, "dd - DD.MM.YYYY")
        end
    end;
let ary4 := for i in range(0, counter + 1) do
        if week(date(yr, 1, 1) + i) = kw4 then
            format(date(yr, 1, 1) + i, "dd - DD.MM.YYYY")
        end
    end;

+

<th>" + item(ary, 0) + "</th>
        <th>" + item(ary, 1) + "</th>
        <th>" + item(ary, 2) + "</th>
        <th>" + item(ary, 3) + "</th>
        <th>" + item(ary, 4) + "</th>
        <th>" + item(ary, 5) + "</th>

+

<td> " + for j in ((select 'Aufträge') order by 'Team wählen')[week(Liefertermin) = kw and weekday(Liefertermin) = 0] do
        j.Wochentag + "<br>"
    end + " </td>
        <td> " + for j in ((select 'Aufträge') order by 'Team wählen')[week(Liefertermin) = kw and weekday(Liefertermin) = 1] do
        j.Wochentag + "<br>"
    end + " </td>
        <td> " + for j in ((select 'Aufträge') order by 'Team wählen')[week(Liefertermin) = kw and weekday(Liefertermin) = 2] do
        j.Wochentag + "<br>"
    end + " </td>
        <td> " + for j in ((select 'Aufträge') order by 'Team wählen')[week(Liefertermin) = kw and weekday(Liefertermin) = 3] do
        j.Wochentag + "<br>"
    end + " </td>
        <td> " + for j in ((select 'Aufträge') order by 'Team wählen')[week(Liefertermin) = kw and weekday(Liefertermin) = 4] do
        j.Wochentag + "<br>"
    end + " </td>
        <td> " + for j in ((select 'Aufträge') order by 'Team wählen')[week(Liefertermin) = kw and weekday(Liefertermin) = 5] do
        j.Wochentag + "<br>"
    end + " </td>

Mirko können auch länger sein, ist aber verdammt selten. könnte man also vernachlässigen. Doch 2 Tage sind sehr oft.  

Mirko Danke Dir wie verrückt für deinen Einsatz. Jetzt sollte alles passen.

Mirko Grüß dich, 

hab dein ersten Kalender mal für einen Dialog missbraucht. Kann man den Teams unterschiedliche Farben zuordnen? 

Team 1 = blau / Team 2 = grün ... so in der art.

Skript: 

let lt := Liefertermin;
let oben := format(date(Liefertermin), "dddd - DD.MM.YYYY");
let content := "
<style>
/*Rahmen zusammenfallend und nur senkrecht*/
table,td,th{
    border:thin solid #000;
    border-collapse:collapse;
    font: lighter 1.2em Arial, serif;
    }
#tabellen-nebeneinander {  
    text-align: left;  
}  

#tabellen-nebeneinander table {  
    display: inline;  
    display: inline-table;  
}
caption{
padding: .5em .5em
}
td{
    padding: .5em .5em;
    font-size:small;
    }
thead,th{
      background-color:rgb(237,162,82);
    padding: .1em .5em;
    font-size:medium;
    text-align:center
    letter-spacing: .5em;
    }

/*Zebrastreifen für Zeilen*/
tr:nth-child(odd) td{ 
      background-color: #e4ebf2; 
      color: #000; 
    }
tr:nth-child(even) td{ 
      background-color: rgb(237,162,82,.3); 
      color: #000; 
    }
</style>
<div id='tabellen-nebeneinander'>  
<table>
    <caption>" + oben + "</caption>
    <thead>
        <tr>
<th> Team </th>
<th> Name </th>
        <th> Planzeit </th>
        <th> Ort </th>
        <th> Von </th>
        </tr>
    </thead>
    <tbody>
        " + ((select 'Aufträge') order by 'Team wählen')[Liefertermin = lt or 'bis Liefertermin (bei mehrtägigen Montagen)' = lt].("
        <tr>

<td> " + 'Team wählen' + " </td><td> " + Name + " </td><td> " + Planzeit + " </td><td> " + Ort + " </td><td> " + Vertragspartner.'Firmen zusatz' + " </td>
        </tr>
        ") + "
    </tbody>
</table>
<table>

</table>
</div>
";
dialog("Team übersicht", content, ["OK"])

Mirko so das die jeweiligen Zeilen (alle spalten) die Team-farbe haben

Mirko dann siehts so aus 

Mirko will einfach nicht so wie bei dir. 

danke dir