Ako vytvoriť jeden z dvoch obsahov buniek v programe Excel
Excel ponúka možnosť zhrnúť bunky. S funkciou FORMÁT - BUNKY - VYROVNANIE - KOMBINUJTE BUNKY, môžete spojiť dve bunky do jedného celku. Čo však robiť, keď je v oboch bunkách obsah, o ktorý nechcete prísť? Na vyriešenie problému použite VBA.
Príklad na nasledujúcom obrázku zobrazuje krátky zoznam mien:
Chcete spojiť dva obsahy zo stĺpcov A a B v prvom stĺpci A a potom spojiť dve bunky zo stĺpcov A a B do jednej bunky. Túto úlohu vykonáva nasledujúce makro:
Zlúčiť čiastkové bunky ()
Stmaviť riadok ako celé číslo
Riadok = 1
Kým nie (je prázdny (bunky (riadok, 1)))
Bunky (riadok, 1) = Bunky (riadok, 1) & "" & Bunky (riadok, 2)
Bunky (riadok, 2). Jasný obsah
Rozsah (bunky (riadok, 1), bunky (riadok, 2)). Zlúčiť
Riadok = riadok + 1
Wend
Stĺpce (1). AutoFit
Koniec pod
Makro prechádza riadkami od riadka 1, kým nie je stĺpček A prázdny. Pri každom neprázdnom obsahu sú obsahy A a B navzájom spojené (oddelené medzerou). Potom sa dve bunky A a B spoja a vytvoria jednu bunku. Nasledujúci obrázok ukazuje výsledok:
