Decimal formatting for output to text file

[jcrook]

Good Afternoon,
I am taking input from excel data and manipulating the values to generate CNC program code for metal cutting CNC machines. I'm sure there are many things wrong with this macro. But, I need to output a numbers to a ".txt" file that has at least a decimal point. The values that are currently "doubles" are output with a decimal. The values that are entered into the spreadsheet as decimals, ex: 1.0 or 3.0, endup as integers upon output to the text file. This is a no-no for a cnc control because a coordinate like X4 is actually read as X0.0004 because the industry standard is 4 places to the right of the decimal point if none is input. Where X1. = X1., again X3 = X0.0003. This is tenths of thousands in inch.
I've a screen shot of the spreadsheet, the text output, and some screen shots of the macro code where I'm printing to the text file. I'm not using "Write" because it includes the "" marks, these are not understood by the control.
I need to output everything as a decimal number(double). I would like all values to have at least 1 zero to the right of the dec pt, X1 = X1.0.
Thanks in Advance,
Jay.

 

[pjmorris]

delighted to have helped. Another thought would be to do all the calculations in Excel rather than VBA - you would be able to see all the results before printing and could structure a page with all the output cells in the right order for checking before simply saving that region as a text file. Possibly no need for VBA at all.

All the best.

 

[jcrook]

Hi Peter,
Thanks Again for our help.
I have another worksheet in the same workbook similar to your last reply.
I'll look at outputting that region to a text file.

Thanks Again,
Jay.

 

[pjmorris]

Hope it works All the best.