Lezen in het Engels

Delen via


Datumnotatie is niet juist wanneer u een CSV-tekstbestand in Excel converteert met behulp van een VBA-macro

Symptomen

Wanneer u een Microsoft Visual Basic for Applications-macro (VBA) gebruikt om een CSV-tekstbestand (Door komma's gescheiden waarden) te converteren naar een Microsoft Office Excel-werkmap (*.xls), is de notatie van datums die worden geconverteerd naar uw Excel-werkmap mogelijk niet correct.

In uw CSV-bestand kunnen datums bijvoorbeeld de volgende indeling hebben:

dd/mm/jjjj

Wanneer u de volgende macro uitvoert om uw CSV-tekstbestand te converteren naar Excel,

VB
Sub test()

Workbooks.OpenText Filename:="C:\Test1.csv", DataType:=xlDelimited, _
      TextQualifier:=xlTextQualifierNone, FieldInfo:=Array(1, 4)

End Sub

datums kunnen worden geconverteerd in de volgende indeling:

mm/dd/jjjj

Oplossing

Microsoft verstrekt programmeervoorbeelden alleen ter illustratie, zonder expliciete of impliciete garantie. Dit omvat, maar is niet beperkt tot, de impliciete garanties van verkoopbaarheid of geschiktheid voor een bepaald doel. In dit artikel wordt ervan uitgegaan dat u bekend bent met de programmeertaal, alsmede met de hulpprogramma's waarmee procedures worden gemaakt en waarmee fouten in procedures worden opgespoord. Microsoft-ondersteuningstechnici kunnen de functionaliteit van een bepaalde procedure uitleggen, maar ze wijzigen deze voorbeelden niet om extra functionaliteit te bieden of procedures te bouwen om aan uw specifieke vereisten te voldoen. U kunt dit probleem oplossen door de parameter local:=true toe te voegen aan uw VBA-macro, zoals in het volgende voorbeeld:

VB
Sub test()

Workbooks.OpenText Filename:="C:\Test1.csv", DataType:=xlDelimited, _
      TextQualifier:=xlTextQualifierNone, FieldInfo:=Array(1, 4), Local:=True

End Sub