Areil, you may not have the same shortcuts set up. I made this to use when I need to copy text from one paragraph within cd and paste to another paragraph that has a different font and or color and I want the added text to take on those settings. Look at this illustration. Create two lines of artistic text. Copy the text "bananas" and paste into the "Apples" line. Text doesn't drop in as red, bold nor same size as Apples. If you use the macro first then paste it will take on those attributes. Sub CopyTest() Call Shell("NOTEPAD.EXE", vbNormalFocus) 'opens notepad SendKeys "^(v)" 'shortcut to paste SendKeys "^(a)" 'shortcut to select all SendKeys "^(c)" 'shortcut to copy SendKeys "%{F4}" 'alt+F4 -shortcut to escape SendKeys "{Right}" 'selects don't save SendKeys "{ENTER}" End Sub
↧