---

Hallo

Die Quelldaten (1.Spalte in der 1.Mappe) sollen über die Zwischenablage kopiert werden
in die 2.Mappe (diese ist jedoch gefiltert).
z.B:
zelle1 -> Zelle 13
zelle2 -> Zelle 42
zelle3 -> Zelle 71 ...

Ist dies in einem Rutsch möglich oder muss ich Zelle für Zelle einzeln mit der Maus kopieren?

------------------
Grüße
HOC

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo HOC,

ich kann's aber nur mit Makro:

Code:

---

Option Explicit
Public Sub InGefiltertenBereichEinfügen()
Dim t As Byte, cell As Range, Quelle, Ziel
t = 1
Tabelle1.Activate                                                   'QuellTabelle muß aktiviert sein
Quelle = Application.InputBox(prompt:="Quelle angeben:", Type:=8) '<= unelegante Benutzereingabe Eingabe range-schreibweise: A:A
'Quelle = tabelle1.range("A1:A10")                                  'starre Variante
Tabelle2.Activate
Set Ziel = Application.InputBox(prompt:="Ziel angeben:", Type:=8)
'Set Ziel = Tabelle2.Range("A:A")
    For Each cell In Ziel
        If cell.RowHeight <> 0 Then                                 'wenn nicht ausgeblendet
            cell.Value = Quelle(t, 1)                               'ersten Eintrag aus Quelle einfügen
            t = t + 1                                               'nächsten Quelleintrag
            If t = UBound(Quelle, 1) + 1 Then Exit Sub            'Wenn letzter Eintrag aus Quelle durch
        End If
    Next cell
End Sub

---

Kann mir einer sagen , wie ich eine Benutzeingabe mit Maus da rein bekomme? Also die Quelle und das Ziel "ganz normal" markieren lassen durch Benutzereingabe?

Gruß,
Nicole

edit: Kleinkram...
------------------
Herr Kann-ich-nich wohnt in der Will-ich-nich-Straße...

[Diese Nachricht wurde von runkelruebe am 28. Aug. 2006 editiert.]

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Nicole,
Danke für diese Lösung,
werde ich gleich mal versuchen.

wünsche noch ein schönes Wochenende

------------------
Grüße
HOC

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP