Бонни описала типичную проблему, возникающую при импорте файла в Excel. Импортируемый файл представляет собой отсканированный текстовый файл, и импорт проходит нормально, с одной небольшой ошибкой: в одном столбце, где в исходном документе был обернут текст, текст теперь занимает несколько строк на листе. Бонни ищет способ снова объединить эти строки в одну ячейку в этом столбце.

Это можно сделать двумя способами. Если вам не нужно делать это слишком часто, лучше всего подойдет шаблонный подход. Просто используйте амперсанд (&), чтобы объединить содержимое строк, которые вы хотите объединить:

=C6 & " " & C7 & " " & C8 & " " & C9

В результате весь текст объединен в одну ячейку. Вы можете скопировать этот результат в буфер обмена, а затем использовать Специальную вставку, чтобы поместить его в последнюю ячейку, где он вам нужен. Наконец, вы можете удалить несколько исходных строк, которые больше не нужны.

Если вам нужно выполнить этот тип объединения более нескольких раз, может помочь простой макрос:

Sub Combine()

Dim J As Integer

If Selection.Cells.Count > 1 Then         For J = 2 To Selection.Cells.Count             Selection.Cells(1).Value = _               Selection.Cells(1).Value & " " & _               Selection.Cells(J).Value             Selection.Cells(J).Clear         Next J     End If End Sub

Чтобы использовать этот макрос, выберите ячейки, которые вы хотите объединить, а затем запустите макрос. Содержимое всех ячеек объединяется в первую ячейку выделения, затем все, что находится в других ячейках, очищается.

Макрос не удаляет никаких строк; это остается сделать вам. Однако он быстро объединяет содержимое — даже быстрее, если вы назначите макросу комбинацию клавиш.

_Примечание: _

Если вы хотите узнать, как использовать макросы, описанные на этой странице (или на любой другой странице на сайтах ExcelTips), я подготовил специальную страницу, содержащую полезную информацию.

link: / excelribbon-ExcelTipsMacros [Щелкните здесь, чтобы открыть эту специальную страницу в новой вкладке браузера].

ExcelTips — ваш источник экономичного обучения Microsoft Excel.

Этот совет (2417) применим к Microsoft Excel 97, 2000, 2002 и 2003. Вы можете найти версию этого совета для ленточного интерфейса Excel (Excel 2007 и более поздних версий) здесь:

link: / excelribbon-Combining_Multiple_Rows_in_a_Column [Объединение нескольких строк в столбце].