Das Clever-Excel-Forum.de - Treffen
findet vom 15. - 17. September 2017 in Friedrichroda /
Thüringen / Region Großer Inselsberg statt. Hotelbuchung ab sofort möglich.

Ausgewählte Zellen einer Zeile bei Klick in neues Sheet kopieren
#1
Guten Tag allerseits,

Ich habe ein Problem, das ich am einfachsten mit einem Beispiel Schildere.

Im Arbeitsblatt "Adressen" habe ich ein Adressverzeichnis mit den Spalten "Vorname", "Name", "Strasse" und "Ort". Pro Zeile wird also jeweils eine Person erfasst.

Nun will ich, dass ich im Adressverzeichnis eine Person bzw. eine Zeile irgendwie markieren kann (z.B. per Drop-Down, Checkbox etc.) und dass dann gewisse Daten (nicht alle (!)) in einem weiteren Sheet in eine Zeile kopiert werden.

So habe ich dann im Sheet "Teilnehmende" z.B. nur die Spalten "Vorname" und "Name".

Wichtig ist, dass schlussendlich nicht alle Personen vom Sheet "Adressen" auch im Sheet "Teilnehmende" vorkommen, sondern nur die markierten.

Kann mir irgendjemand sagen, wie ich dieses Problem lösen kann?
to top
#2
Hallo,

vielleicht mit einem DoppelClick-Ereignis in der Tabelle Adressen (die Vornamen stehen jeweils in der Spalte A, die Namen in der Spalte B)

Code:
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
   Dim lngLetzeZeile As Long
  
   With Worksheets("Teilnehmende")
      lngLetzeZeile = .Cells(.Rows.Count, 1).End(xlUp).Row + 1
      Cells(Target.Row, 1).Resize(, 2).Copy .Cells(lngLetzeZeile, 1)
      Cancel = True
   End With
End Sub

Wo Du den Code einzufügen hast, wird dir hier erklärt.
Gruß Stefan
Win 7 / Office 2007
to top
#3
Hallo,

formelmäßig oder mit VBA?

Vielleicht hilft dir dieses Posting weiter: http://www.clever-excel-forum.de/thread-...ml#pid2416

Dort ist sowohl eine Formellösung als auch eine verlinkte VBA-Lösung zu finden.
Gruß
Peter
to top


Möglicherweise verwandte Themen...
Thema Verfasser Antworten Ansichten Letzter Beitrag
  Mittelwert aus einer Zeile mit Bedingungen MMeyer 7 57 26.03.2017, 10:20
Letzter Beitrag: WillWissen
  bestimmte Zeile aus mehreren Dateien in eine Tabelle kopieren Fabian1208 3 56 22.03.2017, 13:07
Letzter Beitrag: Fabian1208
  2 Zellen bedingen das Auslesen einer 3. Zelle johnny9000 5 55 20.03.2017, 16:59
Letzter Beitrag: johnny9000
  2 Zellen bedingen die Auslese einer 3. Zelle johnny9000 3 68 16.03.2017, 17:14
Letzter Beitrag: johnny9000
Question Zellen per VBA Kopieren ohne Tabllenblatt zu wechseln o0Julia0o 5 119 13.03.2017, 17:20
Letzter Beitrag: Rabe
  Problem ausführen von VBA auf Sheet hbboy15 9 128 13.03.2017, 11:18
Letzter Beitrag: Rabe
  To-do-Liste: Verschieben erledigter Aufgaben auf neues Blatt hrsonnenschein 5 150 10.03.2017, 10:42
Letzter Beitrag: Rabe
  Bestimmte Zellen in neue Tabellen kopieren aeugeln87 30 696 07.03.2017, 00:10
Letzter Beitrag: aeugeln87
  Gezielte Daten von einer Datei kopieren Hooorn 12 334 01.03.2017, 09:21
Letzter Beitrag: WillWissen
  Text aus meheren Zellen anhand eines Sortierkriteriums in einer Zelle zusammenfassen holgeru 3 122 28.02.2017, 11:20
Letzter Beitrag: GMG-CC

Gehe zu:


Benutzer, die gerade dieses Thema anschauen: 1 Gast/Gäste