Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Zellbereichmarkierung aufheben?

3,230 views
Skip to first unread message

Wolfgang Schmid

unread,
Jun 29, 2005, 8:14:45 AM6/29/05
to
Schönen guten Tag zusammen,

wie kann man nach .copy und pastespecial die Bereichsmarkierung aufhebe?
Bleibt ja auch nach Application.CutCopyMode = False bestehen.
Gibt es einen Befehl oder geht es nur über cells(x,y).select.

Vielen Dank
Wolfgang Schmid


Thomas Ramel

unread,
Jun 29, 2005, 8:20:05 AM6/29/05
to
Grüezi Wolfgang

Wolfgang Schmid schrieb am 29.06.2005

> wie kann man nach .copy und pastespecial die Bereichsmarkierung aufhebe?
> Bleibt ja auch nach Application.CutCopyMode = False bestehen.
> Gibt es einen Befehl oder geht es nur über cells(x,y).select.

Nein; aber wer sagt, dass Du den Bereich zuvor selektiern musst? ;-)

Wie lautet denn der bisher verwendete Code?


Mit freundlichen Grüssen
Thomas Ramel

--
- MVP für Microsoft-Excel -
[Win XP Pro SP-2 / xl2000 SP-3]
Microsoft Excel - Die ExpertenTipps:
(http://tinyurl.com/9ov3l und http://tinyurl.com/cmned)

Wolfgang Schmid

unread,
Jun 30, 2005, 9:58:36 AM6/30/05
to

"Thomas Ramel" <t.r...@MVPs.org> schrieb im Newsbeitrag
news:1ffpeoex20td8$.cs51g89eurmg.dlg@40tude.net...

> Grüezi Wolfgang
>
> Wolfgang Schmid schrieb am 29.06.2005
>
> > wie kann man nach .copy und pastespecial die Bereichsmarkierung aufhebe?
> > Bleibt ja auch nach Application.CutCopyMode = False bestehen.
> > Gibt es einen Befehl oder geht es nur über cells(x,y).select.
>
> Nein; aber wer sagt, dass Du den Bereich zuvor selektiern musst? ;-)
>
> Wie lautet denn der bisher verwendete Code?

Hallo Thomas,

der code lautet:
Range(w.Cells(k, 2), w.Cells(k, 14)).Copy
With w1.Cells(x1 + l, 2)
.PasteSpecial Paste:=xlValues
.PasteSpecial Paste:=xlFormats
End With
Application.CutCopyMode = False

Ich selektiere den Bereich naturlich nicht vorher, aber nach der
Codeausführung ist der Bereich markiert.

Grüße
Wolfgang


Melanie Breden

unread,
Jun 30, 2005, 5:02:41 PM6/30/05
to
Hallo Wolfgang,

Wolfgang Schmid schrieb:


> Ich selektiere den Bereich naturlich nicht vorher, aber nach der
> Codeausführung ist der Bereich markiert.

um die Markierung aufzuheben muss anschließend eine beliebige
Zelle aktiviert werden , z.B. innerhalb der bestehenden Markierung
die aktive Zelle:

ActiveCell.Select

--
Mit freundlichen Grüssen

Melanie Breden
- Microsoft MVP für Excel -

Microsoft Excel - Die ExpertenTipps http://tinyurl.com/cmned
Das Excel-VBA Codebook http://excel.codebooks.de
Excel-Auftragsprogrammierung

Wolfgang Schmid

unread,
Jul 1, 2005, 12:14:44 PM7/1/05
to
Hallo Melanie,

> um die Markierung aufzuheben muss anschließend eine beliebige
> Zelle aktiviert werden , z.B. innerhalb der bestehenden Markierung
> die aktive Zelle:
>
> ActiveCell.Select

genau das wollte ich umgehen, da man für
ActiveCell.Select
vorher erst das entsprechende "Sheet" aktivieren muß.
Ich dacht man könnte sich diesen Aufwand sparen.

Vielen Dank für die Antwort

Wolfgang Schmid


0 new messages