IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Macros et VBA Excel Discussion :

Copié un fichier local vers sharepoint en VBA


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre habitué
    Homme Profil pro
    Étudiant
    Inscrit en
    Mai 2018
    Messages
    9
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 27
    Localisation : France, Meurthe et Moselle (Lorraine)

    Informations professionnelles :
    Activité : Étudiant

    Informations forums :
    Inscription : Mai 2018
    Messages : 9
    Par défaut Copié un fichier local vers sharepoint en VBA
    Bonjour,

    Ça fait quelque temps que j'essaie de copier un fichier local vers un sharepoint (office 365) et je n'y arrive pas !

    J'aimerais savoir comment faire, si cela est faisable

    Merci de vos retour

  2. #2
    Membre habitué
    Homme Profil pro
    Étudiant
    Inscrit en
    Mai 2018
    Messages
    9
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 27
    Localisation : France, Meurthe et Moselle (Lorraine)

    Informations professionnelles :
    Activité : Étudiant

    Informations forums :
    Inscription : Mai 2018
    Messages : 9
    Par défaut
    Bonjour j'ai finalement trouvé une solution

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
     
            'lsharepoint est le chemin sur sharepoint
            'stfile est le chemin du fichier local que l'on veut copié
            'usr est l'identifiant pour se connecter a sharepoint
            'mdp est le mot de passe pour se connecter a sharepoint
     
            Dim WshNetwork
            Set WshNetwork = CreateObject("WScript.Network")
            WshNetwork.MapNetworkDrive "A:", lsharepoint, False, usr , mdp
             Dim fso As Object
             Set fso = CreateObject("Scripting.FileSystemObject")
            fso.CopyFile stfile, "A://"
     
            WshNetwork.RemoveNetworkDrive "A:"

  3. #3
    Invité de passage
    Homme Profil pro
    Étudiant
    Inscrit en
    Avril 2022
    Messages
    1
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Val de Marne (Île de France)

    Informations professionnelles :
    Activité : Étudiant
    Secteur : Industrie

    Informations forums :
    Inscription : Avril 2022
    Messages : 1
    Par défaut
    Bonjour,

    Je viens d'essayer ce code car j'ai le même besoin que vous aviez et malheureusement j'ai des erreurs comme Nom de périphérique local déjà utilisé. Je ne comprend pas à quoi correspond votre répertoire A et s'il faut que je l'adapte au miens ? De plus, le chemin de notre fichier local, doit-il contenir le répertoire soit C:\? et le chemin vers SharePoint est le lien https?

    Merci d'avance.

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Copier un fichier en local depuis sharepoint par VBA
    Par Golard dans le forum Général VBA
    Réponses: 2
    Dernier message: 14/05/2014, 15h02
  2. Copie d'un fichier local vers un partage Réseau
    Par snay13 dans le forum Entrée/Sortie
    Réponses: 3
    Dernier message: 06/09/2010, 05h57
  3. [Excel 2003]Copie Cellules fichier A vers cellules fichier B
    Par jbulysse dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 13/08/2010, 10h57
  4. Copie d'un fichier local vers un serveur distant
    Par Contact2012 dans le forum VBScript
    Réponses: 4
    Dernier message: 20/07/2010, 14h38
  5. [VB.Net] Transfert de fichier local vers serveur
    Par geros dans le forum ASP.NET
    Réponses: 4
    Dernier message: 13/02/2006, 15h14

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo