ich habe mehrere Zellen wo normaler Text drin steht, möchte jetzt diese Zellen in ein HTML-CODE umwandeln,wie mache ich das am Besten?
Gruß
Kai
OptionExplicit
Sub Text2Html()
Range("B12").Replace vbLf, "<br>" & vbLf, 2
Range("B12") = "<p>" & Range("B12").Text & "<p>"
End Sub
Gruß