Re: in VBA gehts vielleicht
24.01.2003 11:40:25
Panicman
Hallo Rüdiger,das ganze hier grenzt ja schon fast an Auftragsprogrammierung :-))
>"die datei mit der auswertung enthält doch ein leeres tabellenblatt auf dem dann das makro gefahren wird, oder?"
NEIN in der Ersten Zeile Stehen die Überschriften A=Auftragsart B=Anzahl Aufträge C=Kosten pro Auftrgasart
Ab A2 bis A??? must du manuell ALLE verschiedenen Auftragsarten eingeben.
>"die auftragsarten stehen in auftragsart.xls, spalte a2 bis a1604 (kann aber sein dass mehr aufträge dazu kommen), die dazugehörigen auftragsnummern sind in der gleichen datei in spalte c2 bis c1604."
OK, das Makro sucht in der Tabelle die letzte benutzte Zelle in Spalte A. Es ist also egal ob dort welche dazukommen.
>"in der datei mit den kosten stehen die auftragsnummern in spalte d2 bis d1753 (können mehr zeilen sein und kann auch grösser werden) die dazugehörigen kosten stehen in der gleichen datei in spalte i2 bis i1753."
Das war in deinem 1. Beispiel anders. Jetzt mußt du den Sverweis )Vlookup anpassen:
K = Application.WorksheetFunction.VLookup(ANR, WKSNr.Worksheets("Tabelle2").Range("D:I"), 6, False)
>"wo starte ich das makro in der auswertungsdatei"
Das Makro startest du Menuleiste EXTRAS/Makro/Makro auswählen und auf ausführen drücken
>"und wo kommen die zeilen und spaltenbeschriftungen hin. also wo sage ich dass genau in diese zelle der wert soll und die nächste zelle der nächste wert usw."
Der Syntax für die Zellen in VBA ist Cells(Nr_Zeile, Nr_Spalte) z.B. Zelle C8 = Cells(8, 3)
Die Gesamtkosten werden in der Auswertungs.xls in Spalte C geschrieben wenn du das anders haben willst muß du die Zeile
WKSAusw.Sheets("Tabelle3").Cells(I1, 3) = GK anpassen, wobei I1 ein Zähler ist also nur , 3 anpassen
Die Anzahl_Aufträge werden in der Auswertungs.xls in Spalte B geschrieben wenn du das anders haben willst muß du die Zeile
WKSAusw.Sheets("Tabelle3").Cells(I1, 2) = AZAA anpassen, wobei I1 ein Zähler ist also nur , 2 anpassen
Ich hoffe ich konnte dir das alles verständlich machen
Gruß
Holger