Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Kopieren nur in definierten Zellen

Kopieren nur in definierten Zellen
03.08.2016 15:35:15
WernerF
Hallo Excelfreunde,
ich habe nur ein kleines Problem. In einer Tabelle können belibige Einträge vorgenommen werden. Nur in 5 Zellen (B6,N6,Z6,AL6,AX6) soll per VBA etwas hineinkopiert werden können. Ist eine der angesprochenen Zellen nicht ausgewählt (markiert), soll eine Fehlermeldung ausgegeben werden.
Herzlicher Gruß und danke für jeden Hinweis
WernerF

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

Betreff
Datum
Anwender
Anzeige
AW: Kopieren nur in definierten Zellen
03.08.2016 17:19:31
Daniel
Hi
im Prinzip so

dim Zelle as Range
dim Ziel as Range
set Ziel = Range("B6,N6,Z6,AL6,AX6")
if not intersect(Selection, Ziel) is nothing then
for each Zelle in Intersect(Selection, Ziel)
Zelle.PasteSpecial xlpasteall
next
End if
dieser code berücksichtig, dass der Anwender auch mehrere dieser Zellen gleichzeitig auswählen kann um den Inhalt einzufügen.
Gruß Daniel
AW: Kopieren nur in definierten Zellen
03.08.2016 17:58:50
WernerF
Hallo Daniel,
das ist genau das was ich gebrauche!
Herzlichen Dank!
WernerF
Anzeige

313 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige