16.11.2018, 09:33
16.11.2018, 09:56
ich Kriegs nicht hin, kann jemand code eintragen.
Vielen Dank
Vielen Dank
17.11.2018, 16:43
Hallo Pirat,
was bekommst Du nicht hin? Ich hab jetzt schon etwas den Faden verloren … Der Hinweis von Frogger war ja eine Funktion, eventuell sollst Du die im Tabellenblatt direkt verwenden und nicht im code?
was bekommst Du nicht hin? Ich hab jetzt schon etwas den Faden verloren … Der Hinweis von Frogger war ja eine Funktion, eventuell sollst Du die im Tabellenblatt direkt verwenden und nicht im code?
19.11.2018, 12:39
Hallo Schauan,
ich suche doch meine Daten in in der Tabelle mit hilfe von Makro und bekomme die Daten in eine ListBox angezeigt, dann gebe ich die Daten per CommandButton in eine neue Exceltabelle aus, bei der Ausgabe erschein jetzt bereits das Ausgabedatum aber wenn es an einen Tag mehrer Anforderungen gibt dann ist es sehr unübersichtlich, deswegen will ich das parallel zum Datum auch eine Fortlaufede nummer erschein bezogen aber auf das datum:
BSP:
Bsp. Am 19.11.2018 werden 3 Unterschiedlichen Material Anforderungen gestellt
Anforderung 1 --> 5 Materialien
Anforderung 2 --> 10 Materialien
Anforderung 3 --> 15 Materialien
Dann kommt in Zelle 54 bei alle Materialien 16.11.2018 und z.b Zelle 55
bei 5 Materialien 1
bei 10 Materialien 2
bei 15 Materialien 3
also einfach fortlaufende Nummer, wenn jetzt am 20.11.2018 neue Anforderungen kommen, dann kommt als Datum 20.11.2018 aber die Fortlaufende Nummer beginnt von vorne
Bsp. Am 20.11.2018 werden 3 Unterschiedlichen Material Anforderungen gestellt
Anforderung 1 --> 5 Materialien
Anforderung 2 --> 10 Materialien
Anforderung 3 --> 15 Materialien
Dann kommt in Zelle 54 bei alle Materialien 20.11.2018 und z.b Zelle 55
bei 5 Materialien 1
bei 10 Materialien 2
bei 15 Materialien 3
Ich hoffe es ist verständlich
hier noch der Code für CommandButton
ich suche doch meine Daten in in der Tabelle mit hilfe von Makro und bekomme die Daten in eine ListBox angezeigt, dann gebe ich die Daten per CommandButton in eine neue Exceltabelle aus, bei der Ausgabe erschein jetzt bereits das Ausgabedatum aber wenn es an einen Tag mehrer Anforderungen gibt dann ist es sehr unübersichtlich, deswegen will ich das parallel zum Datum auch eine Fortlaufede nummer erschein bezogen aber auf das datum:
BSP:
Bsp. Am 19.11.2018 werden 3 Unterschiedlichen Material Anforderungen gestellt
Anforderung 1 --> 5 Materialien
Anforderung 2 --> 10 Materialien
Anforderung 3 --> 15 Materialien
Dann kommt in Zelle 54 bei alle Materialien 16.11.2018 und z.b Zelle 55
bei 5 Materialien 1
bei 10 Materialien 2
bei 15 Materialien 3
also einfach fortlaufende Nummer, wenn jetzt am 20.11.2018 neue Anforderungen kommen, dann kommt als Datum 20.11.2018 aber die Fortlaufende Nummer beginnt von vorne
Bsp. Am 20.11.2018 werden 3 Unterschiedlichen Material Anforderungen gestellt
Anforderung 1 --> 5 Materialien
Anforderung 2 --> 10 Materialien
Anforderung 3 --> 15 Materialien
Dann kommt in Zelle 54 bei alle Materialien 20.11.2018 und z.b Zelle 55
bei 5 Materialien 1
bei 10 Materialien 2
bei 15 Materialien 3
Ich hoffe es ist verständlich
hier noch der Code für CommandButton
Code:
Dim iCounter, xCounter As Long
Set wkb1 = ThisWorkbook
Set wkb2 = Workbooks.Add(1)
Set wks2 = wkb2.Sheets(1)
wkb1.Activate
For iCounter = 0 To ListBox1.ListCount - 1
If ListBox1.Selected(iCounter) And xOpt = 1 Or xOpt = 2 Then
Set XBlatt = Sheets(ListBox1.List(iCounter, 0))
XZeile = Range(ListBox1.List(iCounter, 1)).Row
XBlatt.Cells(XZeile, 54).Value = Date
xCounter = xCounter + 1
XBlatt.Range("G" & XZeile & ",H" & XZeile & ",K" & XZeile & ",R" & XZeile & ",S" & XZeile & ",T" & XZeile & ",AJ" & XZeile & ",AK" & XZeile & ",AL" & XZeile & ",AU" & XZeile & ",AV" & XZeile & "").Copy wks2.Cells(xCounter, 1)
End If
Next iCounter
wks2.Activate19.11.2018, 13:56
Hallo Pirat,
dann meinte Frogger bestimmt etwas in der Art:
Du könntest die Spalte C auch per Code mit der Formel füllen und anschließend mit Kopieren und Werte einfügen die Formeln entfernen, auch im Makro.
dann meinte Frogger bestimmt etwas in der Art:
| Arbeitsblatt mit dem Namen 'Tabelle1' | |||
| A | B | C | |
| 1 | 12. Jan | Materia1 | 1 |
| 2 | 12. Jan | Materia2 | 2 |
| 3 | 13. Jan | Materia3 | 1 |
| 4 | 14. Jan | Materia4 | 1 |
| 5 | 14. Jan | Materia5 | 2 |
| 6 | 14. Jan | Materia6 | 3 |
| 7 | 15. Jan | Materia7 | 1 |
| Zelle | Formel |
| C1 | =ZÄHLENWENN($A$1:A1;A1) |
| C2 | =ZÄHLENWENN($A$1:A2;A2) |
| C3 | =ZÄHLENWENN($A$1:A3;A3) |
| C4 | =ZÄHLENWENN($A$1:A4;A4) |
| C5 | =ZÄHLENWENN($A$1:A5;A5) |
| C6 | =ZÄHLENWENN($A$1:A6;A6) |
| C7 | =ZÄHLENWENN($A$1:A7;A7) |
| Verwendete Systemkomponenten: [Windows (32-bit) NT 10.00] MS Excel 2016 |
| Diese Tabelle wurde mit Tab2Html (v2.6.0) erstellt. ©Gerd alias Bamberg |
Du könntest die Spalte C auch per Code mit der Formel füllen und anschließend mit Kopieren und Werte einfügen die Formeln entfernen, auch im Makro.
19.11.2018, 15:42
das Problem ist es kann sein, das am jetzt am 19.11.2018 ---> bei eine Anfrage 5 Materialien angefordert werden, jede material ist ja in der separaten Zeile.
Mit der Formel in Degenblatt bekomme ich halt bei jeder Position laufende Nummer
[
Bild bitte so als Datei hochladen: Klick mich!
]
Aber wenn ich alle Materialien auf einmal anfordere soll bei allen 5 eine 1 erscheinen
Mit der Formel in Degenblatt bekomme ich halt bei jeder Position laufende Nummer
[
Bild bitte so als Datei hochladen: Klick mich!
]
Aber wenn ich alle Materialien auf einmal anfordere soll bei allen 5 eine 1 erscheinen
19.11.2018, 16:02
Hallöchen,
dann musst Du aber irgendwo eine andere Spalte haben, anhand der man verschiedene Anforderungen auseinander halten kann, z.B. eine Bestellnummer o.ä.?
dann musst Du aber irgendwo eine andere Spalte haben, anhand der man verschiedene Anforderungen auseinander halten kann, z.B. eine Bestellnummer o.ä.?
19.11.2018, 21:52
die Anforderung wird aus der listbox erstellt --> in der Listbox kann ich entweder benötigtes Material markieren oder alles was angezeigt wird ausgeben, mehr Gemeinsamkeiten gibt es nicht.
Ich dachte, daß bei der Ausgabe der Daten, gleich mit den Datum, die Aufgaben gezählt werden könne, sprich wie of am tag x das CommandButton benutzt wurde und diese ergebinis in Collums x anzeigen lassen.
Kann man für sowas code erstellen?
Ich dachte, daß bei der Ausgabe der Daten, gleich mit den Datum, die Aufgaben gezählt werden könne, sprich wie of am tag x das CommandButton benutzt wurde und diese ergebinis in Collums x anzeigen lassen.
Kann man für sowas code erstellen?
19.11.2018, 22:17
Hallöchen,
dann könntest Du vor der Eintragung / der Schleife schauen, was in der Nummernspalte das Maximum ist, zählst 1 dazu und trägst das Ergebnis dann innerhalb der Schleife in die Zellen ein.
Das maximum z.B. der Spalte c würdest Du so rausbekommen:
WorksheetFunction.Max(xBlatt.Range("c:c"))
dann könntest Du vor der Eintragung / der Schleife schauen, was in der Nummernspalte das Maximum ist, zählst 1 dazu und trägst das Ergebnis dann innerhalb der Schleife in die Zellen ein.
Das maximum z.B. der Spalte c würdest Du so rausbekommen:
WorksheetFunction.Max(xBlatt.Range("c:c"))
19.11.2018, 22:32
das verstehe ich nicht ganz, sorry