Contenu récent par chingilou

bonjour, je voudrais vous demander une solution que je cherche depuis un long moment j'ai un fichier que j'ai construit ca fait un moment pour remplir automatiquement mes trois pro forma invoice ,ma facture finale et mon bon de livraison les trois feuilles proforma invoice ont les mêmes nombre...

pour ceux que ç'a interesse peut être voila une macro faite de la fonction de mapomme qui en principe réponds à mes attentes j'espere Function ProperText$(ByVal x$) Dim lignes, textes, vaLCase, res, iL&, j&, JJ% vaLCase = Array("ou", "et", "MDF", "HDD", _ "SSD", "avec", "a", "ai"...

rebonsoir les excelateurs de même mapomme je voudrais te demander si tu permet concernant ta macro j'ai changé de tactique au lieu de séparer les mot de moins de 3 lettres de la fonctions proper j'essaie de faire du application.proper() sauf pour une partie de mots contenus dans une array par...

parfait milles merci mapomme

bonjour merci encore j'ai trouvé le texte qui me posait probleme la derniere ligne vide ne partait pas et ça ne part pas avec la formule de attheone mais par contre ca marche avec la fonction de mapomme et comment faire pour retirer les lignes vides du milieu (je hais les lignes vides) et les...

c'est ce que j'avais c'est pour ça que j'ai abondonné je connaisais pas ça de cette fonction (vilaine fonction😀) merci allez dormez les gars je vous ai assez retenue bonne nuit

re-MERCI encore j'utilisais moi ca =SUPPRESPACE(NOMPROPRE(SUBSTITUE(SUBSTITUE(EPURAGE(B10);CAR(10)&CAR(13);" "); CAR(160);" "))) pour les lignes vides que j'avais remarqués mais ca me donnais pas le résultat voulu

en fin de compte SUPPRESPACE fais son travail je ne sais pas pourquoi j'avais un texte ou la derniere ligne vide du texte était resté donc les noctambules AtTheOne et mapomme merci énormément solution trouvé donc sujet clos

une cellule peut contenir un texte à plusieurs lignes j'importe ces textes pour les traiter et ca serai bien d'automatiser le traitement c'est vrai que je dois donner un fichier exemple désolé mapomme désole merci pour la formule attheone parfaite

merci de la réponse rapide mais SUPPRESPACE ne retire pas les ligne vides à la fin du texte par exemple chez moi en tous cas pour la formule je teste et je te réponderai merci en tout cas

pas besoin de fichier exemple je pense mettre des cellules en worksheet.proper ou nompropre seulement les mots plus de 3 lettres (est-ce que c'est possible et surtout comment ? )

bonsoir tout le monde je voudrais si possible par formule au mieux ou par vba au pire epurer une rangée de moins de 200 lignes de textes en retirant les espaces superflues au début à la fin et au mileu du texte et aussi (c la mon probleme que je ne sais même pas comment refléchir a la solution)...

ah OK merci, je ne le savais pas

merci du conseil mais pourquoi j'ai du ajouter ThisWorkbook.Path alors qu'il est y dans ppath alors que ***Ppath = ActiveWorkbook.Path & "\" & "ProForma" & Year(Feuil1.Range("D4").value) & "\" & Format(ActiveSheet.Range("D5"), "000") & "-" & ph ***.Hyperlinks.Add .Cells(ligne, 1), Ppath & "\" &...

j'ai trouvé ThisWorkbook.Path ne s'enregistrer pas dans l'hyperlink bizarrement j'ai du la rajouter manuellement dans sFile = ThisWorkbook.Path & "\" & Feuil10.Range("A" & num).Hyperlinks(1).Address Set sWb = Workbooks.Open(sFile) on va dire résolu