Спојите Екцел ћелије без губитка садржаја

Anonim

Како направити један од два садржаја ћелија у Екцелу

Екцел нуди могућност сумирања ћелија. Са функцијом ФОРМАТ - ЋЕЛИЈЕ - ПОРАВНАВАЊЕ - КОМБИНУЈТЕ ЋЕЛИЈЕ, можете комбиновати две ћелије у једну целину. Али шта радите када у обе ћелије постоји садржај који не желите да изгубите? Да бисте решили проблем, користите ВБА.

Пример на следећој слици приказује кратку листу имена:

Желите да комбинујете два садржаја из колона А и Б у првој колони А, а затим спојите две ћелије из колона А и Б у једну ћелију. Следећи макро ради овај посао:

Споји подћелије ()

Дим лине Ас Интегер

Ред = 1

Док није (ИсЕмпти (ћелије (ред, 1)))

Ћелије (ред, 1) = Ћелије (ред, 1) & "" & Ћелије (ред, 2)

Ћелије (линија, 2) .ЦлеарЦонтентс

Опсег (ћелије (ред, 1), ћелије (ред, 2)). Спајање

Линија = линија + 1

Венд

Колоне (1) .АутоФит

Енд Суб

Макро пролази кроз редове од реда 1 све док колона А није празна. За сваки садржај који није празан, садржај А и Б су међусобно повезани (одвојени размаком). Затим су две ћелије А и Б повезане да формирају једну ћелију. Следећа слика приказује резултат: