View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
JLGWhiz[_2_] JLGWhiz[_2_] is offline
external usenet poster
 
Posts: 1,565
Default Paste upon click

This assumes the label is from the Control Toolbox and is on the same sheet
as the named cell, and that the receiving cell is on the same page. Copy
both subs to the sheet code module. Click the label, then click a cell.
Don't forget to save the file to keep the code.
You can name the label and update the code, in case you have more than one
label.

Private Sub Label1_Click()
Range("More_Time").Copy
End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Target.PasteSpecial xlPasteValues
End Sub



"bb pcv" <bb wrote in message
...
I would like to write a macro, to be attached to a label, that upon
clicking
the label, would put the named range on the clipboard, and then paste the
range at a cell in the worksheet with another click.
current code:
Sub More_time()
Range("More_Time").Select
Selection.Copy
End Sub
would like to paste by clicking