Dzień Dobry.
Proszę o informację, czy można w Excelu połączyć teksty z dwóch komórek zachowując formatowanie?
Przykład:
Pozdrawiam.
Anna Wojciechowska.
Dzień Dobry.
Proszę o informację, czy można w Excelu połączyć teksty z dwóch komórek zachowując formatowanie?
Przykład:
Pozdrawiam.
Anna Wojciechowska.
Witam.
Najprawdopodobniej będziesz to w stanie zrobić za pomocą VBA. Znalazłem jeden z artykułów, który pokazuje jak ewentualnie można to zrobić.
Pozdrawiam.
Witam.
Jeżeli wystarczy kopiowanie stylu czcionki, to poniższy kod załatwia sprawę.
Działa tylko wtedy, gdy cała komórka źródłowa ma określony styl.
'zakładamy, że komórka aktywna stoi po prawej od komórek źródłowych Sub ZlaczUwzgledniajacStylFonta() Dim Kom1 As Range, Kom2 As Range Set Kom1 = ActiveCell.Offset(0, -2) Set Kom2 = ActiveCell.Offset(0, -1) ActiveCell = Kom1 & " " & Kom2 ActiveCell.Characters(Start:=1, Length:=Len(Kom1)).Font.FontStyle = Kom1.Characters.Font.FontStyle ActiveCell.Characters(Start:=Len(Kom1) + 2, Length:=Len(Kom2)).Font.FontStyle = Kom2.Characters.Font.FontStyle End Sub
A jakiego kodu użyć, aby w finalnej komórce był zachowany kolor komórki źródłowej?