Vraag : de invoer CSV om uit te blinken

Dit zou zeer simple.
I moeten zijn heeft csv dossier dat kopballen voor 10 kolommen en hun respectieve waarden onderaan bevat. Ik heb een macro of vbs een code nodig om slechts de waarden van dat gegeven in een bestaand aantekenvel in te voeren over cellen D4: D13.
thanks

Related Oplossingen: Importind Csv- gegeven een van Excel in Excel template

Antwoord : de invoer CSV om uit te blinken

Als I understadn u correct.  U die rij twee van CSV willen nemen en het bevolkt waaier D4: D13 in uw huidig werkboek.  Met andere woorden, multi-kolommen (1 rij) aan 1 kolom (multirijen):

   Schemerige cwb als Nieuw Werkboek
   Reeks cwb = Excel.ActiveWorkbook
   Schemerige nwb als Nieuw Werkboek
   Reeks nwb = Application.Workbooks.Open („C:\MyCSV.csv“)
   nwb.ActiveSheet.Range („A2: G2“). Selecteer
   Selection.Copy
   cwb. Activeer
   Waaier („D4“). Selecteer
   Selection.PasteSpecial kleef: =xlPasteAll, Verrichting: =xlNone, SkipBlanks: = _
       Vals, herschik: =True
       nwb. Dichte savechanges = Vals

U zult de waaiers en de weg moeten natuurlijk uitgeven CSV.