Résultats de la recherche

  1. RENAUDER

    Convertir nom long au format DOS (8.3)

    Re : Convertir nom long au format DOS (8.3) Bonjour, Çà ne marche chez moi, le chemin court n'est pas affiché.
  2. RENAUDER

    Convertir nom long au format DOS (8.3)

    Bonjour, Pour cela j'utilise une fonction GetShortPath trouvée sur le Web. Si j'indique mon chemin dans la commande : GetShortPath ("D:\Archives\Archioutilvalid\8607\8607 0466") cela fonctionne. Maintenant je veux utiliser une variable pour le chemin FF="D:\Archives\Archioutilvalid\" & nf1 &...
  3. RENAUDER

    Choisir dans une listbox en fonction d'un combobox

    Re : Choisir dans une listbox en fonction d'un combobox Bonjour, Voici un fichier corrigé.
  4. RENAUDER

    MFC avec jeu d'icônes + une autre condition

    Re : MFC avec jeu d'icônes + une autre condition Bonjour, Merci pour ta réponse, c'est une piste intéressante.
  5. RENAUDER

    MFC avec jeu d'icônes + une autre condition

    Bonjour, Je gère le règlement de cotisations avec un jeu d'icônes. Vert si réglé (70€) Jaune si réglé partiellement (>0 et < à 70€) Rouge si pas réglé (=0) Cela fonctionne. Toutefois certains joueurs sont exonérés de la cotisation et dans une colonne adjacente c'est inscrit "Exonéré" mais le...
  6. RENAUDER

    [RESOLU] - Marco - UserForm - 3 Listbox liées - VBA

    Re : Marco - UserForm - 3 Listbox liées - VBA Bonjour, Voici un exemple. Par contre tu ne devrais pas avoir de doublons dans les Types sinon ça pose problème.
  7. RENAUDER

    Modification ficher excel avec macro

    Re : Modification ficher excel avec macro Bonjour, J'ai fait les corrections. Regarde si tout fonctionne.
  8. RENAUDER

    Boîte de dialogue

    Re : Boîte de dialogue Bonjour, Comme ça peut-être , Sub OuvreFichier() ChDrive "C:\" ChDir "C:\Arsiv\" LeFichierChoisi = Application.GetOpenFilename("Fichiers MP3 (*.mp3), *.mp3") If VarType(LeFichierChoisi) = vbBoolean Then Exit Sub Else Workbooks.Open...
  9. RENAUDER

    oublie d'une feuille xls dans un classeur xlsm avec bandeau perso

    Re : oublie d'une feuille xls dans un classeur xlsm avec bandeau perso Bonjour, Si c'est le cas alors voici le fichier.
  10. RENAUDER

    oublie d'une feuille xls dans un classeur xlsm avec bandeau perso

    Re : oublie d'une feuille xls dans un classeur xlsm avec bandeau perso Bonjour, C'est la feuille du classeur que tu veux insérer ?
  11. RENAUDER

    Userform bouton Valider/modification

    Re : Userform bouton Valider/modification Bonjour, Mets le x en Integer
  12. RENAUDER

    Téléchargement directement du net une mise à jour

    Re : Téléchargement directement du net une mise à jour Bonjour, Voici un exemple qui travaille dans les 2 sens. Local --> Serveur Serveur --> Local
  13. RENAUDER

    Contrôle Image dans Userform [Resolu]

    Re : Contrôle Image dans Userform [Resolu] Bonjour, Cela fonctionne, merci beaucoup
  14. RENAUDER

    Contrôle Image dans Userform [Resolu]

    Bonjour, A ce jour je charge des images stockées dans un répertoire dans mon contrôle Image via le code... Private Sub lstPlaques_Click() NomImg = Me.lstPlaques.Column(1, Me.lstPlaques.ListIndex) Me.Image1.Picture = LoadPicture(ThisWorkbook.Path & "\Plaques\" & NomImg & ".jpg") End Sub...
  15. RENAUDER

    VBA correction pour une recopie incrémentée

    Re : VBA correction pour une recopie incrémentée Bonjour, Tu peux essayer ceci Range("D2:D" & Range("A65536").End(xlUp).Row).FillDown
  16. RENAUDER

    Problème dans mon code vba

    Re : Problème dans mon code vba Bonjour, Tu as des noms de champs avec un espace à la fin .Fields("Nom du propriétaire ") = Array1(x, 1) .Fields("Adresse du meublé ") = Array1(x, 3) .Fields("Nbre épis Catalogue GDF ") = Array1(x, 9) .Fields("Nbre épis Sitlor 2012 ") = Array1(x, 10)
  17. RENAUDER

    Mail automatique lotus note

    Re : Mail automatique lotus note Bonjour, Voici un code que j'utilisais dans mon entreprise et qui fonctionnait parfaitement.
  18. RENAUDER

    Problème dans mon code vba

    Re : Problème dans mon code vba Bonjour, Ta feuille Commune est vide !!!
  19. RENAUDER

    Code Set fs = Application.FileSearch à adapter pour Excel 2010

    Re : Code Set fs = Application.FileSearch à adapter pour Excel 2010 Bonjour, Si tu ne suis pas la procédure décrite sur le site, c'est normal que tu es rien dans les macros complémentaires
  20. RENAUDER

    Code Set fs = Application.FileSearch à adapter pour Excel 2010

    Re : Code Set fs = Application.FileSearch à adapter pour Excel 2010 Bonjour, Voici un article qui traite de ce problème.