I am repeatedly performing a task to format a couple of columns to remove leading zeros.
Currently I am running 'Text to Columns' on each individual field and selecting Delimited, Tab and General, which will lose the leading zeros.
I would like to automate this however using VBA, however I am struggling with the code.
I only want to perform this output on two columns;
SORTSEQ
BAGNO
I would really appreciate some help.
What type of data is in those 2 columns, I presume they are numbers with leading 0's?
From your description it sounds like you have numbers stored as text and are using text to columns to convert them to numeric values, is that correct?
Can you post a sample with your raw data (before txt to columns) and after (what it looks like after you do it manually)?
There are at least 3 ways to do this manually, which means there is at least 3 ways to do it via VBA I can think of, which way we use will depend on how your data is structured.
Ways to get help: Post clear questions, explain your overall goal, supply as much background as possible, respond to questions asked of you by those trying to help and post sample(s) files.
"I am here to help, not do it for people" -Me
What code do you have and what problems are you having?
It should be straightforward to find the 2 columns you want to work on and incorporate that into the code.
If posting code please use code tags, see here.
Sorry for the late reply - I have been off for the Christmas holidays.
Yes that's correct, the numbers are stored as text, however I want to convert to number which will in turn remove the leading zeros.
Example data before text to columns;
000001
000002
000003
000004
000005
Example data after text to columns;
1
2
3
4
5
Some code to automate this process for the columns named 'SORTSEQ' and 'BAGNO' would be a great help!
Thanks again.
Try
Please Login or Register to view this content.
Perfect, thank you for your quick response
You are welcome.
If that takes care of your original question, please select Thread Tools from the menu link above and mark this thread as SOLVED.
There are currently 1 users browsing this thread. (0 members and 1 guests)
Posting Permissions
LinkBack URL
About LinkBacks
Register To Reply
Bookmarks