Как да направите едно от две съдържания на клетки в Excel
Excel предлага възможност за обобщаване на клетките. С функцията ФОРМАТИРАНЕ - КЛЕТКИ - ПОГРЕЖДАНЕ - КОМБИНИРАНЕ НА КЛЕТКИ, можете да комбинирате две клетки в едно цяло. Но какво правите, когато в двете клетки има съдържание, което не искате да загубите? Използвайте VBA, за да разрешите проблема.
Примерът на следната фигура показва кратък списък с имена:
Искате да комбинирате двете съдържания от колони A и B в първата колона A и след това да комбинирате двете клетки от колони A и B в една клетка. Следният макрос върши тази работа:
Обединяване на подклетки ()
Затъмнена линия като цяло число
Ред = 1
Докато не (IsEmpty (клетки (ред, 1)))
Клетки (ред, 1) = Клетки (ред, 1) & "" & Клетки (ред, 2)
Клетки (ред, 2) .ClearContents
Диапазон (клетки (ред, 1), клетки (ред, 2)). Обединяване
Линия = ред + 1
Уенд
Колони (1). AutoFit
End Sub
Макросът преминава през редовете от ред 1, докато колона А е празна. За всяко непразно съдържание съдържанието на A и B е прикрепено едно към друго (разделено с интервал). Тогава двете клетки А и В са свързани, за да образуват една клетка. Следната фигура показва резултата: