Telefonszámunk: 1-472-0679

Hozzászólás: [Resolved] Fájlok másolása több különböző mappába

Kezdőlap Fórumok Excel programozás [Resolved] Fájlok másolása több különböző mappába Hozzászólás: [Resolved] Fájlok másolása több különböző mappába

#11287
delila
Felhasználó

    Szia!

    Egy mód a mentendő mappa helyének kiválasztásához:

    Sub konyvtarvalaszt()
      Dim konyvtar As String
      With Application.FileDialog(msoFileDialogFolderPicker)
         If .Show Then
             konyvtar = .SelectedItems(1)
             MsgBox konyvtar
         Else
            MsgBox "Nem választottál"
         End If
      End With
    End Sub

    Üdv,
    Delila