View Single Post
  #6   Report Post  
Posted to microsoft.public.excel.programming
Vasant Nanavati Vasant Nanavati is offline
external usenet poster
 
Posts: 1,080
Default Opening a Workbook

Good! Glad to hear it.

--

Vasant

"Todd" wrote in message
...
Oh I tried and it works perfectly.


-----Original Message-----
Because Excel's copy and paste is quirky and needs very

little encouragement
to clear the clipboard <g. I think you just need to try

it out and make
sure that there is something to paste.

--

Vasant

"Todd Huttenstine"

wrote in message
...
Why would it clear the clipboard?


-----Original Message-----
I haven't tested the following, but it should (mostly)
work:

Dim wb As Workbook
On Error Resume Next
Set wb = Workbooks("Stats Manager.xls")
On Error GoTo 0
If wb Is Nothing Then set wb = Workbooks.Open

("P:\Stats
Manager.xls")
wb.Worksheets(1).Range("C5").Select
ActiveSheet.Paste
MsgBox "Data Pasted!", vbOKOnly

Keep in mind that if the data to be pasted was copied
from Excel, most
likely your macro will clear the clipboard and leave

you
with nothing to
paste.

--

Vasant


"Todd Huttenstine"


wrote in message
...
Below is the macro I am using that I have assigned

to a
button that is located on a menu in Excel. I have

this
macro saved in Personal.Xls.

I would like to add the code to it to check to see if
Workbook Stats Manager.xls is open, and if it is not
open,
to open it from P:\Stats Manager.xls. After the
workbook
is open it needs to run the following code.

Worksheets(1).Range("C5").Select
ActiveSheet.Paste
MsgBox "Data Pasted!", vbOKOnly




.



.