#filenum

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...

I am trying to use the below code to download a list of daily reports from password protected sites. The server seems to be blocking the request. I have no issues when manually logging in to download each report. I am using Excel 2013 and not positive that this is the correct WinHTTP...

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_ÿþÿ...

Hi all, I've got the code below from the microsoft support website https://support.microsoft.com/en-us/help/291296/procedure-to-export-a-text-file-with-both-comma-and-quote-delimiters-i The problem is it's working a little too well. I only need the First Row of the columns (basically the table...

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...

I'm trying to use this example http://www.vbaexpress.com/kb/getarticle.php?kb_id=977 but get a Run-time error '75' Path/File access error on this line of the subroutine: Sub ReadTextFile() Dim FileNum As Integer Dim r As Integer Dim wb As Workbook Dim Data As String r = 1...