Yhdistä Excel -solut menettämättä sisältöä

Anonim

Kuinka tehdä yksi kahdesta solun sisällöstä Excelissä

Excel tarjoaa mahdollisuuden tiivistää solut. Toiminnolla FORMAT - CELLS - ALIGNMENT - COMBINE CELLS voit yhdistää kaksi solua yhdeksi yksiköksi. Mutta mitä teet, kun molemmissa soluissa on sisältöä, jota et halua menettää? Käytä VBA: ta ongelman ratkaisemiseen.

Seuraavan kuvan esimerkissä on lyhyt luettelo nimistä:

Haluat yhdistää ensimmäisen sarakkeen A sarakkeiden A ja B kaksi sisältöä ja yhdistää sitten sarakkeiden A ja B kaksi solua yhdeksi soluksi. Seuraava makro suorittaa tämän työn:

Yhdistä alisolut ()

Himmennysviiva kokonaislukuna

Rivi = 1

Vaikka ei (IsEmpty (Solut (rivi, 1)))

Solut (rivi, 1) = Solut (rivi, 1) & "" & solut (rivi, 2)

Solut (rivi, 2)

Alue (Solut (rivi, 1), Solut (rivi, 2)). Yhdistä

Rivi = rivi + 1

Lähteä

Sarakkeet (1)

End Sub

Makro kulkee rivien läpi riviltä 1, kunnes sarake A on tyhjä. Jokaiselle ei-tyhjälle sisällölle kohdat A ja B on liitetty toisiinsa (erotettu välilyönnillä). Sitten kaksi solua A ja B yhdistetään muodostamaan yksi solu. Seuraavassa kuvassa näkyy tulos: