Paste Data To WordPad TXT File
I have a fairly simple macro that copies data from a few sheets and
consolidates it (via paste) into one sheet. I know what to copy this consoldiates data in this sheet (say A1:G65) and I want to copy it and paste it into a wordpad document file (NewData.txt) and save the txt file once it is pasted so i can then do some different work with the txt file. How do i call these tasks from within an excel macro? thx davem |
Paste Data To WordPad TXT File
You can't automate WordPad or NotePad, unless you use the dreaded SendKeys
method. It would be much easier to use VB's own file input/output functions to write the text file. Something along the lines of Sub WriteToTextFile() Dim FName As Variant Dim FNum As Integer Dim R As Range FName = Application.GetSaveAsFilename(filefilter:="Text Files (*.txt),*.txt") If FName = False Then ' user cancelled Exit Sub End If FNum = FreeFile() Open FName For Output Access Write As #FNum For Each R In Range("A1:A10") Print #FNum, R.Text Next R Close #FNum End Sub See also www.cpearson.com/Excel/ImpText.aspx -- Cordially, Chip Pearson Microsoft MVP - Excel, 10 Years Pearson Software Consulting www.cpearson.com (email on the web site) "DaveM" wrote in message ... I have a fairly simple macro that copies data from a few sheets and consolidates it (via paste) into one sheet. I know what to copy this consoldiates data in this sheet (say A1:G65) and I want to copy it and paste it into a wordpad document file (NewData.txt) and save the txt file once it is pasted so i can then do some different work with the txt file. How do i call these tasks from within an excel macro? thx davem |
All times are GMT +1. The time now is 09:26 PM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com