Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Abi
 
Posts: n/a
Default Can't get simple macro to run

Okay. Pretend I'm a totally idiot and and can't seem to get anything to work
right! :)

Now, I have done a few macros before (basically just recording them and then
assigning them to controls - but have not done this in Excel before, so maybe
I'm missing something here). I don't know how to code at all.

ALL I want to do is have a user click on one button and - viola - the macro
does its thing.

The macro I have recorded prints several sheets in a workbook. It works. I
tried it out and it works.

Here's what I've done so far.
1 - recorded a macro to print pages.
2 - created a button on one sheet. Right-clicked on it and selected View
Code.
3 - I inserted my macro in the VB editor by opening up the macro and
copy/pasting it into the VB editor after:
Private Sub CommandButton1_Click ( )
End Sub
-------------------------------------------------------------
Sub PrintQuote()
'
' PrintQuote Macro
' Macro recorded 1/12/2005 by XXX
'

'
Sheets("Title Page").Select
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Sheets(Array("Thankyou", "AV EQ", "QuoteSummary", "Terms", "Punch
List")).Select
Sheets("Thankyou").Activate
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
End Sub

Can someone please tell me where I've screwed up? I thought this would be
the easy part of this whole project I've been working on! ;)
  #2   Report Post  
 
Posts: n/a
Default

hi,
if you put the code in the vb editor as a general module
then the button has to call the macro
Right click the button in design mode, click view code.
if nothing is there, add this: call yourmacroname
If there is code there, it should be running if it has the
click event.

-----Original Message-----
Okay. Pretend I'm a totally idiot and and can't seem to

get anything to work
right! :)

Now, I have done a few macros before (basically just

recording them and then
assigning them to controls - but have not done this in

Excel before, so maybe
I'm missing something here). I don't know how to code at

all.

ALL I want to do is have a user click on one button and -

viola - the macro
does its thing.

The macro I have recorded prints several sheets in a

workbook. It works. I
tried it out and it works.

Here's what I've done so far.
1 - recorded a macro to print pages.
2 - created a button on one sheet. Right-clicked on it

and selected View
Code.
3 - I inserted my macro in the VB editor by opening up

the macro and
copy/pasting it into the VB editor after:
Private Sub CommandButton1_Click ( )
End Sub
----------------------------------------------------------

---
Sub PrintQuote()
'
' PrintQuote Macro
' Macro recorded 1/12/2005 by XXX
'

'
Sheets("Title Page").Select
ActiveWindow.SelectedSheets.PrintOut Copies:=1,

Collate:=True
Sheets(Array("Thankyou", "AV

EQ", "QuoteSummary", "Terms", "Punch
List")).Select
Sheets("Thankyou").Activate
ActiveWindow.SelectedSheets.PrintOut Copies:=1,

Collate:=True
End Sub

Can someone please tell me where I've screwed up? I

thought this would be
the easy part of this whole project I've been working

on! ;)
.

  #3   Report Post  
Bernie Deitrick
 
Posts: n/a
Default

Private Sub CommandButton1_Click ( )

PrintQuote
End Sub

and the code for the PrintQuote need to go into a standard codemodule, not
the worksheet's codemodule.

Or, you could simply use

Private Sub CommandButton1_Click ( )
Sheets("Title Page").Select
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Sheets(Array("Thankyou", "AV EQ", "QuoteSummary", "Terms", "Punch
List")).Select
Sheets("Thankyou").Activate
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
End Sub


HTH,
Bernie
MS Excel MVP

"Abi" wrote in message
...
Okay. Pretend I'm a totally idiot and and can't seem to get anything to

work
right! :)

Now, I have done a few macros before (basically just recording them and

then
assigning them to controls - but have not done this in Excel before, so

maybe
I'm missing something here). I don't know how to code at all.

ALL I want to do is have a user click on one button and - viola - the

macro
does its thing.

The macro I have recorded prints several sheets in a workbook. It works.

I
tried it out and it works.

Here's what I've done so far.
1 - recorded a macro to print pages.
2 - created a button on one sheet. Right-clicked on it and selected View
Code.
3 - I inserted my macro in the VB editor by opening up the macro and
copy/pasting it into the VB editor after:
Private Sub CommandButton1_Click ( )
End Sub
-------------------------------------------------------------
Sub PrintQuote()
'
' PrintQuote Macro
' Macro recorded 1/12/2005 by XXX
'

'
Sheets("Title Page").Select
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Sheets(Array("Thankyou", "AV EQ", "QuoteSummary", "Terms", "Punch
List")).Select
Sheets("Thankyou").Activate
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
End Sub

Can someone please tell me where I've screwed up? I thought this would be
the easy part of this whole project I've been working on! ;)



  #4   Report Post  
Abi
 
Posts: n/a
Default

I used the second suggestion (copied it in) and the button printed the first
page (Title Page) but then I got a run-time error for the rest. ???

"Bernie Deitrick" wrote:

Private Sub CommandButton1_Click ( )

PrintQuote
End Sub

and the code for the PrintQuote need to go into a standard codemodule, not
the worksheet's codemodule.

Or, you could simply use

Private Sub CommandButton1_Click ( )
Sheets("Title Page").Select
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Sheets(Array("Thankyou", "AV EQ", "QuoteSummary", "Terms", "Punch
List")).Select
Sheets("Thankyou").Activate
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
End Sub


HTH,
Bernie
MS Excel MVP

"Abi" wrote in message
...
Okay. Pretend I'm a totally idiot and and can't seem to get anything to

work
right! :)

Now, I have done a few macros before (basically just recording them and

then
assigning them to controls - but have not done this in Excel before, so

maybe
I'm missing something here). I don't know how to code at all.

ALL I want to do is have a user click on one button and - viola - the

macro
does its thing.

The macro I have recorded prints several sheets in a workbook. It works.

I
tried it out and it works.

Here's what I've done so far.
1 - recorded a macro to print pages.
2 - created a button on one sheet. Right-clicked on it and selected View
Code.
3 - I inserted my macro in the VB editor by opening up the macro and
copy/pasting it into the VB editor after:
Private Sub CommandButton1_Click ( )
End Sub
-------------------------------------------------------------
Sub PrintQuote()
'
' PrintQuote Macro
' Macro recorded 1/12/2005 by XXX
'

'
Sheets("Title Page").Select
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Sheets(Array("Thankyou", "AV EQ", "QuoteSummary", "Terms", "Punch
List")).Select
Sheets("Thankyou").Activate
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
End Sub

Can someone please tell me where I've screwed up? I thought this would be
the easy part of this whole project I've been working on! ;)




  #5   Report Post  
Bernie Deitrick
 
Posts: n/a
Default

Abi,

It worked for me. Try setting the TakeFocusOnClick property of the button to
False.

HTH,
Bernie
MS Excel MVP

"Abi" wrote in message
...
I used the second suggestion (copied it in) and the button printed the

first
page (Title Page) but then I got a run-time error for the rest. ???

"Bernie Deitrick" wrote:

Private Sub CommandButton1_Click ( )

PrintQuote
End Sub

and the code for the PrintQuote need to go into a standard codemodule,

not
the worksheet's codemodule.

Or, you could simply use

Private Sub CommandButton1_Click ( )
Sheets("Title Page").Select
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Sheets(Array("Thankyou", "AV EQ", "QuoteSummary", "Terms", "Punch
List")).Select
Sheets("Thankyou").Activate
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
End Sub


HTH,
Bernie
MS Excel MVP

"Abi" wrote in message
...
Okay. Pretend I'm a totally idiot and and can't seem to get anything

to
work
right! :)

Now, I have done a few macros before (basically just recording them

and
then
assigning them to controls - but have not done this in Excel before,

so
maybe
I'm missing something here). I don't know how to code at all.

ALL I want to do is have a user click on one button and - viola - the

macro
does its thing.

The macro I have recorded prints several sheets in a workbook. It

works.
I
tried it out and it works.

Here's what I've done so far.
1 - recorded a macro to print pages.
2 - created a button on one sheet. Right-clicked on it and selected

View
Code.
3 - I inserted my macro in the VB editor by opening up the macro and
copy/pasting it into the VB editor after:
Private Sub CommandButton1_Click ( )
End Sub
-------------------------------------------------------------
Sub PrintQuote()
'
' PrintQuote Macro
' Macro recorded 1/12/2005 by XXX
'

'
Sheets("Title Page").Select
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Sheets(Array("Thankyou", "AV EQ", "QuoteSummary", "Terms", "Punch
List")).Select
Sheets("Thankyou").Activate
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
End Sub

Can someone please tell me where I've screwed up? I thought this

would be
the easy part of this whole project I've been working on! ;)








  #6   Report Post  
Abi
 
Posts: n/a
Default

Well, I made the True/False change, and then started over and hand-typed the
entire script over again...and it worked! (At least, it worked that time!)
THANK YOU SO MUCH!!!!!!

"Bernie Deitrick" wrote:

Abi,

It worked for me. Try setting the TakeFocusOnClick property of the button to
False.

HTH,
Bernie
MS Excel MVP

"Abi" wrote in message
...
I used the second suggestion (copied it in) and the button printed the

first
page (Title Page) but then I got a run-time error for the rest. ???

"Bernie Deitrick" wrote:

Private Sub CommandButton1_Click ( )

PrintQuote
End Sub

and the code for the PrintQuote need to go into a standard codemodule,

not
the worksheet's codemodule.

Or, you could simply use

Private Sub CommandButton1_Click ( )
Sheets("Title Page").Select
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Sheets(Array("Thankyou", "AV EQ", "QuoteSummary", "Terms", "Punch
List")).Select
Sheets("Thankyou").Activate
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
End Sub


HTH,
Bernie
MS Excel MVP

"Abi" wrote in message
...
Okay. Pretend I'm a totally idiot and and can't seem to get anything

to
work
right! :)

Now, I have done a few macros before (basically just recording them

and
then
assigning them to controls - but have not done this in Excel before,

so
maybe
I'm missing something here). I don't know how to code at all.

ALL I want to do is have a user click on one button and - viola - the
macro
does its thing.

The macro I have recorded prints several sheets in a workbook. It

works.
I
tried it out and it works.

Here's what I've done so far.
1 - recorded a macro to print pages.
2 - created a button on one sheet. Right-clicked on it and selected

View
Code.
3 - I inserted my macro in the VB editor by opening up the macro and
copy/pasting it into the VB editor after:
Private Sub CommandButton1_Click ( )
End Sub
-------------------------------------------------------------
Sub PrintQuote()
'
' PrintQuote Macro
' Macro recorded 1/12/2005 by XXX
'

'
Sheets("Title Page").Select
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Sheets(Array("Thankyou", "AV EQ", "QuoteSummary", "Terms", "Punch
List")).Select
Sheets("Thankyou").Activate
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
End Sub

Can someone please tell me where I've screwed up? I thought this

would be
the easy part of this whole project I've been working on! ;)






Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
New Excel user needs help with simple Macro... Rahim Kassam New Users to Excel 1 January 24th 05 02:10 PM
Help with macro formula and variable Huge project Excel Worksheet Functions 0 December 28th 04 01:27 AM
Macro and If Statement SATB Excel Discussion (Misc queries) 2 December 3rd 04 04:46 PM
Macro Formula revision? Mark Excel Worksheet Functions 1 November 28th 04 01:43 AM
Macro for multiple charts JS Excel Worksheet Functions 1 November 19th 04 03:44 AM


All times are GMT +1. The time now is 05:30 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Copyright ©2004-2025 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"