Re: [fr-users] Re: Calc : Lignes superflues
Le 29/05/2015 09:55, pierre-yves samyn a écrit : Bonjour Michel ANDREU-2 wrote Soit un tableau de calc, de nombre de lignes variable. Par une macro en basic LibreOffice, je voudrais effacer les lignes superflues situées entre la première cellule vide de la première colonne et la première cellule vide de la dernière colonne ; dans l'exemple : effacer B27:F23. Ton exemple ne correspond pas à ta description du coup difficile d'être sûr de ce que tu veux . - Les lignes n'ont pas été supprimées, ce sont les valeurs qui l'ont été. - Les lignes 27 à 30 sont toujours là et contiennent toujours zéro. - S'il s'agit de points, ne peut-il y avoir de cas où le résultat est zéro ? Avant de développer il faut savoir si tu désires donc bien : - trouver la première colonne utilisée (vers la gauche) - dans cette colonne trouver la dernière cellule ne contenant pas zéro - trouver la dernière colonne utilisée (vers la droite) - dans cette colonne trouver la première cellule contenant zéro - effacer les valeurs dans la plage ainsi constituée Cordialement Pierre-Yves -- View this message in context: http://nabble.documentfoundation.org/Calc-Lignes-superflues-tp4149785p4149856.html Sent from the Users mailing list archive at Nabble.com. Bonjour Pierre-Yves, je me suis mal exprimé. En effet, ce ne sont pas les lignes qui sont à effacer mais les valeurs de la zône précisée. Et c'est bien les premières valeurs zéro qui servent de référence, dans la première et dans la dernière colonne du tableau. Cordialement. Michel -- Michel ANDREU - Pays d'Auge LinuxMint LMDE Cinnamon, version 2014 Linuxien depuis janvier 2008 -- Envoyez un mail à users+unsubscr...@fr.libreoffice.org pour savoir comment 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
Re: [fr-users] Comment faire des étiquettes
Bonjour Comment faire pour faire des étiquettes avec plusieurs adresse avec la feuille AVERY N° J8160 La création des étiquettes est documentée ici : https://wiki.documentfoundation.org/FR/FAQ/Writer#.C3.89tiquettes_.2F_Publipostage Voir en particulier : https://wiki.documentfoundation.org/FR/FAQ/Writer/011 Si tu réponds, merci de penser à utiliser la fonction répondre à tous du logiciel de courrier de façon que la liste reçoive la réponse. Cordialement Pierre-Yves -- Envoyez un mail à users+unsubscr...@fr.libreoffice.org pour savoir comment 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
[fr-users] Re: Calc : Lignes superflues
Bonjour Michel ANDREU-2 wrote Soit un tableau de calc, de nombre de lignes variable. Par une macro en basic LibreOffice, je voudrais effacer les lignes superflues situées entre la première cellule vide de la première colonne et la première cellule vide de la dernière colonne ; dans l'exemple : effacer B27:F23. Ton exemple ne correspond pas à ta description du coup difficile d'être sûr de ce que tu veux . - Les lignes n'ont pas été supprimées, ce sont les valeurs qui l'ont été. - Les lignes 27 à 30 sont toujours là et contiennent toujours zéro. - S'il s'agit de points, ne peut-il y avoir de cas où le résultat est zéro ? Avant de développer il faut savoir si tu désires donc bien : - trouver la première colonne utilisée (vers la gauche) - dans cette colonne trouver la dernière cellule ne contenant pas zéro - trouver la dernière colonne utilisée (vers la droite) - dans cette colonne trouver la première cellule contenant zéro - effacer les valeurs dans la plage ainsi constituée Cordialement Pierre-Yves -- View this message in context: http://nabble.documentfoundation.org/Calc-Lignes-superflues-tp4149785p4149856.html Sent from the Users mailing list archive at Nabble.com. -- Envoyez un mail à users+unsubscr...@fr.libreoffice.org pour savoir comment 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
Re: [fr-users] Droits administrateur demandés à chaque ouverture d'un texte!
Bonjour Droits administrateur demandés à chaque ouverture d'un texte depuis les dernières mises à jour!!! comment arrêter ce délire source d'une perte de temps énorme! Tu ne précises pas tes versions système (linux, windows, mac) ni LibreOffice. La sécurité dépend du système... Avec Windows 7 tu peux par exemple faire un clic droit sur l'icône du programme et demander l'exécution en mode Administrateur. On peut aussi enregistrer cette information via les propriétés, onglet Compatibilité, en cochant la case ad hoc. Si tu réponds, merci de penser à utiliser la fonction répondre à tous du logiciel de courrier de façon que la liste reçoive la réponse. Cordialement Pierre-Yves -- Envoyez un mail à users+unsubscr...@fr.libreoffice.org pour savoir comment 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
[fr-users] Comment faire des étiquettes
Bonjour Voici une nouvelle question envoyée à l'aide du formulaire de demande d'aide (http://fr.libreoffice.org/get-help/poser-une-question/). Si vous répondez, merci de penser à utiliser la fonction répondre à tous de votre logiciel de courrier électronique de façon que le demandeur reçoive une copie de votre réponse. Email: - brunellatin...@yahoo.fr Sujet: - Comment faire des étiquettes Question: - Bonjour, Comment faire pour faire des étiquettes avec plusieurs adresse avec la feuille AVERY N° J8160 -- Envoyez un mail à users+unsubscr...@fr.libreoffice.org pour savoir comment 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
Re: [fr-users] [Macro-Basic] génération de cours eleve à partir de fichier cours enseignant
voici la dernière versio nde la macro mais je n'arrive pas à bien comprendre comment gérer la recursivité dans la première partie. l'etat de dir() est global, c'est a dire que l'on peut pas utiliser une boucle dir() dans une boucle dir() la parade, serai de faire une passe en stockant dans un tableau tous les chemins de repertoires avec un dir() puis ensuite boucler sur ce tableau, et ainsi le dir() sur les odt passera en récursif mais je n'arrive pas à comprendre comment appliquer ça dans la macro... Option Explicit 'LG Global monTab() as String dim monTab() as String Sub CopierFichier Dim Chemin as String, NomFichier as String, Fichier(), NewName as String Dim X as Integer ' LG initialise Redim monTab(0) Chemin = ConvertToURL(/home/cemoi/Documents/bac/seconde/)'le chemin est à adapter à l'emplacement des fichiers NomFichier = Dir(Chemin Cours*.odt) X = 0 Do While NomFichier Fichier = Split(NomFichier,.) NewName = Fichier(0) _eleve.odt 'LG X = X +1 ' reDim Preserve monTab(X) redim Preserve monTab(1 to X) monTab(X) = ConvertToURL(Chemin NewName) Filecopy ConvertToURL(Chemin NomFichier), monTab(X) NomFichier = Dir() ' LG inutile X = X + 1 Loop RemplacerStyle End Sub Sub RemplacerStyle() Dim oDocument as Object, searchDescriptor As Object Dim Args(0) as New com.sun.star.beans.PropertyValue Dim i as Integer Args(0).Name = Hidden Args(0).Value = True 'LG essaye dejà avec false FOR i=1 to UBound(monTab) 'LG For i = 0 to UBound(monTab) oDocument = StarDesktop.loadComponentFromURL(monTab(i),_blank,0,Args()) searchDescriptor = oDocument.createReplaceDescriptor With searchDescriptor .SearchString = Texte prof .ReplaceString = Blanc .SearchStyles = True End With oDocument.replaceAll(searchDescriptor) oDocument.Store() ExportPDF(oDocument,monTab(i)) Next i End Sub Sub ExportPDF(oDoc as Object,monFichier as String) Dim oURL as String Dim Args(0) as New com.sun.star.beans.PropertyValue oURL = Left(monFichier,CInt(Len(monFichier))-3) pdf Args(0).Name = FilterName Args(0).Value = writer_pdf_Export oDoc.storeToURL(oUrl,args()) oDoc.Close(True) Kill(monFichier) 'la MsgBox ne sert à rien ' MsgBox(Le fichier ConvertFromURL(oURL) à été créé) End Su Le 25 mai 2015 15:54, Cemoi Cemoi matlane2...@gmail.com a écrit : il y a peut eter un problème de casse effectivement mais ce que je aperçois c'est que la première partie n'est pas recursive et le but de la macro c'est de traiter toute une arborescense. Il faudrait boucler sur les dossiers et faire l'appel moi même? Merci pour votre aide. Le 22 mai 2015 14:27, claude pref-open-off...@haute-garonne.gouv.fr a écrit : Bonjour, Dans le batch il y '*cours*.odt' \ dans la macro Cours*.odt Si les noms des fichiers ne commencent pas par cours cela ne fonctionne pas. J'ai fait un test de ta macro et elle fonctionne (sous windows). Sous Linux n'y-a-t-il pas aussi le problème de la casse sur les noms de fichiers ?) Claude Cemoi Cemoi a écrit : Bonjour, je veux reproduire ce que je faisais avec find en shell en fait pour que tout soit dans la macro et surtout que pour que cela puisse servir à d'autres. Je m'explique: si je fais la recherche le filtrage et le renomage des fichiers avec le shell j'aurais une macro qui ne peux pas faire tout le travail à elle seule, elle perd donc de son intérêt (je parle pour l'interet commun dans l'optique d'être réutilisé). Avant de me lancer dans cette macro je faisais un: https://forum.openoffice.org/fr/forum/viewtopic.php?f=8t=47475#find /home/cemoi/Documents/cible -type f -mtime -1 -iname *eleve*.odt -execdir libreoffice --headless --convert-to pdf '{}' \; Ca veut dire: cherche et trouve dans toute l'arborescence de /home/cemoi/Documents/cible tous les fichiers modifié il y a 24h ou moins de 24h ayant les caractéres (sans prendre en compte la casse) eleve dans leur nom et ayant comme extension odt puis ça passe les resultats à libreoffice qui est exécuté en -headless pour convertir en pdf tous les fichiers trouvé. Attention ici chaque pdf est mis au même endroit que le fichier source avec lequel il est généré. Comme on a des problèmes pour tenir à jour tous les fichiers eleves (et ça prend aussi pas mal de temps) je me suis dis qu'il serai bon que cela soit automatiser... en remplaçant le styleprof par des ___ comme cela il ne resterai plus qu'à générer le pdf pour que cela sorte le document eleve. pour le moment je fais la recherche de tous les fichiers odt contenant le mot cours puis j'y ajoute le suffix _eleve puis je le copie comme ça je conserve ma source voila le code: #! /bin/bash IFS= find /home/cemoi/Documents/bactma/seconde/ \ -type f \ -iname '*cours*.odt' \ -not -iname '*_eleve.odt' \ -print0 | while read -rd '' name do
Re: [fr-users] Re: Calc : Lignes superflues
Le 29/05/2015 11:13, pierre-yves samyn a écrit : Suite... Si j'ai bien compris... effacer_superflu.ods http://nabble.documentfoundation.org/file/n4149883/effacer_superflu.ods Cordialement Pierre-Yves -- View this message in context: http://nabble.documentfoundation.org/Calc-Lignes-superflues-tp4149785p4149883.html Sent from the Users mailing list archive at Nabble.com. C'est tout à fait ça ! Merci de t'être penché sur ce problème. Cordialement Michel -- Michel ANDREU - Pays d'Auge LinuxMint LMDE Cinnamon, version 2014 Linuxien depuis janvier 2008 -- Envoyez un mail à users+unsubscr...@fr.libreoffice.org pour savoir comment 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
[fr-users] Re: Calc : Lignes superflues
Suite... Si j'ai bien compris... effacer_superflu.ods http://nabble.documentfoundation.org/file/n4149883/effacer_superflu.ods Cordialement Pierre-Yves -- View this message in context: http://nabble.documentfoundation.org/Calc-Lignes-superflues-tp4149785p4149883.html Sent from the Users mailing list archive at Nabble.com. -- Envoyez un mail à users+unsubscr...@fr.libreoffice.org pour savoir comment 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
[fr-users] cellule par défaut ouverture Calc
Bonjour Voici une nouvelle question envoyée à l'aide du formulaire de demande d'aide (http://fr.libreoffice.org/get-help/poser-une-question/). Si vous répondez, merci de penser à utiliser la fonction répondre à tous de votre logiciel de courrier électronique de façon que le demandeur reçoive une copie de votre réponse. Email: - timailo...@gmail.com Sujet: - cellule par défaut ouverture Calc Question: - Bonjour, J'ai dû cliquer sur un raccourci et n'arrive pas à retrouver le format de cellule initial par défaut de LibreOffice Calc. Comment faire ? Merci de votre aide. -- Envoyez un mail à users+unsubscr...@fr.libreoffice.org pour savoir comment 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
Re: [fr-users] Re: [Calc] Validité aujourd'hui validité numéro téléphone
Bonjour, une autre proposition. Je pars des postulats suivants - un numéro de téléphone est un nombre entier - les numéros en France métropolitaine commencent par 01 à 09 J'en déduis que les numéros téléphoniques sont des nombres à 10 chiffres, dont 9 significatifs, se situant entre deux limites - minimum : 101010101 (sans le 1er zéro) n'existe-t-il pas des numéros qui commencent comme ça: 01 00 .. .. .. ? si oui alors la limite mini est 1 ! (même s'il y a peu de chance que le n° 01 00 00 00 00 existe) - maximum : 9 (sans le 1er zéro) Par suite, je mets en place les règles de validité - nombre entier - plage correcte : 101010101 à 9 Je formate comme déjà dit 0# ## ## ## ## ce qui me permet de forcer la saisie d'une plage de numéros téléphoniques valides. Franck -- Envoyez un mail à users+unsubscr...@fr.libreoffice.org pour savoir comment 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
Re: [fr-users] [Macro-Basic] génération de cours eleve à partir de fichier cours enseignant
une tentative d'integration mais je m'y perds... 'on construit un tableau dynamique de tous les sous repertoires et ensuite on boucle sur tous les repertoires ainsi trouvés, 'l'astuce est que la premiere boucle for continuera toujours tant que l'on ajouteras des repertoires dans la liste pour 'justement aller voir leur sous repertoires car le ubound() evolue '!Penser à adapter l'appel de copieFichier, le reprtoire n'est plus en dur dans cette sub mais passée desormais en argument! sub general dim listeDirs() redim listeDirs(0) indexDir = 0 dirBase=/home/cemoi/Docments/bactma/seconde/ listeDir(0) = dirBase for r = 0 to ubound(listeDir) curDir = listeDir(r) chaine = dir(curDir+*,16) ' le 16 ce n'est que pour les repertoires while chaine if chaine . and chaine.. then indexDir = indexDir + 1 redim preserve listeDir(0 to indexDir) listeDir(indexDir) = curDir+chaine+/ endif chaine = dir() wend next r for r = 0 to ubound(listeDir) chemin = listeDir(r) call CopierFichier(chemin) next r end sub 'ancien code qui ne traite que dans le repertoire spécifié et non en recursif ' Option Explicit ' public monTab() as String ' Sub CopierFichier ' Dim Chemin as String, NomFichier as String, Fichier(), NewName as String ' Dim X as Integer ' ' Chemin = ConvertToURL(/home/cemoi/Documents/bactma/seconde/Projet_01/Seq_terminologie_piece/)'le chemin est à adapter à l'emplacement des fichiers ' NomFichier = Dir(Chemin *Cours.odt) ' X = 0 ' Do While NomFichier 'Fichier = Split(NomFichier,.) 'NewName = Fichier(0) _eleve.odt ' redim Preserve monTab(X) ' monTab(X) = ConvertToURL(Chemin NewName) ' Filecopy ConvertToURL(Chemin NomFichier), monTab(X) ' NomFichier = Dir() ' X = X + 1 ' Loop ' RemplacerStyle ' End Sub Sub RemplacerStyle() Dim oDocument as Object, searchDescriptor As Object Dim Args(0) as New com.sun.star.beans.PropertyValue Dim i as Integer Args(0).Name = Hidden Args(0).Value = True 'LG essaye dejà avec false FOR i = 0 to UBound(monTab) oDocument = StarDesktop.loadComponentFromURL(monTab(i),_blank,0,Args()) searchDescriptor = oDocument.createReplaceDescriptor With searchDescriptor .SearchString = Texte prof .ReplaceString = Blanc .SearchStyles = True End With oDocument.replaceAll(searchDescriptor) oDocument.Store() ExportPDF(oDocument,monTab(i)) Next i End Sub Sub ExportPDF(oDoc as Object,monFichier as String) Dim oURL as String Dim Args(0) as New com.sun.star.beans.PropertyValue ' Cemoi: que contient monFichier? à première vue c'est vide! oURL = Left(monFichier,CInt(Len(monFichier))-3) pdf Args(0).Name = FilterName Args(0).Value = writer_pdf_Export oDoc.storeToURL(oUrl,args()) oDoc.Close(True) Kill(monFichier) End Sub Le 29 mai 2015 14:13, Cemoi Cemoi matlane2...@gmail.com a écrit : voici la dernière versio nde la macro mais je n'arrive pas à bien comprendre comment gérer la recursivité dans la première partie. l'etat de dir() est global, c'est a dire que l'on peut pas utiliser une boucle dir() dans une boucle dir() la parade, serai de faire une passe en stockant dans un tableau tous les chemins de repertoires avec un dir() puis ensuite boucler sur ce tableau, et ainsi le dir() sur les odt passera en récursif mais je n'arrive pas à comprendre comment appliquer ça dans la macro... Option Explicit 'LG Global monTab() as String dim monTab() as String Sub CopierFichier Dim Chemin as String, NomFichier as String, Fichier(), NewName as String Dim X as Integer ' LG initialise Redim monTab(0) Chemin = ConvertToURL(/home/cemoi/Documents/bac/seconde/)'le chemin est à adapter à l'emplacement des fichiers NomFichier = Dir(Chemin Cours*.odt) X = 0 Do While NomFichier Fichier = Split(NomFichier,.) NewName = Fichier(0) _eleve.odt 'LG X = X +1 ' reDim Preserve monTab(X) redim Preserve monTab(1 to X) monTab(X) = ConvertToURL(Chemin NewName) Filecopy ConvertToURL(Chemin NomFichier), monTab(X) NomFichier = Dir() ' LG inutile X = X + 1 Loop RemplacerStyle End Sub Sub RemplacerStyle() Dim oDocument as Object, searchDescriptor As Object Dim Args(0) as New com.sun.star.beans.PropertyValue Dim i as Integer Args(0).Name = Hidden Args(0).Value = True 'LG essaye dejà avec false FOR i=1 to UBound(monTab) 'LG For i = 0 to UBound(monTab) oDocument = StarDesktop.loadComponentFromURL(monTab(i),_blank,0,Args()) searchDescriptor = oDocument.createReplaceDescriptor With searchDescriptor .SearchString = Texte prof .ReplaceString = Blanc .SearchStyles
Re: [fr-users] [Macro-Basic] génération de cours eleve à partir de fichier cours enseignant
Je precise que le bout de code que j'ai fourni à l'arrache n'est absolument pas garanti sur la syntaxe mais l'esprit y est qu'est ce que tu ne comprends pas ? je suis toujours sur irc si tu veux poser des questions ;) laurent -- Envoyez un mail à users+unsubscr...@fr.libreoffice.org pour savoir comment 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
Re: [fr-users] contour de pagr
Le 29/05/2015 16:27, demande_aide...@libreoffice.org a écrit : Bonjour Email: - josee.labonte3...@videotron.ca Sujet: - contour de pagr Question: - Comment insérer un contour de page? Dans Writer : Format/Page/Bordure Les programmeurs soient loués, on ne peut pas ajouter de bordures fantaisie. Si vous répondez, merci de penser à utiliser la fonction répondre à tous de votre logiciel de courrier électronique de façon que la liste reçoive une copie de votre réponse. -- Ysabeau -- Envoyez un mail à users+unsubscr...@fr.libreoffice.org pour savoir comment 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
Re: [fr-users] contour de pagr
Le 29/05/2015 16:37, ID a écrit : Le 29/05/2015 16:27, demande_aide...@libreoffice.org a écrit : Bonjour Email: - josee.labonte3...@videotron.ca Sujet: - contour de pagr Question: - Comment insérer un contour de page? Dans Writer : Format/Page/Bordure Les programmeurs soient loués, on ne peut pas ajouter de bordures fantaisie. Si vous répondez, merci de penser à utiliser la fonction répondre à tous de votre logiciel de courrier électronique de façon que la liste reçoive une copie de votre réponse. Pour cela, j'utilise OpenClipart.org avec le mot-clef 'frame' : https://openclipart.org/search/?query=frame Sébastien -- Une heure de musique libre par émission, c'est Sang libre ! http://libre.tuxakadjseb.net -- -- Envoyez un mail à users+unsubscr...@fr.libreoffice.org pour savoir comment 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
[fr-users] The Document Foundation annonce LibreOffice viewer pour Android
Bonjour, The Document Foundation a annoncé hier la publication de LibreOffice Viewer for Android qui permet de visualiser les documents ODF. L'application est disponible sur Google Play Store à l'adresse http://tdf.io/androidviewer et en téléchargement direct à l'adresse http://www.libreoffice.org/download/android-viewer LibreOffice Viewer dispose également de quelques fonctions d'édition comme modifier des mots dans des paragraphes existants et changer les attributs de police de caractères comme gras ou italique. L'édition est encore une fonctionnalité expérimentale qu'il faut activer spécifiquement dans les paramètres de configuration et qui n'est pas assez stable pour être utilisée pour des tâches critiques. Elle sera améliorée en une solution d'édition à part entière avec l'aide de notre toujours croissante communauté de développeurs. Les fonctions d'éditions disponibles dans la version actuelle ont été développées grâce aux dons reçus par The Document Foundation. Retours d'expérience et rapports de bug sont les bienvenus pour aider les développeurs à améliorer la qualité de l'application dans sa progression vers un éditeur à part entière. Les utilisateurs sont invités à rapporter les problèmes rencontrés sur https://bugs.documentfoundation.org sans oublier de joindre les fichiers qui ont déclenché le problème. LibreOffice Viewer utilise le même moteur que LibreOffice pour Windows, OS-X et Linux. De la sorte, avec une nouvelle interface basée sur Firefox pour Android, LibreOffice Viewer lit les documents de la même manière que LibreOffice sur PC. LibreOffice Viewer a été développé par Collabora et Igalia, soutenu par Smoose, avec des contributions d'étudiants de Google Summer of Code, ensemble avec The Document Foundation et la communauté LibreOffice. SUSE a fourni le socle du support multi-plateforme et Mozilla Corporation plusieurs composants de base. Lien court vers le blog : Blog post: http://wp.me/p1byPE-yv- - Annonce originale en anglais : http://go.mail-archive.com/1xUCYrN_U0j97ImUltmXcpX-pAQ= Bonne journée JBF -- Seuls des formats ouverts peuvent assurer la pérennité de vos documents. Disclaimer: my Internet Provider being located in France, each of our exchanges over Internet will be scanned by French spying services. -- Envoyez un mail à users+unsubscr...@fr.libreoffice.org pour savoir comment 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
[fr-users] Re: [Macro-Basic] génération de cours eleve à partir de fichier cours enseignant
Bonjour Désolé, je n'ai pas le temps de développer tout ton sujet mais si c'est uniquement sur le parcours de ton arborescence tu peux faire comme ci-dessous (le code affiche à l'écran le nom de tous les docs comprenant cours dans le nom). Il utilise le service SimpleFileAccess que je présentais ici: https://wiki.documentfoundation.org/Macros/General/005/fr et où tu verras comment ajouter la gestion des dates. Le reste, si j'ai bien compris (remplacer par des _) tu n'as pas de problème. Option Explicit Sub Main Dim sUrl As String sUrl = ConvertToURL(C:\Tests\) Parcourir(sUrl) MsgBox Terminé End Sub Sub Parcourir(sUrl) Dim sNomFic As String Dim oSFA as Object Dim ListeFichiers As Variant oSFA = createUnoService(com.sun.star.ucb.SimpleFileAccess) ListeFichiers = oSFA.getFolderContents(sUrl, True) for each sNomFic in ListeFichiers if oSFA.IsFolder(sNomFic) then Parcourir(sNomFic) else if instr(sNomFic, cours) 0 then print sNomFic end if end if next sNomFic End Sub Cordialement Pierre-Yves -- View this message in context: http://nabble.documentfoundation.org/Macro-Basic-generation-de-cours-eleve-a-partir-de-fichier-cours-enseignant-tp4149242p4149925.html Sent from the Users mailing list archive at Nabble.com. -- Envoyez un mail à users+unsubscr...@fr.libreoffice.org pour savoir comment 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
Re: [fr-users] cellule par défaut ouverture Calc
Bonjour J'ai dû cliquer sur un raccourci et n'arrive pas à retrouver le format de cellule initial par défaut de LibreOffice Calc. Certaines choses sont possibles mais pas toutes... Clic droit sur la cellule puis Effacer le formatage direct. Par exemple si on a appliqué du gras, italique, un changement de police, de taille, etc. via la barre d'outils Formatage. Mais Calc applique automatiquement un formatage lors de certaines saisies particulières. Par exemple si on saisit 29/5 cela est transformé en 29/05/2015. Si tu as malencontreusement appliqué un format monétaire, supprimer le formatage direct ne te rendra ni 29/5 ni 29/05/2015 mais 42153. Dans ce cas il faut reformater comme date (par le menu ou ctrl+Maj+3 ou la barre d'outils). Si tu réponds, merci de penser à utiliser la fonction répondre à tous du logiciel de courrier de façon que la liste reçoive la réponse. Cordialement Pierre-Yves -- Envoyez un mail à users+unsubscr...@fr.libreoffice.org pour savoir comment 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
[fr-users] contour de pagr
Bonjour Voici une nouvelle question envoyée à l'aide du formulaire de demande d'aide (http://fr.libreoffice.org/get-help/poser-une-question/). Si vous répondez, merci de penser à utiliser la fonction répondre à tous de votre logiciel de courrier électronique de façon que le demandeur reçoive une copie de votre réponse. Email: - josee.labonte3...@videotron.ca Sujet: - contour de pagr Question: - Comment insérer un contour de page? -- Envoyez un mail à users+unsubscr...@fr.libreoffice.org pour savoir comment 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