Selecting the range before copying it (via the Copy method) is not
required... your originally posted code works fine as written. However, I
think the OP wants the copy process to work with the currently selected
cell(s), not a preselected range. I'd change your code to something like
this...

Sub select_copy()
Selection.Copy Destination:=ActiveSheet.Range("D3") 'change to suit
End Sub

Rick


"Susan" wrote in message
...
(actually, i forgot the select, i'm so used to not using them!
just add in

myFirstRange.select

before the copy/paste business).

susan

On May 16, 12:43 pm, Susan wrote:
for a macro solution, try:
==========================
Option Explicit

Sub select_copy()

Dim wb As Workbook
Dim ws As Worksheet
Dim myFirstRange As Range
Dim mySecondRange As Range

Set wb = ActiveWorkbook
Set ws = ActiveSheet
Set myFirstRange = ws.Range("B3") 'change range to suit
Set mySecondRange = ws.Range("D3") 'change range to suit

myFirstRange.Copy Destination:=mySecondRange

End Sub
====================================
hth
susan

On May 16, 12:21 pm, Rv wrote:



i'm tring to to be able to slect a cell and have and the information (in
the
cell) copied to another designated cell.- Hide quoted text -

- Show quoted text -