For more information about concatenating strings please see VBA Excel String Processing a nd Manipulation: The next line concatenates the first 2 columns without making any changes.

For example for the first line (“1 John 134$”):įor more information about splitting strings please see Excel VBA String Processing and Manipulation, Splitting Strings: The line below splits the input string based on the space delimiter (” “). It adds 100$ to the last column and returns the result as output: The function Modif圜olumn3() receives as input a line of text from the original text file. The return value from the function Modif圜olumn3() is then concatenated with the string strFinal. After passing it to the function Modif圜olumn3() the output value will be “1 John 234$”. For example for the first line strLine has the value “1 John 134$”. Modif圜olumn3() adds 100$ dollars to the last part of the input string. The line below passes the string strLine to the function Modif圜olumn3(). The line below reads the current line of the text file and stores it in the variable strLine: The code below loops through the text file until the last line is reached: The line below opens the text file for reading: The final result can be seen in the figure below: Creates a new string variable with the modified data.Īlthough it seems we are modifying the original file but we are actually overwriting the original file with a new file.Opens the text file and reads all the lines.

StrOutput = strOutput + Strings.Trim(Str( CDbl(Left(arrString(2), _ StrOutput = arrString(0) + ' ' + arrString(1) + ' ' 'concatenate the first 2 column as they are 'this function adds 100$ to the last columnįunction Modif圜olumn3( ByVal strInput As String) As String StrFinal = Left(strFinal, Len(strFinal) - 2) StrFinal = strFinal + Modif圜olumn3(strLine) 'concatenate the modified line to the rest of the string 'read the current line from the text file 'loop until the end of the text file is reached The code below adds 100$ to the 3rd column: In this example the following data is in a text file located in the path “D:Temp with the name “Test.txt”:

Overriding text in davka software