I need a macro!!!

how can I write a macro either in Excell 2000 or VB to do the following work for me:
 XXXXXX will change to XXXX, BB, XX
AAAAAA  will change to AAAA BB AA
 I mean that I have a very big file that has about two thousand lines and each line has six characters (letters and
numbers only).
 I need tochange them inthis way:
 First the first four characters then a camma then BB then
 camma then the last two charachters of the same line.
 this must be done more than 2000 times !!!!
 and some times I need to do it just in half an hour !!!
 I must say that the original file is text file, but can be opened
 with Excell, word, ....
thanks in advance.
Ren_khaAsked:
Who is Participating?
 
DhaestCommented:
Normally it should work with excell, word, .... because I didn't use any special things.
0
 
mlmccCommented:
Is this always the same changes?
You could do it by hand for 1 line while recording a macro.
Does Search and replace not work?

mlmcc
0
 
nigelbeCommented:
is it a normal text (.TXT) file?

0
Ultimate Tool Kit for Technology Solution Provider

Broken down into practical pointers and step-by-step instructions, the IT Service Excellence Tool Kit delivers expert advice for technology solution providers. Get your free copy now.

 
DhaestCommented:
Just replace your old and new filename in the open-statement

sub ChangeFile
Dim fh, fh2 As Integer
Dim line As String
fh = FreeFile
fh2 = fh + 1
Open "c:\test.txt" For Input As #fh
Open "c:\test3.txt" For Random As #fh2

Do While Not EOF(fh)
  Line Input #fh, line
  line = Left(line, 4) & ", BB, " & Right(line, 2)
  Put #fh2, , line
Loop

Close fh
Close fh2
end sub
0
 
Ren_khaAuthor Commented:
Dear mlmcc,
 To be honest I am going to need more Macros in future. So,
 please tell me about your method to enable me to write Macros.
 Thanks.
 Reno.
0
 
DhaestCommented:
Fe: in Word
Tools - Macro - record new macro.
Now you can do whatever you want. It will be recorded and so you can recall it through tools - macro - macros
0
 
Ren_khaAuthor Commented:
dear Nigelbe,
 Thanks for your attention. It is allways a text file. But I can
 open it with any thing such as Excell, Word, notepad, wordpad.
 Since, it is only lletters and numbers and cammas (,,,,,).
 hope that you can give me some more advice.
 Thanks,
 Reno.
0
 
Ren_khaAuthor Commented:
Dear Dhaest,
 many thanks for your quick replies.
 I was just going to ask my question but you kindly answered it.
 So it will work in EXCELL 2000.
 Again let me thank you.
 Yours,
 Reno.
 
0
 
Ren_khaAuthor Commented:
Dear Dhaest,
 Many thanks for your quick action.
 I hope to have your help in future again.
 Yours,
 Reno.
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.