Wert einer Zelle auslesen + in entsprechendes Blatt kopieren :: Office-Hilfe.com - Wir lösen Ihre Probleme mit Microsoft Office

Einloggen, um private Nachrichten zu lesen

Downloads

[Excel 2003] Wert einer Zelle auslesen + in entsprechendes Blatt kopieren

Office-Hilfe.com - Wir lösen Ihre Probleme mit Microsoft Office Foren-Übersicht » Microsoft Excel Hilfe

Autor

Nachricht

Brainz
Newbie
Newbie

Anmeldedatum: 22.11.2007
Beiträge: 11

Verfasst am: 25.01.2008, 13:03

Hallo zusammen!

Ich habe eine Excel Arbeitsmappe mit den Tabellenblättern:

Übersicht, Verantwortlicher1, Verantwortlicher2, Verantwortlicher3, Verantwortlicher4, Verantwortlicher5, Verantwortlicher6 und Hilfstabelle.

In der Hilfstabelle stehen die Werte von 3 Drop-Down-Feldern, die ich über Namen und Liste definiert habe.

In die Übersicht werden nun Arbeitsanweisungen in je eine Zeile eingetragen und der Bearbeiter und der Zuarbeiter über Drop-Down-Boxen ausgewählt.

Nun brauche ich ein Makro, das jede Zeile der Übersicht bis Spalte K kopiert, und je nach Wert in Spalte G und H (Bearbeiter und Zuarbeiter) die Zeile (aber nur bis K) in die entsprechenden Tabellenblätter der Verantwortlichen einfügt.

Also wenn z.B. Wert in G2 = Verantwortlicher 2 dann in Tabellenblatt "Verantwortlicher2" kopieren UND wenn Wert in H2 = "Verantwortlicher1" in das entsprechende Tabellenblatt kopieren.

Dies dient dazu, dass jeder Verantwortliche SEINE Aufgaben in seinem eigenen Tabellenblatt übersichtlich aufgelistet hat.

Ich hoffe Ihr könnt mir dabei helfen!

Vielen Dank im Voraus!

schatzi
Moderator

Anmeldedatum: 09.12.2006
Beiträge: 5725

Verfasst am: 25.01.2008, 13:28

Hallo!

Falls deine Liste nicht allzu umfangreich ist, dann könntest du das auch noch ohne VBA machen.
Schau mal hier.
Wie du siehst, werden alle Zeilen mit "x" (in deinem Fall also "Verantwortlicher2") hübsch untereinander in die Spalte D (in deinem Fall also Blatt "Verantwortlicher2") übernommen.

_________________

Viele Grüße vom Schatzi
------------------------
Ich bin nur noch sporadisch erreichbar!
Bitte hofft nicht auf eine schnelle Beantwortung einer Rückfrage meinerseits!
Jeder andere Helfer darf Rückfragen gerne übernehmen!

Brainz
Newbie
Newbie

Anmeldedatum: 22.11.2007
Beiträge: 11

Verfasst am: 28.01.2008, 09:52

Hmm wenn ich das richtig verstehe wird in dieser Lösung nur der übereinstimmende Begriff kopiert.

Ich benötige allerdings die ganze Zeile in der der Wert steht. Oder besser noch - die ganze Zeile von A - K.

Dies soll dazu dienen, dass jeder Verantwortliche seine EIGENEN Aufgaben in seinem Tabellenblatt ordentlich und übersichtlich aufgelistet hat, damit jeder von ihnen auf einen Blick sieht, was er noch zu tun hat, so dass nichts "übersehen" oder vergessen werden kann.

schatzi
Moderator

Anmeldedatum: 09.12.2006
Beiträge: 5725

Verfasst am: 28.01.2008, 11:23

Hallo!

Welche und wie viele Spalten du übernehmen möchtest, bleibt dir selbst überlassen...
Du musst nur für jede zu übernehmende Spalte die Formel anpassen.

brainz.xls

Beschreibung:

Download

Dateiname:

brainz.xls

Dateigröße:

28.5 KB

Heruntergeladen:

177 mal

schatzi
Moderator

Anmeldedatum: 09.12.2006
Beiträge: 5725

Verfasst am: 28.01.2008, 19:11

Hallo!

Andererseits ist es mit VBA wahrscheinlich wirklich einfacher...
Hier eine Variante über den Spezialfilter und die Definition eines dynamischen Bereichs (siehe dazu auch unter dynamischer Bereichsname)

brainz-1.xls

Beschreibung:

Download

Dateiname:

brainz-1.xls

Dateigröße:

25 KB

Heruntergeladen:

168 mal

Publisher
Newbie
Newbie

Anmeldedatum: 12.02.2008
Beiträge: 2

Verfasst am: 12.02.2008, 20:58

Genau die Funktionalität dieser letzten Beispieldatei (brainz-1) brauche ich. Allerdings muss das Blatt "Übersicht" angepasst werden, d.h. ich benötige eine Menge weiterer Spalten mit Daten. Wie kann ich das bewerkstelligen, so dass die Funktion nicht verloren geht? Ich habe die halbe letzte Nacht herumgetüftelt, aber ohne Erfolg (naja, bin jetzt saumüde) und kenne mich mit Excel (übrigens 2007) gar noch nicht gut aus.

Gruß
Publisher

schatzi
Moderator

Anmeldedatum: 09.12.2006
Beiträge: 5725

Verfasst am: 12.02.2008, 21:14

Hallo!

Dann musst du die entsprechenden Namen und Bereiche im Code auf deine Verhältnisse anpassen:

Private Sub Workbook_SheetActivate(ByVal Sh As Object)
If Sh.Name = "Übersicht" Then Exit Sub
Range("A5:E1000").ClearContents
Range("Liste").AdvancedFilter Action:=xlFilterCopy, _
CriteriaRange:=Range("A1:A2"), CopyToRange:=Range("A5:E5")
End Sub

"Übersicht" ist der Name des Quellblatts. In allen anderen Blättern der Mappe wird der Code ausgeführt, nur nicht hier.
"A5:E1000" ist der Bereich im Zielblatt, in dem du die Daten erwartest.
"Liste" ist ein in der Mappe (bzw. im Blatt "Übersicht") definierter Name. Siehe hierzu das Tutorial dynamischer Bereichsname.
"A1:A2" ist der Kriterienbereich für den Spezialfilter (A1: Spaltenüberschrift, A2: gesuchter Eintrag oder Wert).
"A5:E5" ist der Bereich im Zielblatt, in den die Überschriften kopiert werden sollen.

Mehr kann ich aus der Beschreibung deines Tabellenaufbaus nicht herauslesen...

Publisher
Newbie
Newbie

Anmeldedatum: 12.02.2008
Beiträge: 2

Verfasst am: 13.02.2008, 16:44

Danke! Ich denke, mit diesen Erläuterungen müsste ich weiterkommen.

Was ich möchte:

Ein Werkzeug, mit dem ich aus einem Pool von Mitarbeitenden Teams zusammenstellen kann. Konkret würde das erste Blatt die "Mitarbeiterdaten" enthalten, die weiteren Blätter dann die aufgelisteten Teams. Wer in der Mitarbeiterdatenauflistung also der "Wohngruppe 32" zugeordnet ist, soll im entsprechenden Blatt "Wohngruppe 32" automatisch aufgelistet werden. Das wäre das Grundsätzliche.

Weiter geht es so:
Berechnungen in den generierten Listen, z.B. summierte Mitarbeiterwochenstunden oder die Fachkraftquote;
Sortierung nach Qualifikation, z.B. ganz oben die Fachkräfte, anschließend Hilfskräfte, anschließend Fachschüler, dann die Praktikanten;

Und das wäre die Krönung:
Eine Übersicht über kommende Teamveränderungen. Ideal wäre es, ich könnte die kommenden drei Jahre vorausplanen (Versetzungen, Neueinstellungen) und die jeweiligen Teamkonstellationen abbilden. Auswahl also nicht nur über ein Kriterium, z.B. "Wohngruppe 32", sondern auch z.B. Kriterium "ab Datum". Im Extremfall könnte es auch sein, dass ein MA innerhalb weniger Monate oder auch jährlich das Team wechselt. Das würde also auf Ergebnislisten hinauslaufen im Sinne von: Wer gehört am 01.09.08 zum Team "Wohngruppe 32" - Auflistung; Wer gehört am 01.09.09 zum Team "Wohngruppe 32" - Auflistung daneben usw.

Könnte schon ein wenig komplex sein, was ich mir da vorstelle... Wenn ich es mir recht überlege: die Sortierung wäre unwichtiger wie die Krönung.

Gruß
Publisher

Office-Hilfe.com - Wir lösen Ihre Probleme mit Microsoft Office Foren-Übersicht » Microsoft Excel Hilfe

Thema		Autor	Forum	Antworten	Verfasst am
Ähnliche Beiträge
	2 DIN A4 Seiten zu einer DIN A3 Seite...	screamer	Microsoft Excel Hilfe	0	20.11.2008, 10:54
	Eine Auswahlliste mit Verknüpfung zu ...	anscfz06	Microsoft Excel Hilfe	4	19.11.2008, 22:36
	VBA-Makro: Kalendereintrag kopieren?	SvenZ	Microsoft Outlook Hilfe	9	18.11.2008, 10:16
	Verschiedene Wahlmöglichkeiten in ein...	danini	Microsoft Excel Hilfe	0	13.11.2008, 13:50
	Anzahl an Zeichen abhängig von Wert g...	woerli	Microsoft Excel Hilfe	1	13.11.2008, 13:24

Gehe zu:

Du kannst keine Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum nicht antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum posten
Du kannst Dateien in diesem Forum herunterladen

Powered by phpBB © 2001, 2002 phpBB Group :: FI Theme :: Alle Zeiten sind GMT + 1 Stunde
Deutsche Übersetzung von phpBB.de