Автосортировка по указаному номеру столбца

@каролинка · Регистрация: 28.10.2012

Author24 — интернет-сервис помощи студентам

Всем доброго времени суток.
У меня возникла такая проблема. Не знаю как осуществить следующее.
Есть файл эксель, там много столбцов. И есть ячейка. Если мы укажем в ячейке, к примеру 1, сортируется столбец А (по возрастанию), если - 4 , то D и так далее
Может подскажет кто что и как делать?

@sn_88 · 29.11.2012, 17:58

Можете выложить пример?

@Казанский · 29.11.2012, 18:08

Может, удобнее сделать по двойному клику по одной из ячеек заголовка таблицы? И цветом можно эту ячейку (или столбец) выделить, чтобы сразу было видно, по какому столбцу отсортировано.

@sn_88 · 29.11.2012, 18:27

Visual Basic

Sub Makros()
 
S = ActiveSheet.Cells.SpecialCells(xlCellTypeLastCell).Row
K = 2                    'необходимое количество колонок для сортировки
 
a = Cells(1, 4)       'изменяемое значение на листе (ячейка D4)
 
    Range(Cells(1, 1), Cells(S, K)).Select
    Selection.Sort Cells(1, a)
 
    
End Sub

@каролинка · 29.11.2012, 22:41 **[ТС]**

Казанский, там нужно именно кодом как-то реализовать...

sn_88, не могу запустить. какие-то ошибки постоянно

Добавлено через 8 минут
что-то с Selection.Sort Cells(1, a)

@sn_88 · 30.11.2012, 10:02

вы введите значение в ячейку D4, это и будет номер необходимого столбца (целое число).
Можете выложить пример, указав, в какой ячейке вы будете заносить номер необходимого столбца.

@каролинка · 30.11.2012, 12:01 **[ТС]**

testexample.xlsx

вот пример файла
выделенная ячейка (С3)- там будет значение
а столбцы внизу д. сортироваться по возрастанию в зависимости от значения в С3

@sn_88 · 30.11.2012, 13:22

Файл во вложении. При изменении значения в ячейке С3 происходит сортировка указанного столбца.

@каролинка · 30.11.2012, 13:58 **[ТС]**

sn_88, спасибо большое, работает отлично!)

sn_88, а если надо чтоб на кнопку нажимать?
и еще вопрос: можно ли при такой сортировке не учитывать тире(дефисы)?

@sn_88 · 30.11.2012, 14:05

Вариант с кнопкой во вложении.

По поводу "-", если вместо них будут пустые ячейки то и придумывать ничего не надо будет.

@каролинка 0 / 0 / 0 Регистрация: 28.10.2012 Сообщений: 152
		1
	Автосортировка по указаному номеру столбца 29.11.2012, 17:52. Показов 1085. Ответов 9 Метки нет (Все метки) Всем доброго времени суток. У меня возникла такая проблема. Не знаю как осуществить следующее. Есть файл эксель, там много столбцов. И есть ячейка. Если мы укажем в ячейке, к примеру 1, сортируется столбец А (по возрастанию), если - 4 , то D и так далее Может подскажет кто что и как делать? 0

@sn_88 65 / 65 / 4 Регистрация: 21.06.2011 Сообщений: 166
	29.11.2012, 17:58	2
	Можете выложить пример? 0

@Казанский 15145 / 6418 / 1731 Регистрация: 24.09.2011 Сообщений: 9,999
	29.11.2012, 18:08	3
	Может, удобнее сделать по двойному клику по одной из ячеек заголовка таблицы? И цветом можно эту ячейку (или столбец) выделить, чтобы сразу было видно, по какому столбцу отсортировано. 0

@каролинка 0 / 0 / 0 Регистрация: 28.10.2012 Сообщений: 152
	29.11.2012, 22:41 [ТС]	5
	Казанский, там нужно именно кодом как-то реализовать... sn_88, не могу запустить. какие-то ошибки постоянно Добавлено через 8 минут что-то с Selection.Sort Cells(1, a) 0

@sn_88 65 / 65 / 4 Регистрация: 21.06.2011 Сообщений: 166
	30.11.2012, 10:02	6
	вы введите значение в ячейку D4, это и будет номер необходимого столбца (целое число). Можете выложить пример, указав, в какой ячейке вы будете заносить номер необходимого столбца. 1

@каролинка 0 / 0 / 0 Регистрация: 28.10.2012 Сообщений: 152
	30.11.2012, 12:01 [ТС]	7
	testexample.xlsx вот пример файла выделенная ячейка (С3)- там будет значение а столбцы внизу д. сортироваться по возрастанию в зависимости от значения в С3 0

@каролинка 0 / 0 / 0 Регистрация: 28.10.2012 Сообщений: 152
	30.11.2012, 13:58 [ТС]	9
	sn_88, спасибо большое, работает отлично!) sn_88, а если надо чтоб на кнопку нажимать? и еще вопрос: можно ли при такой сортировке не учитывать тире(дефисы)? 0

	30.11.2012, 14:05

Опции темы