MS Excel - łączenie tekstów z dwóch komórek z zachowaniem formatowania

Excel 2010 - makro nie działa @ **bag** | **30.04.2014**

3
1
250

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.

#Excel,

Zapytał
@ Anna_Wojciechowska_65dm | 27.10.2015
- 0
- 3
- 4

1

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ć.

LINK

Pozdrawiam.

Komentarze (1)

Odpowiedział
@ sseba15 | 28.10.2015
- 2
- 0
- 3

Komentarze

Dzień Dobry,
czyli nie ma jakiejś prostej funkcji?.
Dziekuję za infromację.

Pozdrawiam,
Anna Wojciechowska

Skomentował : @ Anna_Wojciechowska_65dm ,29.10.2015

0
3
4

6

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

Skomentuj

Odpowiedział
@ | 02.11.2015
TRENER ALTKOM AKADEMII

Pytanie