Copy from Excel, Paste into Notepad

[Flicka]

Hello,

Could a kind person give me a script that...

• Copies cells A1 to A26
• Opens Notepad
• Pastes cells A1 to A26 into Notepad

Thank you very much.

Felicity

 

[Roderick_E]

Hello,

Could a kind person give me a script that...

• Copies cells A1 to A26
• Opens Notepad
• Pastes cells A1 to A26 into Notepad

Thank you very much.

Felicity

range("A1:A26").select
Selection.Copy

Then press cntrl+V to paste somewhere

 

[Flicka]

range("A1:A26").select
Selection.Copy

Then press cntrl+V to paste somewhere

I know how to do that I need it to do it automatically, via VBA.

 

[Akuini]

Try this:

[COLOR=blue]Sub[/COLOR] toNotepad[B]()[/B]
    Range[B]([/B][COLOR=brown]"A1:A26"[/COLOR][B]).[/B]Copy
    [I][COLOR=seagreen]'Open Notepad[/COLOR][/I]
    Shell [COLOR=brown]"notepad.exe"[/COLOR][B],[/B] vbNormalFocus
    [I][COLOR=seagreen]'Paste the range[/COLOR][/I]
    SendKeys [COLOR=brown]"^V"[/COLOR]
[COLOR=blue]End[/COLOR] [COLOR=blue]Sub[/COLOR]