Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Daten in Exceltabelle spezifisch aktualisieren
zurück: Fenster immer im Vordergrund weiter: Len() Frage Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Offen Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
Rogi
Neuling


Verfasst am:
23. Jan 2009, 12:54
Rufname: Rogi
Wohnort: Oberland


Daten in Exceltabelle spezifisch aktualisieren - Daten in Exceltabelle spezifisch aktualisieren

Nach oben
       Version: Office 2003

Hallo Excel `ler

Habe eine Situation, wo ich nicht genau weiss wie lösen.
Situation:
Habe eine Exceldatei mit einer Tabelle als Übersicht (1Übersichtstabelle),
und mehrere Tabellen mit Daten zu Projekten. (1Tabelle = 1Projekt)

Wenn ich in einer der Projekttabellen die Zell Start mit einem x versehe,
schreibt diejenige Projekttabellen in die Übersichtstabelle einen Eintrag.
Die Übersichtstabelle aktualisiert die übertragenen Werte solange,
bis in der Projekttabellen die Zelle End mit einem x versehen wird.

Wenn ich in einer der Projekttabellen die Zell Start mit einem x versehe,
schreibt diejenige Projekttabellen in die Übersichtstabelle einen NEUEN Eintrag.
Die Übersichtstabelle aktualisiert die übertragenen Werte solange,
bis in der Projekttabellen wieder die Zelle End mit einem x versehen wird.

Der alte Eintrag in der 1Übersichtstabelle bleibt immer stehen,
wird als nicht gelöscht, nur ein neuer wird eröffnet.
Mann muss wahrscheinlich mit ID arbeiten.


Habe mich mal dem Code versucht, bin aber nicht so weit gekommen!


Sub daten_anhaengen()

' Funktion Daten sammeln und an bestehende Tabelle anhängen

Dim FreieZelle As Integer
Dim wDatum
Dim wH1
Dim wH2
Dim wA
Dim wK
Dim wN
Dim wAe
Dim wAu
Dim wSpr1
Dim wSpr2
Dim wSpr3
Dim wSt
Dim wBem

' Quelldaten zellweise einsammeln
wDatum = Sheets("Quelldatei").Cells(1, 7)
wH1 = Sheets("Quelldatei").Cells(44, 9)
wH2 = Sheets("Quelldatei").Cells(44, 13)
wA = Sheets("Quelldatei").Cells(3, 2)
wK = Sheets("Quelldatei").Cells(5, 2)
wN = Sheets("Quelldatei").Cells(7, 7)
wAe = Sheets("Quelldatei").Cells(7, 9)
wAu = Sheets("Quelldatei").Cells(7, 11)
wSpr1 = Sheets("Quelldatei").Cells(7, 13)
wSpr2 = Sheets("Quelldatei").Cells(7, 14)
wSpr3 = Sheets("Quelldatei").Cells(7, 15)
wSt = Sheets("Quelldatei").Cells(44, 6)
wBem = Sheets("Quelldatei").Cells(3, 7)

' freie Zeile finden
FreieZelle = Cells(65000, 1).End(xlUp).Offset(1, 0).Row

' Daten eintragen, fortlaufende Nummer
Cells(FreieZelle, 1) = FreieZelle - 1

' Daten eintragen, Datum, Zeit, weitere Werte
Cells(FreieZelle, 2) = wDatum
Cells(FreieZelle, 3) = wA
Cells(FreieZelle, 4) = wK
Cells(FreieZelle, 5) = wN
Cells(FreieZelle, 6) = wAe
Cells(FreieZelle, 7) = wH1
Cells(FreieZelle, 8) = wH2
Cells(FreieZelle, 9) = wSt
Cells(FreieZelle, 10) = wBem
Cells(FreieZelle, 11) = wSpr1
Cells(FreieZelle, 12) = wSpr2
Cells(FreieZelle, 13) = wSpr3
Cells(FreieZelle, 14) = wAu


End Sub




Merci für Euren Tipp & Hilfe
Rogi
Neues Thema eröffnen   Neue Antwort erstellen Alle Zeiten sind
GMT + 1 Stunde

Diese Seite Freunden empfehlen

Seite 1 von 1
Gehe zu:  
Du kannst Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum 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 nicht posten
Du kannst Dateien in diesem Forum herunterladen

Verwandte Themen
Forum / Themen   Antworten   Autor   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Excel Formeln: Daten vergleichen 8 Meli0 1623 29. Aug 2005, 11:24
Mich_gibt_es_nicht_mehr Daten vergleichen
Keine neuen Beiträge Excel Formeln: Daten in einer Übersicht zusammenfassen 8 totaler anfänger 1517 26. Aug 2005, 20:50
fl618 Daten in einer Übersicht zusammenfassen
Keine neuen Beiträge Excel Formeln: doppelte daten suchen 2 chrispx 1428 26. Aug 2005, 09:27
chrispx doppelte daten suchen
Keine neuen Beiträge Excel Formeln: Formel nur benutzen wenn Daten im bestimmten Feld vorhanden. 1 Nemi 1831 22. Aug 2005, 13:27
fridgenep Formel nur benutzen wenn Daten im bestimmten Feld vorhanden.
Keine neuen Beiträge Excel Formeln: Daten zusammenf�hren 2 Gast 708 16. Jun 2005, 15:44
Gast Daten zusammenf�hren
Keine neuen Beiträge Excel Formeln: Verkn�pfung Daten aktualisieren 0 Steffi1976 1039 30. Mai 2005, 16:22
Steffi1976 Verkn�pfung Daten aktualisieren
Keine neuen Beiträge Excel Formeln: Excel: Daten aus Spalte A in B übernehmen 2 cabot 1312 24. Mai 2005, 13:47
cabot Excel: Daten aus Spalte A in B übernehmen
Keine neuen Beiträge Excel Formeln: Beim Import von Daten automatisch zusammenzählen 8 Schoki 1146 20. Apr 2005, 09:52
Schoki Beim Import von Daten automatisch zusammenzählen
Keine neuen Beiträge Excel Formeln: Liste nach Daten aus einem Feld sortieren 5 thomas34 1221 05. Apr 2005, 10:44
thomas34 Liste nach Daten aus einem Feld sortieren
Keine neuen Beiträge Excel Formeln: FRAGE:daten in ein andres Tabellenblatt übernehmen?register? 1 maniwahn 1630 18. März 2005, 19:21
Hübi FRAGE:daten in ein andres Tabellenblatt übernehmen?register?
Keine neuen Beiträge Excel Formeln: Datum in Zelle aktualisieren 2 Gast 1436 07. März 2005, 00:43
ae Datum in Zelle aktualisieren
Keine neuen Beiträge Excel Formeln: daten sortieren 8 Gast 2141 10. Feb 2005, 15:00
Andy Knecht daten sortieren
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: Word VBA