Testing help wanted!

Hi Everyone,

Attached is an add-in I made for exporting to text files. Testing/Finding Errors/Suggestions much appreciated!

Thanks!!
Matt

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:

Code:

---

Private Sub UserForm_Activate()
      If Left(Right(ActiveWorkbook.Name, 4), 1) = "." Then

---

You could check for 'ActiveWorkbook Is Nothing' before that line.
I haven't had time try the tool yet.

Regards,
S?bastien

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,

Perfect!

Revised add-in attached

Thanks Seb!

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