View Single Post
  #3   Report Post  
Posted to microsoft.public.excel.worksheet.functions
Reitanos Reitanos is offline
external usenet poster
 
Posts: 123
Default Option Buttons that use macros

You can avoid the whole copy/paste thing with something like:

sheets("Markup Calculator").range("f10:M10").formula = sheets"Print Me
- Retail").range("n10").formula

I don't quite understand what else you want to do

On Mar 18, 11:48 pm, SteveS wrote:
I have a workbook that I am trying to use 2 option buttons that use macros to
copy and paste data in one cell in a separate worksheet to 7 other cells in a
row in the same worksheet.

One option button is named CASH and the other is named CREDIT and I want the
macro to copy cell N10 in worksheet 'Markup Calculator' to cells F10:M10 when
the CASH option button is pushed in worksheet 'Print Me - Retail' and then
return to the 'Print Me - Retail' worksheet.

The same for the second options button named CREDIT. I want the same thing
to happen except I want cell N11 to be copied to cells F10:M10 and also
return to the 'Print Me - Retail' worksheet.

Any help would be appreciated. I have tried to recorded the macro sequence
but it seems to get stuck at Range("N10").Select when I try to copy the code
into the:

Sub MacroCash()
'
' MacroCash Macro
' CASH
'

'
Sheets("Markup Calculator").Select
Range("N10").Select
Selection.Copy
Range("F10").Select
ActiveSheet.Paste
Range("G10").Select
ActiveSheet.Paste
Range("H10").Select
ActiveSheet.Paste
Range("I10").Select
ActiveSheet.Paste
Range("J10").Select
ActiveSheet.Paste
Range("K10").Select
ActiveSheet.Paste
Range("L10").Select
ActiveSheet.Paste
Range("M10").Select
ActiveSheet.Paste
Range("F20:G20").Select
Selection.Hyperlinks(1).Follow NewWindow:=False, AddHistory:=True
Range("A1").Select
End Sub