help with code in a mack
 

How would I run this code in a mack. The command button will not activate on
the sheet

help with code in a mack
 

Hi Richard,

<this code

what code?

<mack

A Mac?


--
Kind regards,

Niek Otten
Microsoft MVP - Excel



"Richard" wrote in message ...
| How would I run this code in a mack. The command button will not activate on
| the sheet

help with code in a mack
 

Did you try the suggestions from yesterday?

Richard wrote:

How would I run this code in a mack. The command button will not activate on
the sheet

--

Dave Peterson

help with code in a mack
 

Private Sub CommandButton1_Click()

Worksheets("Sent to Assembly").Range("A3:B100,c3:c100").Copy
Worksheets("Parts Sent to Assembly").Range("a65000").End(xlUp).Offset(1,
0).PasteSpecial
Worksheets("Sent to Assembly").Range("a3:a100,b3:B100").ClearContents
Worksheets("Schedule").Range("d1,L1,a3:a100,b3:B10 0,d3:d100").ClearContents


End Sub

"Niek Otten" wrote:

Hi Richard,

<this code

what code?

<mack

A Mac?


--
Kind regards,

Niek Otten
Microsoft MVP - Excel



"Richard" wrote in message ...
| How would I run this code in a mack. The command button will not activate on
| the sheet

help with code in a mack
 

I don't know what you mean? Is it the same as in Windows? Thanks for your help


Private Sub CommandButton1_Click()

Worksheets("Sent to Assembly").Range("A3:B100,c3:c100").Copy
Worksheets("Parts Sent to Assembly").Range("a65000").End(xlUp).Offset(1,
0).PasteSpecial
Worksheets("Sent to Assembly").Range("a3:a100,b3:B100").ClearContents
Worksheets("Schedule").Range("d1,L1,a3:a100,b3:B10 0,d3:d100").ClearContents


End Sub

"Dave Peterson" wrote:

Did you try the suggestions from yesterday?

Richard wrote:

How would I run this code in a mack. The command button will not activate on
the sheet

--

Dave Peterson

help with code in a mack
 

Mac's don't support the objects from the control toolbox toolbar. You'll have
to replace it with a button from the Forms toolbar.

Then move the code from the worksheet to a general module. Maybe modify the
code. And assign the macro to that button.

Richard wrote:

I don't know what you mean? Is it the same as in Windows? Thanks for your help

Private Sub CommandButton1_Click()

Worksheets("Sent to Assembly").Range("A3:B100,c3:c100").Copy
Worksheets("Parts Sent to Assembly").Range("a65000").End(xlUp).Offset(1,
0).PasteSpecial
Worksheets("Sent to Assembly").Range("a3:a100,b3:B100").ClearContents
Worksheets("Schedule").Range("d1,L1,a3:a100,b3:B10 0,d3:d100").ClearContents

End Sub

"Dave Peterson" wrote:

Did you try the suggestions from yesterday?

Richard wrote:

How would I run this code in a mack. The command button will not activate on
the sheet

--

Dave Peterson


--

Dave Peterson