Public Sub edit_sub() Dim myFile As String Dim opFile As Integer myFile = "fileLocation" opFile = FreeFile Open myFile For Input As opFile Do Until EOF(opFile) Line Input #opFile, txtline Debug.Print txtline 'check some condition and then edit 'replace the value Loop Close opFile End Sub
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)