Helpmij.nl
Helpmij.nl
Helpmij.nl

Quote

Weergeven resultaten 1 tot 3 van 3

Onderwerp: Bestandsnamen aanpassen naar een excellijst

  1. #1
    Vraag is niet opgelost

    Bestandsnamen aanpassen naar een excellijst

    Hallo Allemaal,

    Is het mogelijk om de bestandsnaam aan te passen naar de gegevens die in excel staan?

    Zie voorbeeld in bijlage.

    Ik zie de reacties graag tegemoet.
    Bijgevoegde bestanden Bijgevoegde bestanden

  2. #2
    Senior Member
    Geregistreerd
    1 juni 2022
    Dat is heel simpel met VBA:

    Name FilenaamOud As FilenaamNieuw

  3. #3
    Tera Honourable Senior Member edmoor's avatar
    Geregistreerd
    8 september 2000
    Locatie
    Zuid-Holland
    Wat AHulpje zegt.
    Met extra controles dus iets als dit:
    Code:
    Sub Hernoem()
        pad = "C:\Johande\"
        For i = 6 To 19
            If Cells(i, 7) <> "" Then
                If Dir(pad & Cells(i, 7)) = "" Then
                    If Dir(pad & Cells(i, 2)) = "" Then
                        MsgBox "Bestand " & pad & Cells(i, 2) & " bestaat niet.", vbCritical
                    Else
                        Name pad & Cells(i, 2) As pad & Cells(i, 7)
                    End If
                Else
                    MsgBox "Bestand " & pad & Cells(i, 7) & " bestaat al.", vbCritical
                End If
            End If
        Next i
    End Sub
    "Bij IT-ers gaat alles automatisch, maar niets vanzelf. "
    Op rechtstreekse vragen via email of privébericht reageer ik niet. Daar is het forum voor.
    Lees ook: http://www.helpmij.nl/forum/announcement.php?f=5

Berichtenregels

  • U mag geen nieuwe vragen starten.
  • U mag niet reageren op berichten.
  • U mag geen bijlagen versturen.
  • U mag uw berichten niet bewerken.
  •  
Helpmij.nl
Helpmij.nl

Helpmij.nl en business

Partners
Sponsoren