выберите последнюю непустую ячейку в диапазоне Excel - PullRequest
0 голосов
/ 21 октября 2018

У меня есть лист с множеством строк, похожий на этот

Castle Green     Taunton TA1 1NF             UK         
11 Bacon Ln      Moranbah QLD 4744           Australia          
40 Memory Ln     Hunter River                PE C0A 1N0      Canada     
Fidel Velazquez  Av Fidel Velázquez #3000    Col. Central    Central     64190 Monterrey     Mexico

Мне нужно собрать последнюю ячейку в каждой строке в одном новом столбце.Итак, новый столбец должен выглядеть так:

UK
Australia           
Canada      
Mexico

Большое спасибо.

Ответы [ 2 ]

0 голосов
/ 22 октября 2018

Если вы хотите использовать vba, вы можете использовать следующий код.+2 вставляет пустой столбец для разделения данных.

Dim ws As Worksheet, lRow As Long, lCol As Long

Set ws = ThisWorkbook.ActiveSheet
lRow = ws.Cells(Rows.Count, "A").End(xlUp).Row
lCol = ws.UsedRange.Columns.Count

For x = 2 To lRow
    ws.Cells(x, lCol + 2).Value = ws.Cells(x, Columns.Count).End(xlToLeft).Value
Next x
0 голосов
/ 21 октября 2018

Формула, которую вы ищете:

=LOOKUP(2,1/(A2:F2<>""),A2:F2)

Примените ее к диапазону, который вы хотите извлечь последнюю непустую ячейку в вашей строке.

Я ввожу формулу в ячейкуG2.

enter image description here

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...