Clever-Excel-Forum

Normale Version: Inhalte von einem Tabellenblatt in ein anderes per Klick
Du siehst gerade eine vereinfachte Darstellung unserer Inhalte. Normale Ansicht mit richtiger Formatierung.
Hallo zusammen,

ich hoffe, dass mir hier jemand weiterhelfen kann.
Ich habe in einem Excel-Tabellenblatt einen umfangreichen Fragenkatalog.
In jeder Zelle von oben nach unten steht jeweils eine Frage.
Ich möchte, dass aus diesem Gesamt-Fragebogen, bei Klick auf einzelne Fragen, diese in ein anders Tabellenblatt an eine definierte Stelle übertragen wird.
Sprich, aus dem gesamten Fragenkatalog will ich einen kleinen Fragenkatalog mit ausgewählten Fragen erstellen ohne Copy-Paste.
Leider scheinen meine Excel-Kenntnisse mir hier nicht weiterzuhelfen. Ich hoffe, dass jemand eine Lösung kennt.
Vielen Dank schonmal!
Hallo,

VBA könnte das sicherlich. Kannst, darfst, willst Du VBA einsetzen?

Und ein wenig mehr Input würde im Übrigen auch noch gebraucht.
Mit Deinen Angaben beispielsweise: 
Zitat:diese in ein anders Tabellenblatt an eine definierte Stelle übertragen wird
kann niemand wirklich ein Programm erstellen.
Hallo Mamba.

Ohne VBA sehe ich hier keine Lösung, mit VBA ist es aber ziemlich einfach.

Ich nehme an, Du hast ein Blatt "Quelle", in dem in Spalte A die Fragen stehen und in Spalte C die Nummer der Zeile im Blatt "Ziel", in die Du die Frage kopiert haben möchtest. Kein Kopieren, wenn die Zelle leer ist. 

Dann rufe die Beispiel-Datei im Anhang auf, gehe rechts auf "Entwicklertools", dann das 2. Icon von links "Makros"  und dort "Selektives_Übertragen" ausführen.

Einfach mal ausprobieren.
Hallöchen,

es gibt aber auch andere Ansätze. Du könntest z.B. eine Gültigkeitsliste aus den Fragen bilden und dann daraus auswählen.
Oder Du nimmst die "Autofilter-Formel", hier mal ein Ansatz. Die Formel in E1 kannst Du mehrere Zeilen nach unten ziehen und dann nach rechts.

Arbeitsblatt mit dem Namen 'Tabelle1'
ABCDEF
1Frage1WerxFrage1Wer
2Frage2WasFrage3Warum
3Frage3Warumx

ZelleFormel
E1{=WENNFEHLER(INDEX(A$1:A$99;KKLEINSTE(WENN(($C$1:$C$99="x");ZEILE($1:$99));ZEILE($A1)));"")}
Achtung, Matrixformel enthalten!
Die geschweiften Klammern{} werden nicht eingegeben.
Verlassen Sie den Zelleneditor mit Strg+Shift + Enter, statt Enter alleine.
Verwendete Systemkomponenten: [Windows (32-bit) NT 10.00] MS Excel 2016
Diese Tabelle wurde mit Tab2Html (v2.6.0) erstellt. ©Gerd alias Bamberg