LinkBack Thread Tools Search this Thread Display Modes
Prev Previous Post   Next Post Next
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 35
Default how to get rid of selection of cells, after pasting

Hi there,

below find the code, which I put into the workbook_open event.
When I open my file, Sheet3 will be active
On Sheet1 the cells getting selected, copied and their values pasted
back.
Everything works fine, and after the code has ended its job, Sheet3 is
active, but when I manually change to Sheet1, I can see, that all
cells had been selected before. (They have this dark appearance, not
the flickering frame)
How do I get only cell A1 selected?
It should also happen in the background, without having to select
Sheet1 first.

Private Sub Workbook_Open()
'
Application.ScreenUpdating = False
If Now() #2/3/2005# Then '#month/day/year#!!!!
With Worksheets("Sheet1").Cells
.Copy
.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
Application.CutCopyMode = False
End With
End If
ActiveWorkbook.Save
Application.ScreenUpdating = True
End Sub

Thanks for any advice.

Regards,
Norbert
 
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
Pasting a Selection as a Picture [email protected] Links and Linking in Excel 3 February 7th 07 01:10 PM
Pasting Selection In First Blank Row tnederlof Excel Discussion (Misc queries) 5 February 6th 07 10:38 PM
how do get rid of a selection after pasting Orion[_2_] Excel Programming 4 February 4th 05 07:30 PM
pasting formulas into a selection Frank Kabel Excel Worksheet Functions 3 October 30th 04 06:07 AM
pasting formulas into a selection greg Excel Programming 3 October 29th 04 06:28 PM


All times are GMT +1. The time now is 09:56 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Copyright ©2004-2025 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"