Option Buttons that use macros

S

SteveS

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
 
R

Reitanos

You don't have to use copy and paste.
Try something like:

range("f10:m10").formula = range("n10").formula
sheets("Print Me - Retail").select
range("a1").select

I think that's what you were looking for.
 
R

Reitanos

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
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top