Bekijk de onderstaande video om te zien hoe je onze site als een web app op je startscherm installeert.
Opmerking: Deze functie is mogelijk niet beschikbaar in sommige browsers.
Geen probleem.
Maar niet genoeg informatie.
Staan de Word documenten die gekopieerd moeten worden in 1 map?
Welk document moet dan worden gekopieerd naar welke informatie uit het csv bestand?
Wil je dat kopiëren doen vanuit Word, Excel, anders?
Moet dat dan in bulk worden gedaan of wil je dat per document kunnen aangeven?
Wat bedoel je met die 354 in je titel?
Lever ook een voorbeeld van dat csv bestand.
Dus de bestaande naam van het Word document en de naam die deze moet krijgen staan in het CSV bestand?
Dan is die bestaande naam toch de relatie met de inhoud van het CSV bestand?
Sub MergeCSV()
Dim hf As Integer: hf = FreeFile
Dim lines() As String, i As Long
Dim Pad As String
Open Pad & "C:\Users\OctaF\OneDrive\_HelpMij\deheugden\Namen.csv" For Input As #hf
lines = Split(Input$(LOF(hf), #hf), vbNewLine)
Close #hf
For i = LBound(lines) + 1 To UBound(lines) - 1
ActiveDocument.SaveAs2 Split(lines(i), ";")(1) & "; " & Split(lines(i), ";")(0)
Debug.Print "Line"; i; "="; lines(i)
Next
End Sub
We gebruiken essentiële cookies om deze site te laten werken, en optionele cookies om de ervaring te verbeteren.