{"id":106,"date":"2002-03-27T12:00:00","date_gmt":"2002-03-27T12:00:00","guid":{"rendered":"http:\/\/editorium.com\/archive\/?p=106"},"modified":"2013-10-25T23:10:20","modified_gmt":"2013-10-25T23:10:20","slug":"copying-and-pasting-styles","status":"publish","type":"post","link":"https:\/\/editorium.com\/archive\/copying-and-pasting-styles\/","title":{"rendered":"Copying and Pasting Styles"},"content":{"rendered":"<p>If you frequently use styles (which you should) to format your documents or specify text levels for typesetting, you're probably aware that you can press CTRL + SHIFT + S to activate the style list. (Then you can scroll through the list to get the style you need.)<\/p>\n<p>You may not be aware, however, that you can easily copy and paste styles (both paragraph and character styles), just as you can copy and paste text. If you've never done this before, it will make you smile. Here's the procedure:<\/p>\n<p>1. Put your cursor on some text formatted with the style you want to copy (Heading 1, for example).<\/p>\n<p>2. Press CTRL + SHIFT + C (just like the keyboard shortcut for copying text, but with the SHIFT key added).<\/p>\n<p>3. Move your cursor to (or select) the text you want to format with the style you just copied.<\/p>\n<p>4. Press CTRL + SHIFT + V (just like the keyboard shortcut for pasting text, but with the SHIFT key added).<\/p>\n<p>The text will be formatted with the style you copied.<\/p>\n<\/p>\n<p>_________________________________________<\/p>\n<p>READERS WRITE<\/p>\n<p>Jeff Ross sent the following macro to clean up text copied into Word from an email message. Thanks, Jeff!<\/p>\n<pre><span style=\"color: black; font-family: Courier New; font-size: small;\">\nSub CleanMyMessage()\n' CleanMyMessage Macro\n' Macro recorded 3\/11\/02 by Jeff Ross\n'Remove angle brackets with spaces\nWith Selection.Find\n.Text = \"> \"\n.Replacement.Text = \"\"\n.Forward = True\n.Wrap = wdFindContinue\n.Format = False\n.MatchCase = False\n.MatchWholeWord = False\n.MatchWildcards = False\n.MatchSoundsLike = False\n.MatchAllWordForms = False\nEnd With\nSelection.Find.Execute Replace:=wdReplaceAll\n'Remove other angle brackets\nWith Selection.Find\n.Text = \">\"\n.Replacement.Text = \"\"\n.Forward = True\n.Wrap = wdFindContinue\n.Format = False\n.MatchCase = False\n.MatchWholeWord = False\n.MatchWildcards = False\n.MatchSoundsLike = False\n.MatchAllWordForms = False\nEnd With\nSelection.Find.Execute Replace:=wdReplaceAll\n'Remove spaces before paragraph breaks\nWith Selection.Find\n.Text = \" ^p\"\n.Replacement.Text = \"^p\"\n.Forward = True\n.Wrap = wdFindContinue\n.Format = False\n.MatchCase = False\n.MatchWholeWord = False\n.MatchWildcards = False\n.MatchSoundsLike = False\n.MatchAllWordForms = False\nEnd With\nSelection.Find.Execute Replace:=wdReplaceAll\n'Mark true paragraph breaks with unique character\nSelection.Find.ClearFormatting\nSelection.Find.Replacement.ClearFormatting\nWith Selection.Find\n.Text = \"^p^p\"\n.Replacement.Text = \"?\"\n.Forward = True\n.Wrap = wdFindContinue\n.Format = False\n.MatchCase = False\n.MatchWholeWord = False\n.MatchWildcards = False\n.MatchSoundsLike = False\n.MatchAllWordForms = False\nEnd With\nSelection.Find.Execute Replace:=wdReplaceAll\n'Replace other (false) paragraph breaks with spaces\nWith Selection.Find\n.Text = \"^p\"\n.Replacement.Text = \" \"\n.Forward = True\n.Wrap = wdFindContinue\n.Format = False\n.MatchCase = False\n.MatchWholeWord = False\n.MatchWildcards = False\n.MatchSoundsLike = False\n.MatchAllWordForms = False\nEnd With\nSelection.Find.Execute Replace:=wdReplaceAll\n'Replace unique character with paragraph break\nWith Selection.Find\n.Text = \"?\"\n.Replacement.Text = \"^p\"\n.Forward = True\n.Wrap = wdFindContinue\n.Format = False\n.MatchCase = False\n.MatchWholeWord = False\n.MatchWildcards = False\n.MatchSoundsLike = False\n.MatchAllWordForms = False\nEnd With\nSelection.Find.Execute Replace:=wdReplaceAll\n'Turn double hyphens to em dashes\nWith Selection.Find\n.Text = \"--\"\n.Replacement.Text = \"^+\"\n.Forward = True\n.Wrap = wdFindContinue\n.Format = False\n.MatchCase = False\n.MatchWholeWord = False\n.MatchWildcards = False\n.MatchSoundsLike = False\n.MatchAllWordForms = False\nEnd With\nSelection.Find.Execute Replace:=wdReplaceAll\n'Turn straight single quotation marks into curly ones\n'Note: For this to work, the AutoFormat option\n'to replace straight quotes with curly quotes must be on\n'(Click Tools > AutoCorrect > AutoFormat As You Type >\n'Replace as you type > straight quotes with smart quotes)\nSelection.Find.Execute Replace:=wdReplaceAll\nWith Selection.Find\n.Text = \"'\"\n.Replacement.Text = \"'\"\n.Forward = True\n.Wrap = wdFindContinue\n.Format = False\n.MatchCase = False\n.MatchWholeWord = False\n.MatchWildcards = False\n.MatchSoundsLike = False\n.MatchAllWordForms = False\nEnd With\nSelection.Find.Execute Replace:=wdReplaceAll\n'Turn straight double quotation marks into curly ones\n'Note: For this to work, the AutoFormat option\n'to replace straight quotes with curly quotes must be on\n'(Click Tools > AutoCorrect > AutoFormat As You Type >\n'Replace as you type > straight quotes with smart quotes)\nSelection.Find.Execute Replace:=wdReplaceAll\nWith Selection.Find\n.Text = \"\"\"\"\n.Replacement.Text = \"\"\"\"\n.Forward = True\n.Wrap = wdFindContinue\n.Format = False\n.MatchCase = False\n.MatchWholeWord = False\n.MatchWildcards = False\n.MatchSoundsLike = False\n.MatchAllWordForms = False\nEnd With\nSelection.Find.Execute Replace:=wdReplaceAll\nEnd Sub\n<\/pre>\n<p><\/span><\/p>\n<p>If you don't know how to use macros like this one, you can learn how <a href=\"https:\/\/editorium.com\/archive\/using-found-macros\/\" target=\"_blank\">here.<\/a><\/p>\n<\/p>\n<p>_________________________________________<\/p>\n<p>RESOURCES<\/p>\n<p>Dan A. Wilson, expert online editor and proprietor of The Editor's Desktop, provides several useful resources for editors, including:<\/p>\n<p>* a basic FTP tutorial (if you need to transmit electronic manuscripts to clients)<\/p>\n<p>* suggestions for choosing anti-virus software<\/p>\n<p>* a discussion of freelancers' rates<\/p>\n<p>* a recommended list of reference works (printed and electronic) for editors<\/p>\n<p>* a low-tech guide to Wintel computer maintenance<\/p>\n<p>* information about installing a firewall on your computer<\/p>\n<p>You can read Dan's articles here:<\/p>\n<p>http:\/\/www.editorsdesktop.com\/articles.html<\/p>\n<p>And you can check out his editing services here:<\/p>\n<p>http:\/\/www.editorsdesktop.com\/index.html<\/p><\/p>\n","protected":false},"excerpt":{"rendered":"<a href=\"https:\/\/editorium.com\/archive\/copying-and-pasting-styles\/\" rel=\"bookmark\" title=\"Permalink to Copying and Pasting Styles\"><p>If you frequently use styles (which you should) to format your documents or specify text levels for typesetting, you&#8217;re probably aware that you can press CTRL + SHIFT + S to activate the style list. (Then you can scroll through the list to get the style you need.) You may not be aware, however, that [&hellip;]<\/p>\n<\/a>","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"jetpack_post_was_ever_published":false,"_jetpack_newsletter_access":"","_jetpack_dont_email_post_to_subs":false,"_jetpack_newsletter_tier_id":0,"_jetpack_memberships_contains_paywalled_content":false,"_jetpack_memberships_contains_paid_content":false,"footnotes":"","jetpack_publicize_message":"","jetpack_publicize_feature_enabled":true,"jetpack_social_post_already_shared":false,"jetpack_social_options":{"image_generator_settings":{"template":"highway","default_image_id":0,"font":"","enabled":false},"version":2}},"categories":[3],"tags":[],"class_list":{"0":"post-106","1":"post","2":"type-post","3":"status-publish","4":"format-standard","6":"category-editing","7":"h-entry","8":"hentry"},"jetpack_publicize_connections":[],"jetpack_featured_media_url":"","jetpack_sharing_enabled":true,"jetpack_shortlink":"https:\/\/wp.me\/p3gfno-1I","_links":{"self":[{"href":"https:\/\/editorium.com\/archive\/wp-json\/wp\/v2\/posts\/106","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/editorium.com\/archive\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/editorium.com\/archive\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/editorium.com\/archive\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/editorium.com\/archive\/wp-json\/wp\/v2\/comments?post=106"}],"version-history":[{"count":3,"href":"https:\/\/editorium.com\/archive\/wp-json\/wp\/v2\/posts\/106\/revisions"}],"predecessor-version":[{"id":804,"href":"https:\/\/editorium.com\/archive\/wp-json\/wp\/v2\/posts\/106\/revisions\/804"}],"wp:attachment":[{"href":"https:\/\/editorium.com\/archive\/wp-json\/wp\/v2\/media?parent=106"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/editorium.com\/archive\/wp-json\/wp\/v2\/categories?post=106"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/editorium.com\/archive\/wp-json\/wp\/v2\/tags?post=106"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}