Enregistrer en HTML le contenu d'une cellule

Bonjour, juste une petite question qui me taraude

Je voudrai convertir en HTML ce qu’il y a dans une cellule C1 et l’enregistrer dans mon disque dur

Sachant que les données a convertir sont dans la cellule A1 et que le nom du fichier a donner a l’html est dans B1

A1 = données

B1= nom du fichier html

C1 = lien du fichier html

J’ai bien trouvé pour convertir une page entière en HTML mais pas simplement le contenu d’une cellule

Merci a tous

Salut Samexel

Voici ton fichier avec le code, pour l'exemple je ne fait que la cellule A2

A+

Bonjour, c'est parfait super, c'est exactement ce que je veux

comment juste automatiser sur toute la colonne

1000 merci

Re,

samexel a écrit :

comment juste automatiser sur toute la colonne

1000 merci

Ce n'est pas compliqué, aurait-il fallu faire une petite recherche

Voici le code pour tous les fichiers à créer

Sub CréerFichiers()
  Dim DLig As Long, Lig As Long
  ' Trouver la dernière ligne de la feuille
  DLig = Range("A" & Rows.Count).End(xlUp).Row
  ' Pour chaque ligne à partir de la 2ème
  For Lig = 2 To DLig
    ' Appeler la procédure de création de fichier
    Call RangeToHTM(Range("A" & Lig), "C")
  Next Lig
End Sub

Nota : ATTENTION, il faut que le chemin du fichier soit valable

Avec éventuellement, cette formule à recopier vers le bas

="D:\"&B2&".html"

A+

désolé

ca marche plus

il met Sub ou Function non définie et me met en surbrillance

Call RangeToHTM

et en jaune

Sub CréerFichiers()

désolé je cherche ou est le bug

Re

Il faut juste remplacer le 1er code par celui donné

Tu ne dois pas supprimer le 2eme code

A+

ca Maarche

tu viens de me sauver le weekend

merci pour tout