Is there a way to import data from .csv to active excel sheet?

by

Add this code to create a QueryTable in the PO Data sheet to your data source

Once you have created the QueryTable you can then just right click Refresh the data (or refresh on open) 

Sub CSV_Import()
Dim ws As Worksheet, strFile As String

Set ws = ActiveWorkbook.Sheets("PO Data") 'set to current worksheet name

strFile = Application.GetOpenFilename("Text Files (*.csv),*.csv", , "Please select text file...")

With ws.QueryTables.Add(Connection:="TEXT;" & strFile, Destination:=ws.Range("A1"))
     .TextFileParseType = xlDelimited
     .TextFileCommaDelimiter = True
     .Refresh
End With
End Sub

More Related Contents:

  1. How do you change the value of a cell in excel by clicking on it using VBA? [closed]
  2. How to avoid using Select in Excel VBA
  3. How do I use FileSystemObject in VBA?
  4. Convert Text to Date?
  5. Run Excel Macro from Outside Excel Using VBScript From Command Line
  6. Importing text file into excel sheet
  7. Loop through each cell in a range of cells when given a Range object
  8. Checking for #N/A in Excel cell from VBA code
  9. Non-web SQL Injection
  10. Error: “Could Not Find Installable ISAM”
  11. Filling any empty cells with the value above
  12. Is there a way to slow down a Web Scraper so it will pick up the code?
  13. Create a folder and sub folder in Excel VBA
  14. One-dimensional array from Excel Range
  15. Renaming Files with Excel VBA
  16. Delete cells in an Excel column when rows = 0
  17. VBA Many buttons point to the same _Click sub
  18. Sorting a dictionary by key in VBA
  19. VBA paste as values – how to
  20. What are the benefits of using Classes in VBA? [closed]
  21. Writing a VLOOKUP function in vba
  22. Generate Word Documents (in Excel VBA) from a series of Document Templates
  23. Handle cancellation of InputBox to select range
  24. Using Excel VBA Macro To Capture + Save Screenshot of Specific Area In Same File
  25. Type Mismatch in Loop to scan Outlook Messages [duplicate]
  26. VBA: How to combine two ranges on different sheets into one, to loop through
  27. VBA: Modify chart data range
  28. VBA Excel simple Error Handling
  29. How to do a “Save As” in vba code, saving my current Excel workbook with datestamp?
  30. How to save semi-colon delimited csv file using VBA?

Leave a Comment