Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
676to680
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
676to680
676to680
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Dringend!!!! - VBA Problem - Bitte Hilfe

Dringend!!!! - VBA Problem - Bitte Hilfe
07.10.2005 03:50:17
Tom
Hallo habe folgendes Problem:
https://www.herber.de/bbs/user/27282.xls
Eine Liste soll umsortiert werden. In der Mappe IST ist mein aktueller Zustand.
Die Liste soll am Ende durch ein Makro aussehen wie die SOLL Mappe. Die Umsortierung kann auch in der gleichen Mappe erfolgen - ganz egal.(Die beiden Mappen in meinem Sheet sind nur zur Verdeutlichung!)
Das Makro soll also...
- die Werte fuer jeden Kunden pro Produkt zusammenzaehlen und den Kunden dann nur noch einmal je Produkt mit der Gesamtsumme auffuehren.
- Den Kunde XYZ bei jedem Produkt immer als erstes auffuehren.
- Die Kunden, die bei gewissen Produkten nicht vorkommen auch bei den jeweiligen Produkten nicht auffuehren. (Es soll also nicht beispielsweise ABC=0 dastehen)
Herzlichen Dank an die VBA und Makro Experten.
Es ist wirklcih dringend und von daher bin ich fuer jeden Rat dankbar!!!!
Gruesse
Tom

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Dringend!!!! - VBA Problem - Bitte Hilfe
07.10.2005 06:13:18
Hajo_Zi
Hallo Tom,
vielleicht geht es auch ohne VBA. Pivottabelle. Ich habe mich mal an Deine Beschreibung gehalten.
Bitte keine Mail, Probleme sollten im Forum gelöst werden.
Microsoft MVP für Excel
Das Forum lebt auch von den Rückmeldungen.
Betriebssystem XP Home SP2 und Excel Version 2003 SP1.


AW: Dringend!!!! - VBA Problem - Bitte Hilfe
07.10.2005 07:08:18
Tom
Hallo Hajo,
hm, mir waere ein Makro schon ganz recht, da die Werte danach genauso in eine andere Tabelle kopiert werden, wo sie dann weiterverarbeitet werden.
Weisst du oder auch jemand anderes wie so ein Makro aussehen muesste?
LG
TOM
Anzeige
AW: Dringend!!!! - VBA Problem - Bitte Hilfe
07.10.2005 11:24:17
GeorgK
Hallo Tom,
ich hab mal was ähnliches gebraucht und Dir mal etwas angepasst. Vielleicht kannst Du damit etwas anfangen.
Voraussetzung ist, dass in der Isttabelle das Produkt in A in jeder Zelle steht. Da Deine Kunden bei verschiedenen Produkten vorkommen ist sonst keine Zuordnung möglich.
Mein Makro ist sicherlich nicht das optimale - da reichen meine Kenntnisse nicht für aus - aber probiers aus. In der Solltabelle dürfen in den Spalten G-I keine Daten stehen.
Na dann, hier das Makro:

Sub Summe_finden()
Application.ScreenUpdating = False
Sheets("Ist").Select
Cells.Copy
Sheets("Soll").Select
Cells.Select
ActiveSheet.Paste
[G2:G200].FormulaR1C1 = "=IF(RC[-6]="""","""",RC[-6]&RC[-5])"
Range("i1:i" & [G1].CurrentRegion.Rows.Count).Formula = "=IF(RC[-8]="""","""",SUMIF(C2,RC[-7],C3))"
'Formel als Wert ersetzen
Selection.Copy
Selection.PasteSpecial Paste:=xlValues
Application.CutCopyMode = False
'Doppelte Zeilen löschen
[G2].Activate
Do Until ActiveCell = ""
If ActiveCell = ActiveCell.Offset(1) Then
ActiveCell.EntireRow.Delete
Else
ActiveCell.Offset(1, 0).Activate
End If
Loop
'Einzelwerte löschen
Range("H2:H" & [G2].CurrentRegion.Rows.Count).Delete
[C1].Copy
[H1].Select
ActiveSheet.Paste
Columns("H:H").Copy
Columns("C:C").PasteSpecial (xlPasteValues)
Columns("G:I").Delete Shift:=xlToLeft
[J1].Select
Application.ScreenUpdating = True
End Sub

Grüße
Georg
Anzeige
AW: Dringend!!!! - VBA Problem - Bitte Hilfe
07.10.2005 06:30:35
Tom
Hallo Hajo,
hm, mir waere ein Makro schon ganz recht, da die Werte danach genauso in eine andere Tabelle kopiert werden, wo sie dann weiterverarbeitet werden.
Weisst du oder auch jemand anderes wie so ein Makro aussehen muesste?
LG
TOM

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige