kermor wrote on Tue, 27 Nov 2007 13:05:03 -0800:
k> Hi Bob,
k> Can you help me with above?
k> Thanks.
k> --
k> brittany
k> "kermor" wrote:
??>> Thank you bob, I will keep those examples for other
??>> purposes. I have already my layout with log etc. What I
??>> need to do is to cut and paste and have 10 business cards
??>> per page!
??>>
??>> --
??>> brittany
??>>
??>> "Bob I" wrote:
??>>
??>>>
http://office.microsoft.com/en-us/templates/results.aspx?qu=business+card&av=TPL000
??>>>
??>>> kermor wrote:
??>>>> Could you please explain how to create a business card
??>>>> in Word 2007...? I can't find it in the Ribbon or
??>>>> eventually the appropriate template for business card...
??>>>> Thank you for your help>
I haven't got 2007 but would the template be much different from
previous versions? Once I set up my template following the
instructions with the card stock from Avery, all I needed was to
write a macro to copy the top left cell of the table to the
other 9. That beats manual cutting and pasting.
Will this work in 2007?
Sub Copy_cell()
'
' This macro copies the first cell of a 5 x 2
' table to the remaining nine to make business cards.
' Original, non-loop Macro RECORDED 02/18/00 by James V
Silverton.
' Select the first cell.
ActiveDocument.Tables(1).Cell(1, 1).Select
' I get puzzled by this every time; I tend to forget that
"Copy",
' or Selection.Copy, like CNTL-C, means make a copy onto the
clipboard.
Selection.Copy
' Now Paste the first cell to all the rest.
For icell = 1 To 9
Selection.MoveRight Unit:=wdCell
Selection.Paste
Next icell
' Finally, return to first cell
Selection.HomeKey Unit:=wdStory
End Sub
James Silverton
Potomac, Maryland
E-mail, with obvious alterations:
not.jim.silverton.at.verizon.not
