Страницы: 1
RSS
Сортировка + нумерованный список.
 
Помогите сделать сортировку по фамилии любым доступным способом. Понимаю , что данные организованы не правильно еще и ячейки объединены но структуру таблицы менять нельзя. Может дополнительный столбец, форматировать как таблицу? Главное при выводе на печать внешний вид оставался без изменений.
 
покажите, что должно получиться в столбцах "№ п/п" и "ФИО"
 
во вы заморочились..  
 
муторно это..  
 
и не подскажешь по существу - надо просто сделать.  
 
коротко - фамилии занести в список( можно на другом листе), рядом прописать порядковые номера, отсортировать фамилии вместе сномерами( по фамилиям, разумеется), получившийся новый порядок номеров использовать в макросе, кот будет менять местами части таблицы - там же не только значения, но и форматирование..
Живи и дай жить..
 
{quote}{login=Михаил С.}{date=28.05.2011 01:37}{thema=}{post}покажите, что должно получиться в столбцах "№ п/п" и "ФИО"{/post}{/quote}  
Встолбце "№ п/п" должен получиться нумерованный список просто если в столбце "В" вместо фамилии стоит "ФИО" это не считаем а записываем текст "№ п/п". В столбце "ФИО" сортировка фамилии по алфавиту.
 
не совсем понятно - столбцы C:Q перед сортировкой уже заполнены или нет?  
в примере-то я вижу, что не заполнены. а как на самом деле?
фрилансер Excel, VBA - контакты в профиле
"Совершенствоваться не обязательно. Выживание — дело добровольное." Э.Деминг
 
{quote}{login=ikki}{date=28.05.2011 02:30}{thema=}{post}не совсем понятно - столбцы C:Q перед сортировкой уже заполнены или нет?  
в примере-то я вижу, что не заполнены. а как на самом деле?{/post}{/quote}  
Да заполнены эти данные должны оставаться при сортировке с фамилией.
 
пробуйте.  
лист "т" должен существовать, но может быть скрытым.
фрилансер Excel, VBA - контакты в профиле
"Совершенствоваться не обязательно. Выживание — дело добровольное." Э.Деминг
 
{quote}{login=ikki}{date=28.05.2011 03:05}{thema=}{post}пробуйте.  
лист "т" должен существовать, но может быть скрытым.{/post}{/quote}  
Спасибо ikki но таких фамилий 500 и они постоянно добавляются и удаляются я конечно готов потратить время и записать на лист "т" все фамилии но записать макрос у меня не получится. Может как то формулами?
 
{quote}{login=oleg}{date=28.05.2011 03:23}{thema=Re: }{post}{quote}{login=ikki}{date=28.05.2011 03:05}{thema=}{post}пробуйте.  
лист "т" должен существовать, но может быть скрытым.{/post}{/quote}  
Спасибо ikki но таких фамилий 500 и они постоянно добавляются и удаляются я конечно готов потратить время и записать на лист "т" все фамилии но записать макрос у меня не получится. Может как то формулами?{/post}{/quote}  
 
должен вам сказать - вы плохо читаете.  
написано "лист "т" должен существовать".    
всё.  
больше никаких требований к нему не предъявляется.  
заполняется он и обрабатывается в макросе.  
короче - жмите смайлик. будет вам счастье :)
фрилансер Excel, VBA - контакты в профиле
"Совершенствоваться не обязательно. Выживание — дело добровольное." Э.Деминг
 
ikki в Вашем посте все работает , но когда вставляю свой лист с данными к листу "Т" некоторые фамилии не сортируются и в столбце где считается сумма часов вместо 168 появляются 157,25;173,21 и.т.д. пример не могу показать очень большой размер в таблице до 10 строк почти всегда все "ОК"
 
Если не трудно объясните , что делаю не так?
 
{quote}{login=oleg69}{date=30.05.2011 08:02}{thema=}{post}ikki в Вашем посте все работает , но когда вставляю свой лист с данными к листу "Т" некоторые фамилии не сортируются и в столбце где считается сумма часов вместо 168 появляются 157,25;173,21 и.т.д. пример не могу показать очень большой размер в таблице до 10 строк почти всегда все "ОК"{/post}{/quote}  
либо перед "некоторыми фамилиями" не надо ставить пробел, либо это надо было оговаривать отдельно и пример приводить соответствующий :)  
 
лечится так:  
в макросе оператор    
wsTemp.Cells(j2, 19).Value = wsTest.Cells(i, 2).Value    
меняем на    
wsTemp.Cells(j2, 19).Value = Trim(wsTest.Cells(i, 2).Value)  
 
по поводу суммы часов - не очень понял, примера не вижу.
фрилансер Excel, VBA - контакты в профиле
"Совершенствоваться не обязательно. Выживание — дело добровольное." Э.Деминг
 
{quote}{login=oleg69}{date=30.05.2011 08:04}{thema=}{post}Если не трудно объясните , что делаю не так?{/post}{/quote}  
увы, не знаю.  
у меня Excel 2003, а вы использовали в этом файле какие-то новые возможности - мой Ex ругается на ваш файл.
фрилансер Excel, VBA - контакты в профиле
"Совершенствоваться не обязательно. Выживание — дело добровольное." Э.Деминг
 
нет, Дмитрий, не так.  
открываю с помощью конвертера.  
просто пишет, что уровень вложенности функций больше семи.  
потом открывает - но таких формул я в файле не нашёл.  
наверное, принудительно исправляются.
фрилансер Excel, VBA - контакты в профиле
"Совершенствоваться не обязательно. Выживание — дело добровольное." Э.Деминг
 
{quote}{login=ikki}{date=30.05.2011 08:45}{thema=}{post}нет, Дмитрий, не так.  
открываю с помощью конвертера.  
просто пишет, что уровень вложенности функций больше семи.  
потом открывает - но таких формул я в файле не нашёл.  
наверное, принудительно исправляются.{/post}{/quote}  
Спасибо все дело в пробелах. 2003 ругается наверное потому что более семи если.
 
посмотрите на формулы в зелёных ячейках - возможно, вас устроит такой вариант?
фрилансер Excel, VBA - контакты в профиле
"Совершенствоваться не обязательно. Выживание — дело добровольное." Э.Деминг
 
хотелось еще добавить условие если В25 Ф.И.О. А25 "№ п/п"
 
да уберите вы вообще эти промежуточные заголовки!  
зачем они вам нужны?
фрилансер Excel, VBA - контакты в профиле
"Совершенствоваться не обязательно. Выживание — дело добровольное." Э.Деминг
 
Конечно убрал бы да форму не разрешают менять.
 
Еще вариантец. Без доп. листа.
 
Спасибо тоже хорошо работает.
 
nilem пользуюсь Вашим макросом без доп. листа все хорошо пока не добавил столбец на 31 день. Помогите поправить макрос , что бы он одинаково работал на 30 и 31 день.
 
Вот. Проверял на 15 и 38 дней.  
ЗЫ У нас в Уфе есть месяц Тупень - 38 дней :)
 
Спасибо! намек понял.
 
{quote}{login=oleg69}{date=21.07.2011 09:16}{thema=}{post}Спасибо! намек понял.{/post}{/quote}  
Олег, это никакой не намек, просто была недавно такая тема. Вы здесь совсем ни при чем. Извиняйте, если получилось двусмысленно.
 
Серж искал такой месяц :-)
 
nilem Какие могут быть обиды Вы столько помогаете и не только мне. Даже если не двусмысленно с моей стороны ни каких обид!
 
Опять не получается добавил столбец формула сбилась. В post_243352.zip все работает. Второй день разбираюсь посмотрите , что делаю не так. Вывалил весь свой файл. Юрий извините вроде 100кб уложился.
Страницы: 1
Читают тему
Наверх