Feste Bezüge für gesamtes Tabellenblatt

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Hallo Ralf,
"...Da ich die Struktur Deiner Tabellen nicht kenne gehe ich mal davon aus, dass in Spalte A der Zieltabelle alle Werte von Spalte A der Quelltabelle übernommen werden sollen (für alle Zeilen). Das Gleiche gilt für die Spalten B, C, D...."
Das hast Du schon mal richtig erkannt!
"...Warum benutzt Du keine Mischbezüge?..."
Hierzu muß ich etwas ausholen. In der "Zielarbeitsmappe" ist nicht nur die "Zieltabelle", sondern es befinden sich noch andere Arbeitsblätter darin. Die "Zieltabelle" benötige ich auch nur, weil die darin enthaltenen Daten als Grundlage für die Auswahlpunkte für ein Formularobjekt (Listenfeld) dienen. Würde ich direkt als Eingabebereich die Zellbereiche in der "Quellarbeitsmappe" und der darin enthaltenen "Quelltabelle" angeben, würde nach dem Öffnen der "Zielarbeitsmappe" und dem Aktualisieren der Verknüpfungen zu den externen Arbeitsmappen ein leeres Listenfeld erscheinen (das habe ich schon probiert!). Die Zieltabelle dient also quasi nur als "Transfertabelle".
Nun ist der Sachverhalt so:
Die "Quelltabelle" in der "Quellarbeitsmappe" (unserer Lieferantenübersicht) wird von mir aktualisiert. Die "Zielarbeitsmappe" mit der "Zieltabelle ist ein s. g. Beschaffungsantrag. Der Mitarbeiter füllt diesen aus und sendet die Datei dann per e-Mail an mich.
Ich importiere alle eingegebenen Daten in eine weitere Arbeitsmappe, die zur Verarbeitung der mir zugesandten Daten dient.
Wenn ein neuer Lieferant (nicht aus dem Listenfeld ausgewählt, sondern Name, Anschrift, Telefon, Fax, ... in speziell dafür vorgesehenen Extra-Zeilen eingetragen) im Beschaffungsantrag eingetragen wurde, so wird dieser mittels eines Makros in die Lieferantenübersicht eingepflegt.
Es werden dabei die Lieferantenübersicht geöffnet, eine neue leere Zeile eingefügt, die Daten (Lieferanten-Nr., Firmenname, Anschrift, Ansprechpartner, Telefon, ...) von links nach rechts in die Zellen der leeren Zeile eingefügt, der Bereich mit dem Namen "Lieferanten" markiert und nach dem Lieferantennamen sortiert.
Jetzt kommt der Knackpunkt:
Wenn während dieses "Einpflegevorgangs" eine Antragsdatei geöffnet ist, werden die Bezüge in dieser aktualisiert, d. h. die Zieldatei (Antrag) verschiebt ihre Verknüpfungen um eine Zeile nach unten. Beim Sortieren der Lieferanten werden die Verknüpfungen nochmals bunt gemischt, so dass eigentlich nichts mehr zusammenpasst.
Deswegen die festen Bezüge. Und wenn ich fest sage, dann meine ich auch fest! ;=))
Ich hoffe ich habe nicht mehr Verwirrung gestiftet als Klärung herbeigeführt. Nur soviel zum Überblick:
- meine Datei, in die ich die Daten aus dem Antrag importiere umfasst folgende Inhalte:
1. Personaldatenverwaltung (auch Datenquelle für Briefe, ... die Personaldaten enthalten), Urlaubsanträge, Datenblätter, Dienstreiseanträge- und Abrechnungen erstellen und drucken, interne Telefonverzeichnisse erstellen
2. Auftragsabwicklung (Anträge importieren, drucken, in Bestellungen umwandeln, ...)
3. Lieferanten pflegen
...
Die Datei ist vor 1 1/2 Jahren entstanden und von mir stetig überarbeitet und weiterentwickelt worden. Viele Wege führen nach Rom, jedoch bedeuten manche davon auch längere Ladezeiten wegen riesiger Dateigrößen. Deshalb versuche ich immer die Funktionalität so hoch wie möglich und die Belastung durch die Dateigröße so gering wie möglich zu halten.
Ich habe auch schon viele nützliche Tipps in diesem Forum erhalten.
So. Genug gelabert! Vielleicht fällt Dir noch was ein. Oder habe ich Dich erst verwirrt und dann totgeschrieben? ;=))
Gruß. Marta

Hi Marta,
klar doch. Die Verwirrung ist Dir gelungen...:-) Hauptsächlich aber, weil ich gerade selbst über einem Problem sitze das ich heute noch lösen will und deshalb den Kopf damit schon ausgelastet habe. Ich schau mir also morgen Deine Antwort nochmal in Ruhe an. Versprechen kann ich aber nichts. Alles in allem klingt das Ganze jedoch nach einer Datenbankanwendung. Schon mal darüber nachgedacht das in Access zu realisieren? Ansonsten fiele mir auf die Schnelle nur ein, das Change Ereignis der Tabelle zum Aktualisieren der Listbox zu nutzen. Aber bei der Angabe 'VBA nur mit Recorder' dürfte das zu schwer für Dich sein...
Was mir noch auffiel, durch die Sortiererei passiert ja erst der ganze Schlamassel. Wenn der Nutzer sowieso mit einer Maske arbeitet, dann kannst Du auf das Tabellensortieren verzichten. Hänge die DS unten an und gut ist es. Vergib Deinen Lieferanten eindeutige Indizies und arbeite mit denen. Dadurch ersparst Du Dir 'ne ganze Menge Ärger. Alles in allem riecht das nach einer Menge Arbeit, die wahrscheinlich kaum mal so nebenbei gelöst werden kann.
Ciao,
Ralf

Sub Formel_korrigieren() Dim dblLz#, sSp$, zelle, Bereich$, sRow$ Application.DisplayAlerts = False dblLz = ActiveCell.SpecialCells(xlLastCell).Row Bereich = "A1:M" & dblLz For Each zelle In Range(Bereich) sSp = Mid(zelle.Address, 2, 1) sRow = CStr(zelle.Row) zelle.FormulaLocal = "=Wenn('X:\mitarbeiter\ILK-Info\Beschaffung\[Lieferanten.xls]Lieferanten'!$" & sSp & "$" & sRow & _ "="""";"""";'X:\mitarbeiter\ILK-Info\Beschaffung\[Lieferanten.xls]Lieferanten'!$" & sSp & "$" & sRow & ")" Next Application.DisplayAlerts = True End Sub

Beliebteste Forumthreads (12 Monate)

Feste Bezüge für gesamtes Tabellenblatt

6
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

300 Forumthreads zu ähnlichen Themen

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

Feste Bezüge für gesamtes Tabellenblatt

6 Beiträge zum Forumthread Beiträge zu diesem Forumthread

300 Forumthreads zu ähnlichen Themen

VBA Beispiele zu verwandten Themen

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

6
Beiträge zum Forumthread

Beiträge zu diesem Forumthread