Go Premium for a chance to win a PS4. Enter to Win

x
  • Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 393
  • Last Modified:

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.
0
Ren_kha
Asked:
Ren_kha
1 Solution
 
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
 
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
Independent Software Vendors: We Want Your Opinion

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

 
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
 
DhaestCommented:
Normally it should work with excell, word, .... because I didn't use any special things.
0
 
Ren_khaAuthor Commented:
Dear Dhaest,
 Many thanks for your quick action.
 I hope to have your help in future again.
 Yours,
 Reno.
0

Featured Post

Concerto's Cloud Advisory Services

Want to avoid the missteps to gaining all the benefits of the cloud? Learn more about the different assessment options from our Cloud Advisory team.

Tackle projects and never again get stuck behind a technical roadblock.
Join Now