Contenu récent par sylv900

  1. S

    n° du charactère "_"

    ca d'accord mais on ne s'est pas bien compris, désolé je cherche le nombre de caractère particulier dans un chaine, exemple : chaine = 'aaabbcccdddd' fonction(chaine, 'a') renvoi 3 fonction(chaine, 'b') renvoi 2 fonction(chaine, 'ac') renvoi 3 fonction(chaine, 'd') renvoi 4 quel est...
  2. S

    n° du charactère "_"

    ok merci par contre je pensais que instr comptait le nombre de caractère présent dans la chaine mais non, quel est le code? merci
  3. S

    n° du charactère "_"

    bonjour je n'ai pas trouvé de table d'équivalence, est-ce quelqu'un peut me donner le n° de '_' pour pouvoir compter le nombre de '_' avec un code du genre instr(ligne, chr(?) merci
  4. S

    extraire des donnée de plusieurs ficiers txt

    ok merci à plus
  5. S

    extraire des donnée de plusieurs ficiers txt

    encore une petite question, que faire pour évité un débogage quand on clic sur 'annuler' de la boite de recherche de fichier affichée par : vrtFiles = Application.GetOpenFilename('*.*, *.*', , 'Fichiers .ctr', , True) ??? merci
  6. S

    extraire des donnée de plusieurs ficiers txt

    salut le forum merci à tous, ca fonctionne pas mal... à plus
  7. S

    extraire des donnée de plusieurs ficiers txt

    merci Hellboy mais malheureusement je n'arrive pas à faire tourner ton code je prend un débogage sur la ligne vrtFiles = Application.GetOpenFilename(\\'*.*, *.*\\', , \\'Fichier de Plus de 255 Column\\', , True) avec 'incompatibilité de type), j'ai pourtant recopié texto ton code pour le...
  8. S

    Insertion de lignes

    salut quand tu écris ton code permettant de remplir ton tableau par une commande tu donne bien un n° i de ligne, tu ne peux pas insérer la prochaine commande à la ligne i+2 ? donne un morceau de code si je n'ai pas compris ton prblème... sinon une solution est de repérer la dernière ligne...
  9. S

    extraire des donnée de plusieurs ficiers txt

    merci Hervé je vais voir ce que je peux faire de ton code
  10. S

    Blème bizarre

    salut tu as bien sûr vérifier le format de cellule???
  11. S

    import et mise au format de données par macro

    salut FDI je crois qu'on s'est croisé, je pose (entres autres) la même question dans mon message, à surveillé ce que tu peux faire déjà c'est utiliser : fichier = Application.GetOpenFilename(, , 'Ouvrir le fichier texte .MEO') If fichier = False Then Exit Sub qui permet de choisir le...
  12. S

    extraire des donnée de plusieurs ficiers txt

    salut à tous j'ai quelques questions : _comment ouvrir plusieurs fichiers txt en même temps, dans ce genre : fichier = Application.GetOpenFilename(, , 'Ouvrir le fichier texte') mais pour +sieurs fichiers _ensuite j'aimerais réutiliser les noms des fichiers, comment mettre le nom d'un...
  13. S

    interdire la supprssion d'une feuille

    je viens d'adapter le code de Didier à mon programme et ca fonctionne super bien! encore merci juste une question, à quoi sert : Application.ScreenUpdating = False ??? merci encore
  14. S

    interdire la supprssion d'une feuille

    salut à tous merci pour ces nombreuses réponses à + sylvain
  15. S

    interdire la supprssion d'une feuille

    salut à tous est-il possible d'interdire à l'utilisateur d'un fichier excel de supprimer des feuilles, ou au moins lui envoyer un message du style 'attention feuille de données à ne pas supprimer!' merci à + sylvain