XL 2016 Conversion texte -> html (Problème résolu)

FA92

XLDnaute Nouveau
Bonjour,
Je recherche une macro (sous Excel ou Calc) permettant de convertir une colonne (de cellules) contenant du texte en html :
1) Je sélectionne la colonne à convertir
2) La macro converti le texte en html, recopie le résultat dans une colonne vide à sa droite et s'arrête quand elle arrive sur une case vide.
Au niveau de la conversion, j'ai juste besoin de récupérer les retours à la ligne. Je n'ai pas besoin de convertir le format du texte (italique, gras, ...)
Merci par avance pour votre aide.
 

FA92

XLDnaute Nouveau
Oui. Exemple de texte dans une cellule :

Ce moderne petit sac en cuir de vachette, léger, sport, élégant, fabriqué en Italie, se porte à l'épaule grâce à sa bandoulière réglable. De très bonne qualité, il est, de plus, très fonctionnel et très pratique avec ses nombreuses poches (cinq). Grâce à sa longueur idéale, vous pourrez facilement y ranger lunettes et chéquier. Ouverture maximale latérale pour une meilleure visibilité de l'intérieur de votre sac et soufflets latéraux en tissu pour ne rien perdre lors de son ouverture. Pouvant également servir de trousse (bandoulière amovible) dans un sac cabas ou dans votre valise, vous ne pourrez plus vous passer de cet accessoire de mode tendance grâce à ses boucles métal carrées.

PS : Pour plus de photos, consultez le sac de couleur ""marron camel"".

Détails :
- Information(s) complémentaire(s) : bandoulière réglable et amovible. Fermeture zippée du sac avec ouverture maximale sur les deux côtés. Sur le devant, une poche zippée verticale. Au dos, une poche zippée horizontale. A l'intérieur, en tissu, deux compartiments séparés par une grande poche centrale zippée : l'une comporte une poche téléphone, l'autre une petite poche zippée. D'une série de fabrication à une autre, le type de languette zip et/ou la couleur du tissu intérieur (doublure) peut varier.
- Matière(s) : cuir, doublure tissu.
- Dimensions approximatives : longueur 26 cm, hauteur 19 cm, épaisseur 9 cm.
- Poids : environ 320 g.
- Couleur(s) : marron camel.
 

dysorthographie

XLDnaute Accro
Bonsoir,
Je suis pas certain d'avoir compris.

Disons si je sélectionne la colonne A tu veux que les é de la celle A1 deviennent des &eaculte; dans la cellule B1 et que les retours ligne de A1 deviennent des <BR> dans B1?


VB:
Ce moderne petit sac en cuir de vachette, l&eacute;ger, sport, &eacute;l&eacute;gant, fabriqu&eacute; en Italie, se porte &agrave; l'&eacute;paule grâce &agrave; sa bandoulière r&eacute;glable. De très bonne qualit&eacute;, il est, de plus, très fonctionnel et très pratique avec ses nombreuses poches (cinq). Grâce &agrave; sa longueur id&eacute;ale, vous pourrez facilement y ranger lunettes et ch&eacute;quier. Ouverture maximale lat&eacute;rale pour une meilleure visibilit&eacute; de l'int&eacute;rieur de votre sac et soufflets lat&eacute;raux en tissu pour ne rien perdre lors de son ouverture. Pouvant &eacute;galement servir de trousse (bandoulière amovible) dans un sac cabas ou dans votre valise, vous ne pourrez plus vous passer de cet accessoire de mode tendance grâce &agrave; ses boucles m&eacute;tal carr&eacute;es.<BR>
<BR>
<BR>
<BR>
PS : Pour plus de photos, consultez le sac de couleur ""marron camel"".<BR>
<BR>
<BR>
<BR>
D&eacute;tails :<BR>
<BR>
- Information(s) compl&eacute;mentaire(s) : bandoulière r&eacute;glable et amovible. Fermeture zipp&eacute;e du sac avec ouverture maximale sur les deux côt&eacute;s. Sur le devant, une poche zipp&eacute;e verticale. Au dos, une poche zipp&eacute;e horizontale. A l'int&eacute;rieur, en tissu, deux compartiments s&eacute;par&eacute;s par une grande poche centrale zipp&eacute;e : l'une comporte une poche t&eacute;l&eacute;phone, l'autre une petite poche zipp&eacute;e. D'une s&eacute;rie de fabrication &agrave; une autre, le type de languette zip et/ou la couleur du tissu int&eacute;rieur (doublure) peut varier.<BR>
<BR>
- Matière(s) : cuir, doublure tissu.<BR>
<BR>
- Dimensions approximatives : longueur 26 cm, hauteur 19 cm, &eacute;paisseur 9 cm.<BR>
<BR>
- Poids : environ 320 g.<BR>
<BR>
- Couleur(s) : marron camel.
 
Dernière édition:

FA92

XLDnaute Nouveau
Bonsoir,
Je suis pas certain d'avoir compris.

Disons si je sélectionne la colonne A tu veux que les é de la celle A1 deviennent des &eaculte; dans la cellule B1 et que les retours ligne de A1 deviennent des <BR> dans B1?


VB:
Ce moderne petit sac en cuir de vachette, l&eacute;ger, sport, &eacute;l&eacute;gant, fabriqu&eacute; en Italie, se porte &agrave; l'&eacute;paule grâce &agrave; sa bandoulière r&eacute;glable. De très bonne qualit&eacute;, il est, de plus, très fonctionnel et très pratique avec ses nombreuses poches (cinq). Grâce &agrave; sa longueur id&eacute;ale, vous pourrez facilement y ranger lunettes et ch&eacute;quier. Ouverture maximale lat&eacute;rale pour une meilleure visibilit&eacute; de l'int&eacute;rieur de votre sac et soufflets lat&eacute;raux en tissu pour ne rien perdre lors de son ouverture. Pouvant &eacute;galement servir de trousse (bandoulière amovible) dans un sac cabas ou dans votre valise, vous ne pourrez plus vous passer de cet accessoire de mode tendance grâce &agrave; ses boucles m&eacute;tal carr&eacute;es.<BR>
<BR>
<BR>
<BR>
PS : Pour plus de photos, consultez le sac de couleur ""marron camel"".<BR>
<BR>
<BR>
<BR>
D&eacute;tails :<BR>
<BR>
- Information(s) compl&eacute;mentaire(s) : bandoulière r&eacute;glable et amovible. Fermeture zipp&eacute;e du sac avec ouverture maximale sur les deux côt&eacute;s. Sur le devant, une poche zipp&eacute;e verticale. Au dos, une poche zipp&eacute;e horizontale. A l'int&eacute;rieur, en tissu, deux compartiments s&eacute;par&eacute;s par une grande poche centrale zipp&eacute;e : l'une comporte une poche t&eacute;l&eacute;phone, l'autre une petite poche zipp&eacute;e. D'une s&eacute;rie de fabrication &agrave; une autre, le type de languette zip et/ou la couleur du tissu int&eacute;rieur (doublure) peut varier.<BR>
<BR>
- Matière(s) : cuir, doublure tissu.<BR>
<BR>
- Dimensions approximatives : longueur 26 cm, hauteur 19 cm, &eacute;paisseur 9 cm.<BR>
<BR>
- Poids : environ 320 g.<BR>
<BR>
- Couleur(s) : marron camel.
 

FA92

XLDnaute Nouveau
-> Effectivement. Vous avez raison. Il faut aussi que les caractères é è à ... soient convertis en html.

Après réflexion, je pense qu'on devrait obtenir le résultat suivant :

<p>Ce moderne petit sac en cuir de vachette, l&eacute;ger, sport, &eacute;l&eacute;gant, fabriqu&eacute; en Italie, se porte &agrave; l'&eacute;paule gr&acirc;ce &agrave; sa bandouli&egrave;re r&eacute;glable. De tr&egrave;s bonne qualit&eacute;, il est, de plus, tr&egrave;s fonctionnel et tr&egrave;s pratique avec ses nombreuses poches (cinq). Gr&acirc;ce &agrave; sa longueur id&eacute;ale, vous pourrez facilement y ranger lunettes et ch&eacute;quier. Ouverture maximale lat&eacute;rale pour une meilleure visibilit&eacute; de l'int&eacute;rieur de votre sac et soufflets lat&eacute;raux en tissu pour ne rien perdre lors de son ouverture. Pouvant &eacute;galement servir de trousse (bandouli&egrave;re amovible) dans un sac cabas ou dans votre valise, vous ne pourrez plus vous passer de cet accessoire de mode tendance gr&acirc;ce &agrave; ses boucles m&eacute;tal carr&eacute;es.</p>

<p>PS : Pour plus de photos, consultez le sac de couleur &quot;&quot;marron camel&quot;&quot;.</p>

<p>D&eacute;tails :<br />
- Information(s) compl&eacute;mentaire(s) : bandouli&egrave;re r&eacute;glable et amovible. Fermeture zipp&eacute;e du sac avec ouverture maximale sur les deux c&ocirc;t&eacute;s. Sur le devant, une poche zipp&eacute;e verticale. Au dos, une poche zipp&eacute;e horizontale. A l'int&eacute;rieur, en tissu, deux compartiments s&eacute;par&eacute;s par une grande poche centrale zipp&eacute;e : l'une comporte une poche t&eacute;l&eacute;phone, l'autre une petite poche zipp&eacute;e. D'une s&eacute;rie de fabrication &agrave; une autre, le type de languette zip et/ou la couleur du tissu int&eacute;rieur (doublure) peut varier.<br />
- Mati&egrave;re(s) : cuir, doublure tissu.<br />
- Dimensions approximatives : longueur 26 cm, hauteur 19 cm, &eacute;paisseur 9 cm.<br />
- Poids : environ 320 g.<br />
- Couleur(s) : marron camel.</p>
 

dysorthographie

XLDnaute Accro
à titre d'exemple!
Code:
Sub test()
Debug.Print TxtHtml("ÁáCcÉéÍíÓóÚúÝýÀàÈèÌì " & vbCrLf & "ÒòÙùÂâÊêÎîÔ      ôÛûÄäËëÏïÖöÜüŸÿÃãÕõÇç")
End Sub
 
Function TxtHtml(T As String) As String
Dim Txt
Dim Htm
Dim I As Long
TxtHtml = T
Txt = "Á$á$É$é$Í$í$Ó$ó$Ú$ú$Ý$ý$À$à$È$è$Ì$ì$Ò$ò$Ù$ù$Â$â$Ê$ê$Î$î$Ô$ô$Û$û$Ä$ä$Ë$ë$Ï$ï$Ö$ö$Ü$ü$Ÿ$ÿ$Ã$ã$Õ$õ$Ç$ç$ $" & vbCrLf
Htm = "&Aacute;$&aacute;$&Eacute;$&eacute;$&Iacute;$&iacute;$&Oacute;$&oacute;$&Uacute;$&uacute;$&Yacute;$&yacute;$&Agrave;$&agrave;$&Egrave;$&egrave;$&Igrave;$&igrave;"
Htm = Htm & "$&Ograve;$&ograve;$&Ugrave;$&ugrave;$&Acirc;$&acirc;$&Ecirc;$&ecirc;$&Icirc;$&icirc;$&Ocirc;$&ocirc;$&Ucirc;$&ucirc;$&Auml;$&auml;$&Euml;$&euml;"
Htm = Htm & "$&Ouml;$&ouml;$&Uuml;$&uuml;$&Yuml;$&yuml;$&Atilde;$&atilde;$&Itilde;$&itilde;$&Otilde;$&otilde;$&Ccedil;$&ccedil;$&nbsp;$<br>"
Txt = Split(Txt, "$")
Htm = Split(Htm, "$")
For I = 0 To UBound(Txt)
TxtHtml = Replace(TxtHtml, Txt(I), Htm(I), 1, compare:=vbBinaryCompare)
Next
End Function
 

Discussions similaires

Réponses
13
Affichages
354

Membres actuellement en ligne

Statistiques des forums

Discussions
312 196
Messages
2 086 099
Membres
103 116
dernier inscrit
kutobi87