dynamictiger
Registered User.
- Local time
- Today, 10:06
- Joined
- Feb 3, 2002
- Messages
- 270
Hi All
I have a table which contains a scope of works for some job we are doing. The data is entered in the format similar to:
1: Open the door
2: Walk through the door
3: Close the door
I am processing this through VBA and adding other variables in such as quoted amount, and variations etc. Dressing it in a msg to something like:
Thank you for the opportunity to provide the following:
1: Open the door
2: Walk through the door
3: Close the door
As quoted for $100.00 + G.S.T.
variations on this job were:
Fitted a new door $600.00 + G.S.T.
Total for this invoice $700.00 + G.S.T
Then I need to output it to a text file as our accounting system only supports text files in the invoice wording section.
Using the following code:
Or as an alternative:
In either version I end up with:
Thank you for the opportunity to provide the following:
1: Open the door2: Walk through the door3: Close the doorAs quoted for $100.00 + G.S.T.
variations on this job were:
Fitted a new door $600.00 + G.S.T.
Total for this invoice $700.00 + G.S.T
As the scope is a constantly variable length and content I am trying to find a simple way to control the formatting so the text file outputs as we want it to be on printing on the clients invoice.
Any suggestions?
I have a table which contains a scope of works for some job we are doing. The data is entered in the format similar to:
1: Open the door
2: Walk through the door
3: Close the door
I am processing this through VBA and adding other variables in such as quoted amount, and variations etc. Dressing it in a msg to something like:
Thank you for the opportunity to provide the following:
1: Open the door
2: Walk through the door
3: Close the door
As quoted for $100.00 + G.S.T.
variations on this job were:
Fitted a new door $600.00 + G.S.T.
Total for this invoice $700.00 + G.S.T
Then I need to output it to a text file as our accounting system only supports text files in the invoice wording section.
Using the following code:
Code:
CopyTextToClipboard strWording
Debug.Print GetTextFromClipboard()
Open "C:\Users\David\Documents\MYTESTFILE.TXT" For Output As #1
Print #1, GetTextFromClipboard()
Close #1
Or as an alternative:
Code:
Open "C:\Users\David\Documents\MYTESTFILE.TXT" For Output As #1
Write #1, strWording
Close #1
In either version I end up with:
Thank you for the opportunity to provide the following:
1: Open the door2: Walk through the door3: Close the doorAs quoted for $100.00 + G.S.T.
variations on this job were:
Fitted a new door $600.00 + G.S.T.
Total for this invoice $700.00 + G.S.T
As the scope is a constantly variable length and content I am trying to find a simple way to control the formatting so the text file outputs as we want it to be on printing on the clients invoice.
Any suggestions?