Lieferstatus aus Bestellübersicht anzeigen und ändern per Maske

[Mike4711]

Hallo Andre,

Mein neues Thema hat nichts mit unserem Projekt hier zu tun.

Dieses benötige ich immer noch :)

Grüße Mike

[schauan]

Hallo Mike,

damit das Speichern funktioniert, muss noch das Blatt davor:

Code:

Private Sub CommandButton1_Click()
  'Bemerkung Speichern
  Sheets("Bestellübersicht").Cells(Me.TextBox5.Tag + 1, 11) = Me.TextBox5.Text
End Sub

Zu der "Hauptbemerkung" fehlt mir jetzt etwas der rote Faden ... Aber die sollte ja in den anderen Thread.

[Mike4711]

Hallo Andre,

speichern klappt prima....vielen Dank. :)

Nur eins ist mir gerade aufgefallen.

In der Maske "Lieferstatus", bei Auswahl Lieferant "Premier Guard" und dann beim öffnen der noch offenen Artikel.
also die er mir in der Combobox3 anzeigen soll, zeigt er zu dieser Bestellung 3 Artikel an.

In meiner Pivottabelle Blatt "Auswertungen", zeigt er aber 4 Artikel an, die noch offen sind.

Diese :

10-3102EU    offen  2


10-3103EU    offen   3

10-3113EU    offen   3

10-3178EU    offen  3

In der Maske Lieferstatus, fehlt der Artikel 10-3102EU

Andere Bestellnummern habe ich noch nicht ausgetestet, ob die richtige Anzahl an Artikeln zu den Bestellnummern in der Maske passen.

Woran könnte das liegen?

Von den Buchungen hier in der Bestellübersicht passt alles und die Pivottabelle holt sich dort die Werte zum anzeigen der offenen Artikeln.

Grüße Mike

[schauan]

Hallo Mike,

ich schaue mir das dann nochmal an. Die Frage hatte ich ja im Beitrag #44 auch schon mal gestellt ... Zu welcher Bestellnummer gehören die denn?

[Mike4711]

Hallo Andre,

diese Artikel gehören zu der Bestellnummer 1407215
und diese müsste 4 (die genannte  Artikel) als noch offen (noch nicht geliefert) anzeigen.

Wie im Blatt "Auswertungen" (Pivottabelle).

Grüß Mike

[schauan]

Hallo Mike,

habe die Ursache gefunden. Das dürfte auch vor meinem "Einstieg" in dieses Thema schon nicht besser funktioniert haben, an der Stelle hab ich nix geändert ...
Im code des userform steht 2x
For i = 2 To UBound(arr1)
Korrekt wäre in beiden Fällen
For i = 1 To UBound(arr1)

[Mike4711]

Hi,

jetzt hol ich z.B. eine Tonne Gehwegplatten ...

35 Stück 50x50x5? Für Deinen Unterwasser-Garten in Gera?
:30:  :32:

Hallo Mike,

habe die Ursache gefunden. Das dürfte auch vor meinem "Einstieg" in dieses Thema schon nicht besser funktioniert haben, an der Stelle hab ich nix geändert ...
Im code des userform steht 2x
     For i = 2 To UBound(arr1)
Korrekt wäre in beiden Fällen
     For i = 1 To UBound(arr1)

im welcher userform?......in der Userform "Lieferstatus" ?  :)

[schauan]

Hallo Mike,

ja.

Habe die Platten (40x40x5, 80 Stück) am Wochenende Verlegt und die Randplatten musste ich auch noch zurechtschneiden. Zuvor haben wir noch 1,8 Tonnen Kies gefahren und ab und zu bin ich mit dem Rüttler drüber. (Nicht zu verwechseln mit dem Rütters oder wie der Hundeprofi heißt

[atilla]

Hallo Mike,

 Das dürfte auch vor meinem "Einstieg" in dieses Thema schon nicht besser funktioniert haben, an der Stelle hab ich nix geändert ...

Hallo Andre,

Da Du meinen Code kopiert und angepasst hast, denke ich solltest Du vor solch einer Aussage erst mal Prüfen ob dem wirklich so ist.

Ich habe in der Tat bei mir folgendes stehn:
For i = 2 To UBound(arr1)

Und das funktioniert natürlich auch richtig!
Weil ich ab A1 einlese und nicht wie Du ab A2!!!

Ich verstehe nicht, warum Du pauschal so eine Aussage treffen kannst.

[atilla]

Hallo Mike,

hier noch einige Empfehlungen, die Du bei Deiner Mappe beachten solltest.

Nimm bei Formeln oder bei Bedingter Formatierung nie ganze Spalten als Bezug!
Du hast z.B selber Namen definiert und als Bezug ganze Spalten genommen. Schau Dir die von mir
definierten Namen an. Mit der Index Formel ist der Bereich dynamisch und umfasst immer nur den benutzten Bereich.

Formatier immer nur benutzte Bereiche und wenn nötig, dann formatier nur so viele Zellen wie unbedingt nötigt.
Das betrifft Zellhintergründe oder z.B. Schriftfarben. Andernfalls wirst Du früher oder später große Performance Probleme bekommen.
Das Arbeiten in der mappe kann sehr träge bis unmöglich werden.

Wenn per Code oder manuell in der Bestellübersicht Filter gesetzt werden, dann sollten sie nach getaner Arbeit wieder entfernt werden.