Slå ihop Excel -celler utan att förlora något innehåll

Anonim

Hur man gör en av två cellinnehåll i Excel

Excel erbjuder möjlighet att sammanfatta celler. Med funktionen FORMAT - CELLER - ALIGNMENT - KOMBINERA CELLER kan du kombinera två celler till en enhet. Men vad gör du när det finns innehåll i båda cellerna som du inte vill förlora? Använd VBA för att lösa problemet.

Exemplet i följande bild visar en kort lista med namn:

Du vill kombinera de två innehållen från kolumnerna A och B i den första kolumnen A och sedan kombinera de två cellerna från kolumnerna A och B till en cell. Följande makro gör det här jobbet:

Slå ihop subceller ()

Dimlinje som heltal

Rad = 1

While Not (IsEmpty (Cells (line, 1)))

Celler (rad, 1) = Celler (rad, 1) & "" & Celler (rad, 2)

Celler (rad, 2) .ClearContents

Område (celler (rad, 1), celler (rad, 2)). Slå ihop

Rad = rad + 1

Wend

Kolumner (1). AutoFit

Avsluta Sub

Makrot går genom raderna från rad 1 tills kolumn A är tom. För varje icke-tomt innehåll är innehållet i A och B fäst vid varandra (åtskilda av ett mellanslag). Sedan är de två cellerna A och B anslutna för att bilda en cell. Följande bild visar resultatet: