Datenabfrage auf ursprüngliche vorhandene Zellen

Computer: Software & Programmierung Visual Basic
#1

Hallo,

Meine Version: Microsoft Office Excel 2003 SP3

Datenabfrage auf ursprüngliche vorhandene Zellenbezeichnung

Ich habe in einer Datei ein Arbeitsblatt mit 250 Zellen und jede Zelle mit einer anderen Zellenbezeichnung für eine Datenübertragung (mit Unterstützung durch VBA) angelegt. Diese Zellen sind aber nicht aneinander gereiht.

M.E muss man In der Bearbeitungsleiste in die Zellenbezeichnung (z.B. A1) eine andere Zellenbezeichnung für Datenübertragung eingegeben.

Danach hat jede Zelle eine andere Zellenbezeichnung wie nachstehendes Beispiel:
Zelle A1 = Josef, Zelle A2 = Hans, Zelle A3 = Peter usw…
Dieses Blatt muss ich 24 x kopieren und dann wieder jede Zelle eine andere Zellenbezeichnung geben.
Dies einzeln anzulegen wäre eine Arbeit für viele Wochen.

Ich suche nach einem anderen einfacheren Weg.

M.E. ist von eine ursprünglich vorhandene Zellenbezeichnung (z.B. A1) keine Datenabfrage möglich ist. Es gibt eine spezielle Abfrageform über VBA, die ich aber nicht kenne.

Oder es gibt eine andere Datenabfrage, die entsprechend auch einfach zu vervielfältigen ist.

Oder es müsste eine Kopierform geben, die eine erstellte Seite inklusive der eingerichteten Zellenbezeichnung kopiert. Die Datenabfrage bezieht sich dann in erster Linie auf den Namen des Arbeitblattes und in zweiter Linie auf die Zellenbezeichnungen.

Für entsprechende Vorschläge bedanke ich mich im Voraus.
Gruß
hjsp

#2

Hallo ,
um ehrlich zu sein fällt es mir schwer Dein Problem nach zu vollziehen. Da eine VBA Abfrage deren Inhalt Du nicht kennst, sich nicht einfach auf beliebige weitere Tabellen in einen Sheet anwenden lässt.

Aber eine Möglichkeit ist:

  1. Erstelle erst alle Deine 24 Tabellen.
  2. Gehe auf Tabelle1
  3. Markiere alle Tabellen (Umschalttaste festhalten und jede Tabbelle anklicken)
  4. Nun auf die Zelle gehen die einen Namen bekommen soll gehen.
  5. „EINFÜGEN / NAMEN / DEFINIEREN“ anklicken
    6)Namen vergeben
    7)Im gleichen Fenster unter „Bezieht sich auf“ findest Du den Zellenbezug diesen kopierst Du und vervielfachst diesen mit einem Semikolon getrennt für jede Tabelle (Achtung Tabellenname ändern) Nun bezieht sich der name in jeder Tabelle auf diese Zelle
    8)OK

Diese Möglichkeit ist zwar auch recht aufwendig aber Zielführend.

Einfacher ist es vllt. wenn Du mir eine Beispiel Tabelle mit Pseudowerten zuschickst, samt Beschreibung was hier gemacht werden soll, inkl der VBA Programmierung. Ich könnte mir vorstellen das es hier eine bessere Lösung gibt, wenn man sich des Problem genauer ansieht.

Mawasima

#3

Hallo Mawasima,
Deine Version hört sich gut an.
Zu Deinem Vorschlag, dir ein Tabelle mit Pseudowerten zu senden, wäre evtl. möglich.
Was hälts Du davon, dass ich Dir meine Vorstellungen erst einmal telefonisch erkläre, und wir gemeinsam uns das Projekt über TimeViewer ansehen und evtl bearbeiten.
Wenn Du damit einverstanden bist, sende mir doch Deine Telefonnummer und Angabe für die günstigste Telefonatszeit.
Ich würde mich darüber freuen.
Gruß
hjsp

#4

Hallo Andreas,
vielen Dank für Deine Hilfe.
Meien datei zu versenden ist nicht mein Ding.
Aber ich habe alles so gemacht wie zu es beschrieben hast:

  1. Erstelle erst alle Deine 24 Tabellen.
  2. Gehe auf Tabelle1
  3. Markiere alle Tabellen (Umschalttaste festhalten und jede Tabbelle anklicken)
  4. Nun auf die Zelle gehen die einen Namen bekommen soll gehen.
  5. „EINFÜGEN / NAMEN / DEFINIEREN“ anklicken
    6)Namen vergeben
    7)Im gleichen Fenster unter „Bezieht sich auf“ findest Du den Zellenbezug diesen kopierst Du und vervielfachst diesen mit einem Semikolon getrennt für jede Tabelle (Achtung Tabellenname ändern) Nun bezieht sich der Name in jeder Tabelle auf diese Zelle
    8)OK
    Leider ohne Erfolg:
    Der eingegebene Name ist in keiner Zelle oder Blatt vorhanden.
    Was mache ich noch falsch?
    Für Deine Hilfe bedanke ich mich im Voraus.
    Gruß
    hjsp