| Date | Auteur du sujet | Sujet | Extrait du message |
|---|
| 25/02/2014 à 20:18 | Jano | Recherche valeur "**" | Cela fonctionne, merci beaucoup h2so4. bonne soirée à tous... |
| 25/02/2014 à 16:39 | Jano | Recherche valeur "**" | J'ai omis un détail, une fois avoir utilisé ; If instr(Cells(i, 1) , "**")<>0 Then .Range("A5000").End(xlUp)(2) = Cells(i, 1) je dois supprimer les lignes contenant les astérisques, mais mon code ci dessous supprime tous et je n'arrive pas à faire mieux. Sub supp1() With Range("A2:A5000") .Rep... |
| 25/02/2014 à 11:50 | Jano | Recherche valeur "**" | C'est parfait, merci h2so4. Trés bonne journée à tous... |
| 24/02/2014 à 21:52 | Jano | Recherche valeur "**" | Merci, mais cela fonctionne que si dans la cellule les deux astérisques sont seuls. Mes données sont séparées par un astérisque *72528*0**3371*, lorsque j'ai plusieurs astérisque qui sont collé (cela veut dire qu'il me manque des données) alors je copie la cellule. Encore merci pour l'info sur link... |
| 24/02/2014 à 16:11 | Jano | Recherche valeur "**" | J'ai un petit souci, je vous explique ; en colonne A, j'ai des données qui sont séparées par un astérisque * et je voudrai que si deux ** sont collés alors copie la cellule en collone A de l'onglet test. je suis parti sur la petite macro ci-dessous, mais elle remonte même les lignes ou les astérisqu... |
| 20/01/2014 à 13:25 | Jano | Choix du chemin pour ouverture fichiers TXT | Merci EngueEngue, mais, j'ai un message excel qui me donne le chemin et cela n'ouvre pas les fichiers je mets mon fichier en pieces jointe et je continue à chercher. Merci... |
| 20/01/2014 à 11:22 | Jano | Choix du chemin pour ouverture fichiers TXT | Depuis deux jour j'essaye de modifier la macro ci-dessous, afin de remplacer la partie rouge. J’aurai besoin que le chemin ne soit pas en dur, mais plutôt utiliser le fonction ouvrir d’Excel pour faire manuellement le choix du dossier ou ce trouve les fichiers TXT Pouvez vous m'aider ? merci Sub Imp... |
| 18/12/2013 à 16:35 | Jano | Copier chiffre dans cellule contenant phrase et coller | Merci tulipe_3... |
| 18/12/2013 à 14:04 | Jano | Copier chiffre dans cellule contenant phrase et coller | Est possible d'extraire dans d'une phrase plusieurs valeur selon le modele ci joint. Puis de coller en B2. Merci... |
| 12/12/2013 à 18:44 | Jano | Numéro de page | Je suis sincèrement navré de vous ennuyer avec ma macro, mais je suis au bout du rouleau. J’ai passé beaucoup de temps avec vous pour que cela fonctionne et cela fonction, mais pas sur des fichiers très volumineux.(3000 lignes) h2so4 m’a bien donné la solution, mais j’ai omis de stipuler que le nomb... |
| 12/12/2013 à 05:32 | Jano | Numéro de page | Encore merci pour toute votre aide h2so4, mais j'ai une contraite supplémentaire. c'est que je n'ai pas toujours le meme nb de lignes par page. je pense que c'est fichu, je viens de laisser tournée la macro de 23h à 5h30 et toujours pas fini (sur un fichier de 3000 lignes) merci de votre et trés bon... |
| 11/12/2013 à 22:32 | Jano | Numéro de page | Avec la macro cidessous tout fonctionne, mais vu que j'ai des fichiers avec beaucoup de lignes ( moyenne 3000) c'est extrement long . Deux heures pour 2086 lignes, ci joint le fichier. Pourriez vous me dire ci cela vient du code ci dessous ; Sub numeroPageCelluleActive() Range("k2").Select Applicati... |
| 11/12/2013 à 15:25 | Jano | Numéro de page | Merci beaucoup h2so4 , très bon après midi à tous... |
| 11/12/2013 à 14:39 | Jano | Numéro de page | Ca y est la bloucle fonction, mais sur 50 lignes et le probleme est que le nombre de ligne peut etre variable. (50 ou 75 ou 1500) comment puisje faire, merci encore pour votre aide. For i = 2 To 50 ActiveCell = numeroPage(ActiveCell) ActiveCell.Offset(1, 0).Select Next... |
| 11/12/2013 à 13:20 | Jano | Numéro de page | Merci beaucoup, Pouvez m'aider encore un peu, je voudrai mettre un boucle pour continuer sur tout la colonne. Sub numeroPageCelluleActive() Application.ScreenUpdating = False ActiveWindow.View = xlPageBreakPreview For numeroPage = 1 to Range("K2") = numeroPage(ActiveCell) ActiveCell.Offset(1, 0).Sel... |
| 11/12/2013 à 11:45 | Jano | Numéro de page | Lorsque je lance la macro, j'ai le resultat qui s'affiche dans un msgbox, moi je souhaiterai que le résultat s'affiche en colonne K. exemple ; ligne 2 Je souhaiterai que le résultat de la macro soit inserer en K2 J'espère est plus compréhensible, merci de votre aide... |
| 11/12/2013 à 11:26 | Jano | Numéro de page | ]Bonjour le forum, Lorsque j’exécute la macro ci-dessous cela me donne le numéro de page de la cellule active, dans un MSGBOX. Est-ce possible, plutôt qu’un MSGBOX, que cela me renvoie la valeur dans la cellule active. Je vous joint le fichier pour un meilleur compréhension. Merci de votre aide... |