Перейти из форума на сайт.

НовостиФайловые архивы
ПоискАктивные темыТоп лист
ПравилаКто в on-line?
Вход Забыли пароль? Первый раз на этом сайте? Регистрация
Компьютерный форум Ru.Board » Компьютеры » Программы » Microsoft Excel FAQ (часть 3)

Модерирует : gyra, Maz

Widok (29-08-2008 13:12): лимит страниц. продолжаем здесь  Версия для печати • ПодписатьсяДобавить в закладки
Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101

   

Widok



Moderator-Следопыт
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

Просьба к посетителям топика дополнять шапку наиболее часто задаваемыми вопросами со ссылками на ответы
в обязательном порядке

 
  • Смена представления имен столбцов с буквенного на цифровое и обратно


    Сумма прописью
  • Надстройки "Сумма прописью"
  • надстройка Excellerator (c) Michael Zemlanukha & Maxim Shemanarev
  • макрос Num2String


  • Список соответствия имен функций в английской и русской версиях Excel
  • Описание Microsoft Excel File Format (eng.)
     
     
    Предыдущие ветки топика: Часть 1 | Часть 2
     
    Все вопросы по программированию (макросы, скрипты, пользовательские функции и т.п.) обсуждаются в теме Excel VBA в разделе Прикладное программирование.
     
    При необходимости выложить скриншот пользуйтесь сервисом ImageShack® (ограничение на размер файла <1.5 Mb)

  • Всего записей: 24190 | Зарегистр. 07-04-2002 | Отправлено: 19:48 17-05-2007 | Исправлено: Maz, 22:45 24-02-2017
    Mushroomer



    Platinum Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    namchik
    Смотри в шапке "Надстройки "Сумма прописью"

    Всего записей: 22840 | Зарегистр. 19-01-2002 | Отправлено: 09:10 10-08-2007
    namchik



    Silver Member
    Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
    Mushroomer
    там
    Цитата:
    We’re sorry, but we were unable to service your request. You may wish to choose from the links below for information about Microsoft products and services.

    Всего записей: 4080 | Зарегистр. 01-06-2004 | Отправлено: 09:36 10-08-2007
    SERGE_BLIZNUK

    Silver Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    namchik
    в Интернете найти абсолютно не проблема.
    я нашёл у себя на винте.
    проверил - работает.
    вот, выложил "Num2String преобразование числа в текстовое представление"
    Автор: Игорь Ульянченко igorul@aha.ru
     
      http://rapidshare.com/files/48076403/num2string.rar.html
    зеркало
      http://ifolder.ru/2957331
     
     

    Всего записей: 2014 | Зарегистр. 12-09-2002 | Отправлено: 12:42 10-08-2007
    namchik



    Silver Member
    Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
    SERGE_BLIZNUK
    Еще раз спасибо, Сергей

    Всего записей: 4080 | Зарегистр. 01-06-2004 | Отправлено: 16:45 10-08-2007
    Mushroomer



    Platinum Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    SERGE_BLIZNUK
    Цитата:
    выложил "Num2String преобразование числа в текстовое представление"  
    Я правильно понимаю, что эта функция добавляется в шаблон (или в текущий файл)? Мне нужно добиться, чтобы эта функция работала бы в этом файле, если файл передать, например, в другую организацию.

    Всего записей: 22840 | Зарегистр. 19-01-2002 | Отправлено: 11:16 11-08-2007
    SERGE_BLIZNUK

    Silver Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Mushroomer

    Цитата:
    Я правильно понимаю, что эта функция добавляется в шаблон (или в текущий файл)?  
    правильно.
    там есть, например, файлик xls - в нём модуль на VBA - этот файл ни от чего не зависит...

    Всего записей: 2014 | Зарегистр. 12-09-2002 | Отправлено: 17:16 11-08-2007
    CEMEH



    Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Есть лист:
     
    фамилия должность №бригады
    Иванов     мастер       1
    Петров      слесарь     2
    Сидоров   слесарь     2
    Николаев  слесарь     1
    .....
     
    в другом листе надо получить:
     
    "Список слесарей бригады№1:"
    Николаев  
    ....
     
    Никак не соображу...
    ПОИСКПОЗ выдаст только первое совпадение, а мне надо в каждой следующей строке следующее совпадение

    Всего записей: 237 | Зарегистр. 17-09-2006 | Отправлено: 00:43 13-08-2007
    Mushroomer



    Platinum Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    CEMEH
    Возможное начало решения: на первом листе сделай дополнительный столбец. В него слепи должность&бригада.

    Всего записей: 22840 | Зарегистр. 19-01-2002 | Отправлено: 02:10 13-08-2007
    CEMEH



    Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Mushroomer
    Должность&бригада
     
    а дальше? ПОИСКПОЗ найдет первое и единственное совпадение. а мне надо весь лист человек 40-50 в бригаде и бригад (листов) десяток.
    Можно, конечно обойтись ЕСЛИ(должностьбригада=нужная;печатать;"")
    Но тогда надо будет скрывать строки, это тоже не катит....

    Всего записей: 237 | Зарегистр. 17-09-2006 | Отправлено: 19:56 13-08-2007
    Mushroomer



    Platinum Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    CEMEH
    Ну по нему можно сделать автофильтр.
    Цитата:
    Но тогда надо будет скрывать строки, это тоже не катит....
    Если автофильтр не подходит, то тогда задача имхо сводится к написанию макроса.

    Всего записей: 22840 | Зарегистр. 19-01-2002 | Отправлено: 20:15 13-08-2007
    alexVS



    Advanced Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    В скачанном файле Excel посреди листа большая надпись "Страница 1" и страница ограничена синей рамкой. На печать надпись не выводится (и это замечательно).
     
    Что это такое? Как это убрать или самому сделать (если понадобится)?

    Всего записей: 608 | Зарегистр. 16-11-2002 | Отправлено: 16:12 14-08-2007
    SERGE_BLIZNUK

    Silver Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    alexVS
    попробуй меню "Вид" - "Обычный" (похоже у тебя выбран вид "Разметка страницы")

    Всего записей: 2014 | Зарегистр. 12-09-2002 | Отправлено: 17:09 14-08-2007
    ol7ca

    Junior Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Привет, авторитеты! Я в VBA новичок. Подскажите, как в VBA выполнить функцию ВПР или СУММЕСЛИ. т.е. надо найти значение на пересечении конкретных строк и столбцов а затем это значение вставить на пересечении конкретных строк и столбцов в другом файле. спасибо.

    Всего записей: 125 | Зарегистр. 01-02-2007 | Отправлено: 18:57 14-08-2007
    CEMEH



    Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    alexVS

    Цитата:
    посреди листа большая надпись "Страница 1" и страница ограничена синей рамкой. На печать надпись не выводится (и это замечательно).

     
    предварительный просмотр > разметка страницы / обычный режим.
    Очень много возможностей для подготовки документа к печати.
     
    пс
    Я так нумеровал бланки )))
    Было три сотни бланков. В Excel в A1 поставил цифру 1, потом потянул за правый нижний угол на необходимое количество бланков (строк), выбрал "заполнить". Ну а потом в предварительном просмотре разместил с помощью полей одну ячейку в нужное место на листе. Сунул бланки в принтер и ушел курить ))).
     
     
    ппс
    А синию рамку можно двигать мышкой и выбирать то, что нужно печатать. И границу между страницами тож.

    Всего записей: 237 | Зарегистр. 17-09-2006 | Отправлено: 22:59 14-08-2007 | Исправлено: CEMEH, 00:51 15-08-2007
    Mushroomer



    Platinum Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    ol7caс
    Цитата:
    Привет, авторитеты! Я в VBA новичок.
    Становись профи, но только в специальном топике про VBA к Excel

    Всего записей: 22840 | Зарегистр. 19-01-2002 | Отправлено: 23:40 14-08-2007 | Исправлено: Mushroomer, 23:40 14-08-2007
    Soft_deadly



    Junior Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Доброго времени суток!
    у меня тут такая проблемка частенько приходится пользоваться формулой умножить,
    и вожзникает проблемка при попытке умножить значения например: 21х*10st. выпадает ошибка в формуле. Лечится правка, заменить, но так как список бывает длинным и внем добавлены разные буквенние обозначения то это слегка гиморно.
    А нельзя ли решить эту проблему при помощи изменения формата ячейки, тоесть чтобы формула игнорировала все другие символы в ячейке кроме цыфр.

    Заранее спасибо!

    Всего записей: 64 | Зарегистр. 08-05-2005 | Отправлено: 15:10 15-08-2007
    ivas



    Silver Member
    Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
    Soft_deadly
    Цитата:
    чтобы формула игнорировала все другие символы в ячейке кроме цыфр
    Нет, нельзя, необходимо писАть модуль на VBA, который проверит и удалит из ячейки всё, кроме цифр.
    А цыфры встречаются несколько в другом месте (там, где место имения )


    ----------
    "Не видно ни ..." (три буквы, но они у каждого свои)

    Всего записей: 3175 | Зарегистр. 23-11-2004 | Отправлено: 15:37 15-08-2007
    Mushroomer



    Platinum Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    ivas
    Цитата:
    Нет, нельзя
    Нет, можно. Можно пойти обходный путем.
     
    Soft_deadly
    Цитата:
    А нельзя ли решить эту проблему
    Можно решить ее так:
    =ЕСЛИ(ЕОШ(A1*B1);"";A1*B1)
     
    Upd: Я неправильно понял задачу Надо действительно делать на VBA. ivas прав.

    Всего записей: 22840 | Зарегистр. 19-01-2002 | Отправлено: 17:37 15-08-2007 | Исправлено: Mushroomer, 17:39 15-08-2007
    Soft_deadly



    Junior Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору


    Цитата:
    Можно решить ее так:  
    =ЕСЛИ(ЕОШ(A1*B1);"";A1*B1)  

    Это неработает, из ячейки удаляются все значения
    А с VBA боюсь не справлюсь.

    Всего записей: 64 | Зарегистр. 08-05-2005 | Отправлено: 18:57 15-08-2007
    alt76



    BANNED
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    vasiliy74
    Цитата:
    Цитата:ДайПодстроку  
     
    слушай поставил я эту функцию и у меня Excel стал ресурсов есть намного больше с чем это может быть связанно?  

     
    Я(alt76):
    Цитата:
     
    Excel вывывает перерасчет всех ячеек с этой функцией при изменениях в структуре листа - удаление/вставка строк/столбцов и при изменениях в модулях VBA  
     
    если найду как с этим боротся - отпишусь

    нашел отписываюсь:
     
    надо изменить код функции на следующий:

    Код:
     
    Public Function ДайПодстроку(Ячейка As Range, НомерПодстроки As Long, Optional Разделитель As String = "_") As String
     
    On Error GoTo Err
     
        ДайПодстроку = ""
        Строка = Ячейка.Value & Разделитель
         
        For НомерТекущегоРазделителя = 1 To НомерПодстроки
         
            НайденаяПозиция = InStr(1, Строка, Разделитель)
            ДайПодстроку = Left(Строка, НайденаяПозиция - 1)
            Строка = Mid(Строка, НайденаяПозиция + Len(Разделитель))
             
        Next
             
    Exit Function
    Err:
        ДайПодстроку = ""
     
    End Function
     

    И никаких тормозов
     
    Добавлено:
    если код модуля формулы неправить - что и понятно. Иначе все ячейки с этой формулой будут перерасчитаны.

    Всего записей: 1260 | Зарегистр. 03-04-2003 | Отправлено: 19:18 15-08-2007 | Исправлено: alt76, 19:22 15-08-2007
       

    Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101

    Компьютерный форум Ru.Board » Компьютеры » Программы » Microsoft Excel FAQ (часть 3)
    Widok (29-08-2008 13:12): лимит страниц. продолжаем здесь


    Реклама на форуме Ru.Board.

    Powered by Ikonboard "v2.1.7b" © 2000 Ikonboard.com
    Modified by Ru.B0ard
    © Ru.B0ard 2000-2024

    BitCoin: 1NGG1chHtUvrtEqjeerQCKDMUi6S6CG4iC

    Рейтинг.ru