Hi Everyone,
Attached is an add-in I made for exporting to text files. Testing/Finding Errors/Suggestions much appreciated!
Thanks!!
Matt
Hi Everyone,
Attached is an add-in I made for exporting to text files. Testing/Finding Errors/Suggestions much appreciated!
Thanks!!
Matt
Last edited by mvidas; 08-17-2004 at 11:54 AM. Reason: Removed attachment, added to later post
Also, if something doesn't look right or is mispelled or anything else (even minor), please let me know as well
Hi Matt,
Just a quick note: if there is no active workbook, the following line fails:
You could check for 'ActiveWorkbook Is Nothing' before that line.Private Sub UserForm_Activate() If Left(Right(ActiveWorkbook.Name, 4), 1) = "." Then
I haven't had time try the tool yet.
Regards,
S?bastien
Seb
Good point... consider it fixed, thanks!
By the way, I'm using excel 2000 sr1, if anyone gets any errors please let me know what version you're using
On top of the no-activeworkbook thing Seb mentioned, I also fixed the msgbox text for when no delimiter is entered and fixed width is not checked (was missing a space).
Anyone know offhand how to make it so the escape key hides the userform?
There is no direct ESC for the Userform. The way it works is that you set the Cancel's button property called Cancel to True. That is, pressing ESC triggers the cancel_Click and runs that code.
Regards,
Seb
Perfect!
Revised add-in attached
Thanks Seb!
Last edited by mvidas; 08-18-2004 at 06:32 AM. Reason: Removed attachment, added to later post
quick update, fixed an error in ExportButton_Click sub, changed ActiveSheet.Close to ActiveWorkbook.Close (for fixed width exports)
I have made a few minor aesthetic changes, as well as an added functionality for the fixed width exports. Most recent version attached. All comments are appreciated!
Thanks
Matt