totalfile

Please, I need a search textbox for this code Private Sub UserForm_Initialize() Dim x As Long, FileNum As Long, TotalFile As String, Lines As Variant FileNum = FreeFile Open "C:\Temp\History.txt" For Binary As #FileNum TotalFile = Space(LOF(FileNum)) Get #FileNum , , TotalFile Close #FileNum...

Hello, I have hundreds of text files that have lots of random text (hundreds of lines). The only text they have in common (minus the variables that I need) is shown below. BIngooK~G______ÿþÿ_T_O___4_T_5_0___H_Y_3_B___7_K_4_P_____ÿþÿ_%_5_7_%___d_ÿþÿ 1_1_1_1_2_2_2_ÿþÿ...

Hello, I have the below VBA code that pastes data from a text file into Cell C20 if the "show data" string exists in the file: Dim FileNum As Long, TotalFile As String FileNum = FreeFile Open "C:\pete.txt" For Binary As #FileNum TotalFile = Space(LOF(FileNum)) Get #FileNum , ...

Hello, I have the below code that inserts data from a text file into cell A1, if the text file contains the string "Checking for drops": Dim FileNum As Long, TotalFile As String FileNum = FreeFile Open "C\pete.txt" For Binary As #FileNum TotalFile = Space(LOF(FileNum)) Get #FileNum...