|
Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
 Excel Zellentext in HTML formatierten Text konvertieren |
06.11.2014 10:22:13 |
Andreas |
|
|
|
06.11.2014 23:45:35 |
Sebastel1804 |
|
|
|
07.11.2014 07:21:14 |
Gast62415 |
|
|
Von:
Andreas |
Datum:
06.11.2014 10:22:13 |
Views:
1094 |
Rating:
|
Antwort:
|
Thema:
Excel Zellentext in HTML formatierten Text konvertieren |
|
Hallo,
ich habe folgendes Problem und hoffe sehr das ihr mir helfen könnt. Ich habe den folgenden Code mit dem ich in Excel Text in HTML typischen Text konvertieren kann (zumindest etwas :-) ). Den Code habe ich mir im Internet zusammengesucht, da ich VBA nicht richtig kann. Das Problem was ich habe, ist das ich es nicht hinbekomme, das er mir z.B. Zelle A2 bis A50 konvertiert. Der Code funktioniert nur mit einer einzigen Zelle. Da ich aber mehrere Zellen habe, die ich formatieren muss, hoffe ich sehr das ihr dafür eine Lösung kennt. ("A2:A50") funktioniert leider nicht.
Super wäre es wenn ich die zu konvertierende Zelle im Excelblatt einfach per Mausklick auswählen könnte und diese dann konvertiert wird.
Sub test()
With Cells.Font
.Name = "Calibri"
.Size = 12
.Strikethrough = False
.Superscript = False
.Subscript = False
.OutlineFont = False
.Shadow = False
.Underline = xlUnderlineStyleNone
.ColorIndex = xlAutomatic
.Bold = False
End With
Dim arrText, strText$, i%
arrText = Split(Range("A2"), Chr(10))
For i = LBound(arrText) To UBound(arrText)
If arrText(i) = "" Then
strText = strText & Chr(10)
Else
strText = strText & "•" & arrText(i) & "
" & Chr(10)
End If
Next i
Range("A2") = strText
End Sub
Vielen Dank im Voraus.
Andreas |
- Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
- Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
- Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
- Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
- Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei
Antworten auf Ihren Beitrag zu benachrichtigen
Bitte geben Sie ein aussagekräftiges Thema an.
Bitte geben Sie eine gültige Email Adresse ein!
- Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
- Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
- Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
- Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
- Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei
Antworten auf Ihren Beitrag zu benachrichtigen
|
Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
Excel Zellentext in HTML formatierten Text konvertieren |
06.11.2014 10:22:13 |
Andreas |
|
|
|
06.11.2014 23:45:35 |
Sebastel1804 |
|
|
|
07.11.2014 07:21:14 |
Gast62415 |
|
|