Création de dossier selon liste excel

vilajea1 · 13 Novembre 2009

Bonjour,

Ne connaissant pas beaucoup vba et la programmation🙁, je vous pose la question suivante :

Est'il possible de créer automatiquement un certain nombre de dossiers (800) dans un répertoire sur le serveur, qui aurait comme nom "le nom, prénom et numéro" selon une liste excel.

Ceci afin de faire des dossiers pour les RH et qui nous faciliterais la tache😉

Merci

RENAUDER · 13 Novembre 2009

Re : Création de dossier selon liste excel

Bonjour,
En admettant que ta liste soit en colonne A

Code:

Sub SaveInMyFolder()
    Dim x As String, strPath As String
    Range([A1], [A65536].End(xlUp)).Select
    For Each cell In Selection
        Rep = cell.Value
        On Error Resume Next
        strPath = "C:\Excel\" & Rep
        x = GetAttr(strPath) And 0
        If Err <> 0 Then
            MkDir strPath
        End If
    Next cell
   On Error goto 0
End Sub

Création de dossier selon liste excel

vilajea1

Guest

RENAUDER

Nous a quitté

Discussions similaires

Création de dossier selon liste excel

vilajea1

Guest

RENAUDER

Nous a quitté

Discussions similaires

Privacy & Transparency

Privacy & Transparency