Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Selection.Copy Destination

Forumthread: Selection.Copy Destination

Selection.Copy Destination
21.01.2007 11:52:13
Rolf
Hallo
In meinem Makro (stammt auch von Herber) wird eine Zelle kopiert. Klappt gut. Allerdings mit bedingten Formatierungen.
Selection.Copy Destination:=.Cells(Loletzte + 1, 2)
Ich möchte bitte diese Zeile so haben, das nur der Inhalt kopiert wird,
Vielen Dank
Rolf K.
Makro:

Sub Stammdaten_Bar_kopieren()
ActiveSheet.Unprotect
Selection.Copy
With Sheets("Bareinnamen")
ActiveSheet.Unprotect
Dim Loletzte As Long
If Range("b145") = "" Then
Loletzte = .Range("b28").End(xlUp).Row
Selection.Copy Destination:=.Cells(Loletzte + 1, 2)
Else
MsgBox "keine Zelle mehr frei"
End If
End With
Sheets("Bareinnamen").Select
End Sub

Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Selection.Copy Destination
21.01.2007 12:03:40
Josef
Hallo Rolf,
Sub Stammdaten_Bar_kopieren()
    
    With Sheets("Bareinnamen")
        .Unprotect
        Dim Loletzte As Long
        If Range("b145") = "" Then
            Selection.Copy
            .Cells(.Range("b28").End(xlUp).Row + 1, 2).PasteSpecial xlValues
            Application.CutCopyMode = False
        Else
            MsgBox "keine Zelle mehr frei"
        End If
        .Protect
    End With
    
End Sub

Gruß Sepp
Anzeige
AW: Selection.Copy Destination
21.01.2007 12:08:20
Rolf
Hallo Josef
Hat geklappt
Danke
Rolf K.
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige