|
|
#1
1st Mar 2008, 06:42
|
|||
|
|||
|
I need to know how to create a macro so that when i press a command button a wrksheet will print two copies of the cell range.
Thanks |
|
#2
1st Mar 2008, 06:48
|
||||||||||||
|
||||||||||||
|
Have you selected a spreadsheet program to do this in yet?
__________________
My System: Tim
|
|
#3
1st Mar 2008, 06:49
|
|||
|
|||
|
yeh sorry its in excel
|
|
#4
1st Mar 2008, 07:03
|
|||
|
|||
|
Any particular version of excel? I hate to be pushy but.
|
|
#5
1st Mar 2008, 07:27
|
|||
|
|||
|
well at home im usin 2007, but im out atm so im usin 2003 where i am atm
|
|
#6
1st Mar 2008, 07:31
|
|||
|
|||
|
okay, this ought to work on both.
Sub PrintRange() ' ' PrintRange Macro ' This will print 2 copies of a worksheet preselected range ' Application.ScreenUpdating = False Sheets("Sheet1").Select ActiveSheet.Unprotect ActiveWindow.Range("C5:D17").PrintOut Copies:=2 Application.ScreenUpdating = True End Sub If you have trouble creating a button or hooking the code to it then say and we'll talk you through it. |
|
#7
8th Mar 2008, 05:35
|
|||
|
|||
|
Sorry for a delayed response. Thanks I will try this and will give you feedback as soon as possible :)
|
|
#8
8th Mar 2008, 06:03
|
|||
|
|||
|
What's in that example is fairly random, I've no idea whether you've multiple sheets or you've protected areas or you want to end up somewhere different after the macro's run than where you were when you clicked it. Or whether your worksheet range is based on labels or on hard cell addresses. I suggest you play with the syntax a bit, the line that does all the work is
ActiveWindow.Range("C5:D17").PrintOut Copies:=2 and you can change that to your heart's content. |
|
#9
8th Mar 2008, 06:36
|
|||
|
|||
|
Thanks for the help guys... I have done it now.
|
