Re: Re: [fr-users] Recherche exemple de macro avec la fonction Shell

Bonjour,

Sous windows ( et que sous windows !!!)  j'ai un traitement un peu 
particulier (mais il correspond à mon besoin).

Je récupère d'abord dans une feuille les dossiers (CheminDepart) et nom 
de fichiers (Nomfichier) concernés, j'y associe manuellement (dans mon 
cas) le dossier d'arrivée (CheminArrivee )

et pour chaque fichier :

        if Dir(CheminArrivee , 16) = "" Then
            msgbox "Dossier : " & CheminArrivee & " inexistant"
        else
            if fileexists (CheminDepart & "\" & NomFichier) then
                FileCopy CheminDepart & "\" & NomFichier, CheminArrivee 
& "\" & NomFichier
                Kill CheminDepart & "\" & NomFichier
               else
                msgbox  CheminDepart & "\" & NomFichier & " n'existe pas"
            endif
        endif

Moi j'ai rajouté le Kill parce que je veux déplacer et que je n'ai pas 
trouvé comment le faire.

J'ai déplacé ainsi

-------- Message original --------
*Sujet: *[INTERNET] Re: [fr-users] Recherche exemple de macro avec la 
fonction Shell
*De : *linux <supsup.linux@free.fr>
*Pour : *bernard.schoenacker@free.fr, users@fr.libreoffice.org, 
ddorange@dmaths.org
*Date : *10/08/2017 09:09
> Merci Didier et Bernard de vous intéresser à mon problème,
>
> Je suis sous windows 10 Libreoffice 4.4.7.2 usage professionnel
>
> J'ai un grand nombre de macro développée en Basic langage que je 
> maitrise, ce qui est une autre affaire pour Python même si j'ai déjà 
> fait quelque programme sur d'autre environnement, c'est pourquoi il me 
> semble long et risqué de basculer de libreoffice basic en python.
>
> Bernard la plus part des liens derrière ton lien me donne des 
> convertisseurs VBA vers python mais pas libreoffice basic vers python 
> est ce normal ?
>
> Mais je reviens à ma problématique du jour:
>
> Je souhaite à l'intérieure d'une macro libreoffice basic copier un 
> répertoire et l'ensemble de ses sous-répertoires, ne trouvant pas dans 
> libreoffice basic, j'ai pensé le faire avec  shell et la fonction Dos 
> :Xcopy fonction qui fonctionne parfaitement sous windows Powershell.
>
> Je souhaite à l'intérieure d'une macro libreoffice basic lancer une 
> application tiers et revenir à la fermeture de celle-ci dans la macro 
> libreoffice basic en cours
>
> et merci encore de votre aide
>
> Cordialement
>
> Jean-Luc
>
>
> Le 09/08/2017 à 17:48, bernard.schoenacker@free.fr a écrit :
> > ----- Mail original -----
> > > De: "linux" <supsup.linux@free.fr>
> > > À: users@fr.libreoffice.org
> > > Envoyé: Mardi 8 Août 2017 08:52:28
> > > Objet: [fr-users] Recherche exemple de macro avec la fonction Shell
> > >
> > > Bonjour à tous,
> > >
> > > Je suis à la recherche d'exemple de macro fonctionnant avec la
> > > fonction
> > > Shell.
> > >
> > > Merci de votre aide
> > >
> > > Jean Luc
> > >
> > >
> > > --
> > > Envoyez un mail à users+unsubscribe@fr.libreoffice.org pour vous
> > > désinscrire
> > > Les archives de la liste sont disponibles à
> > > http://listarchives.libreoffice.org/fr/users/
> > > Tous les messages envoyés sur cette liste seront archivés
> > > publiquement et ne pourront pas être supprimés
> >
> > bonjour,
> >
> > évites d'employer le basic et passe à python ...
> >
> > une foultitude d'exemples existent
> >
> > https://lmgtfy.com/?q=from%20vba%20to%20python
> >
> > et il existe un convertisseur ...
> >
> > "open your mind without close windows"
> >
> > slt
> > bernard



--
Envoyez un mail à users+unsubscribe@fr.libreoffice.org pour vous désinscrire
Les archives de la liste sont disponibles à http://listarchives.libreoffice.org/fr/users/
Tous les messages envoyés sur cette liste seront archivés publiquement et ne pourront pas être 
supprimés