Hi
In the below code, I am copying a range from Sheet 1 and with the
PasteValues method, I am pasting that range to a cell on Sheet 2.
The problem I am having is that I can not "de select" the selected (copied)
range on Sheet 1. I have tried doing an ESC using SendKeys but that doesn't
seem to want to work.

Any ideas?
Is there a select = False or some code that I am missing?

Thanks!
ML


'Copy Bills
Sheets(1).Activate
Sh1bw.Offset(0, 2).Copy 'Copy Column C bills

Sheets(2).Activate
Sh2bw.Offset(0, 1).Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone 'Paste bills
one column over from Sh2bw

hi
not sure exactly what you mean by "de select". do you mean remove from the
clipboard?
CutCopyMode = False

repost to clairfy.
Regards
FSt1

"ML0940" wrote:

>
> Hi
> In the below code, I am copying a range from Sheet 1 and with the
> PasteValues method, I am pasting that range to a cell on Sheet 2.
> The problem I am having is that I can not "de select" the selected (copied)
> range on Sheet 1. I have tried doing an ESC using SendKeys but that doesn't
> seem to want to work.
>
> Any ideas?
> Is there a select = False or some code that I am missing?
>
> Thanks!
> ML
>
>
> 'Copy Bills
> Sheets(1).Activate
> Sh1bw.Offset(0, 2).Copy 'Copy Column C bills
>
> Sheets(2).Activate
> Sh2bw.Offset(0, 1).Select
> Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone 'Paste bills
> one column over from Sh2bw

Yes, that is exactly what I was looking for
I did not know that this method existed.
Now that I looked it up in The help Screen
This is precisely what I needed
Application.CutCopyMode = True

It removed the rectangular selection box around the copied (source) range

Thank you very much!
ML

"FSt1" wrote:

> hi
> not sure exactly what you mean by "de select". do you mean remove from the
> clipboard?
> CutCopyMode = False
>
> repost to clairfy.
> Regards
> FSt1
>
> "ML0940" wrote:
>
> >
> > Hi
> > In the below code, I am copying a range from Sheet 1 and with the
> > PasteValues method, I am pasting that range to a cell on Sheet 2.
> > The problem I am having is that I can not "de select" the selected (copied)
> > range on Sheet 1. I have tried doing an ESC using SendKeys but that doesn't
> > seem to want to work.
> >
> > Any ideas?
> > Is there a select = False or some code that I am missing?
> >
> > Thanks!
> > ML
> >
> >
> > 'Copy Bills
> > Sheets(1).Activate
> > Sh1bw.Offset(0, 2).Copy 'Copy Column C bills
> >
> > Sheets(2).Activate
> > Sh2bw.Offset(0, 1).Select
> > Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone 'Paste bills
> > one column over from Sh2bw

FS
The interesting thing is that both True or False acheive the same result
Therefore, it does make more sense to say False
And this did precisely what I needed it to

Thank you again
ML

"FSt1" wrote:

> hi
> not sure exactly what you mean by "de select". do you mean remove from the
> clipboard?
> CutCopyMode = False
>
> repost to clairfy.
> Regards
> FSt1
>
> "ML0940" wrote:
>
> >
> > Hi
> > In the below code, I am copying a range from Sheet 1 and with the
> > PasteValues method, I am pasting that range to a cell on Sheet 2.
> > The problem I am having is that I can not "de select" the selected (copied)
> > range on Sheet 1. I have tried doing an ESC using SendKeys but that doesn't
> > seem to want to work.
> >
> > Any ideas?
> > Is there a select = False or some code that I am missing?
> >
> > Thanks!
> > ML
> >
> >
> > 'Copy Bills
> > Sheets(1).Activate
> > Sh1bw.Offset(0, 2).Copy 'Copy Column C bills
> >
> > Sheets(2).Activate
> > Sh2bw.Offset(0, 1).Select
> > Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone 'Paste bills
> > one column over from Sh2bw