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

НовостиФайловые архивы
ПоискАктивные темыТоп лист
ПравилаКто в 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
    namchik



    Silver Member
    Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
    Народ, мне в свое время подсказали макрос для добавления пустых строк через одну:
    Код:
     Sub InsEmptyLines()
        Dim RowNum As Long
        For RowNum = 1 To 20
           If (RowNum Mod 2) = 0 Then
              Rows(RowNum).EntireRow.Insert
           End If
        Next
    End Sub

     
    Можно ли сделать подобное, только для удаления строк через одну

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

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

    Цитата:
    Можно ли сделать подобное, только для удаления строк через одну  

    Дык, абсолютно не проблема:
    Код:
     
    Sub DelSecondLines()
      Dim RowNum As Long
      For RowNum = 20 To 1 Step -1
           If (RowNum Mod 2) = 0 Then
              Rows(RowNum).EntireRow.Delete
           End If
        Next
    End Sub
     

    но будьте осторожны - макрос тупо удаляет строчки через одну (20, 18, 16 ... 2 ) НИЧЕГО при этом не проверяя! Т.е. можете легко потерять данные! И ещё, перед выполнением макроса лучше сохраниться - т.к. действия макроса в Excel откатить  НЕЛЬЗЯ.
     
    удачи.
     
     
    Добавлено:
    AfftoriTet

    Цитата:
    сделать файл обрабатуюший всю информацию

    Шутка? И как он должен её "обрабатать" ? Посчитать количество записей? ;-))
    Или подсчитать сумму цифровых полей... Больше конкретики...
     

    Цитата:
    Как можно сделать так что-бы данные вводить в одно ячейку, но они добавлялись в другом листе, одна после другой. На примере обясню: Есть Фамилии, их буду вводить только в одной ячейке, но надо што-бы тогда когда добавляю другое имя, она бы в другом листе добовлялоси в списке

    Это можно сделать либо через очень хитрые формулы, либо через макрос на VBA.

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



    Silver Member
    Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
    SERGE_BLIZNUK
    Спасибо. Опять выручили меня
     
    Этот макрос, насколько я понял, удаляет только четные строки
     
    Методом тыка (т.к. в VBA не совсем шарю) подобрал то же самое, только для нечетных строк:
     

    Код:
    Sub DelSecondLines()
      Dim RowNum As Long
      For RowNum = 20 To 1 Step -1
           If (RowNum Mod 2) = 1 Then
              Rows(RowNum).EntireRow.Delete
           End If
        Next
    End Sub
     

    Всего записей: 4080 | Зарегистр. 01-06-2004 | Отправлено: 07:57 04-09-2007
    Markes



    Advanced Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Подскажите, какой максимальный адекватный размер файла Excel (2003 Sp2)? Компьютер: Celeron около 2Ghz, 768Mb оперативки. Открыт документ на 33Mb, а второй на 18Mb вообще не открывает. По Диспетчеру задач ресурсов предостаточно.
     
    Может быть есть варианты какой-либо оптимизации?
     
    Скриншот:

    Всего записей: 1403 | Зарегистр. 13-09-2004 | Отправлено: 11:58 04-09-2007 | Исправлено: Markes, 12:39 04-09-2007
    ZORRO2005



    Member
    Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
    Друзья,
    Вот пример:
    http://slil.ru/24813998
    Из одной бухгалтерской программы данные выгружаются в таком формате(столбец B).
    Их нужно превратить в значения,чтобы суммировать(столбец С).Есть еще несколько вариантов чтобы их суммировать.(столбцы G,H,I).
    Но я  использую не просто CУММ а ПРОМЕЖУТОЧНЫЕ.ИТОГИ (это мне нужно для фильтрации).
    Подскажите, как сделать ПРОМЕЖУТОЧНЫЕ.ИТОГИ без вставки дополнительного столбца.
    =ПРОМЕЖУТОЧНЫЕ.ИТОГИ(9;значен(B5:B18))-не проходит
    {=ПРОМЕЖУТОЧНЫЕ.ИТОГИ(9;значен(B5:B18))}-не проходит
    Использовал именннованые диапазоны-тоже не получилось
     

    Всего записей: 342 | Зарегистр. 08-10-2005 | Отправлено: 15:46 04-09-2007 | Исправлено: ZORRO2005, 15:46 04-09-2007
    Larix

    Newbie
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Мужики, помогите, может, кто сталкивался и знает решение этого вопроса!!!
     
    Суть: есть такая чудная формула ОКРУГЛ, суть который сводится к округлению до указанного знакак. Синатксис (нужный мне вариант):  
     
    Округл(число*число*число;до какого знака округлять)
     
    Суть: мне необходимо, что бы табличные данные с Экселя корректно испортировались в базу данных Эксес - в Эксесе использутся, как я понимаю (на 100% не знаю, не моя программа) ROUND. НО. При конвертации из базы в экселе (в табличной форме) в тазу Эксесс - Эксесс ПЕРЕСЧИТЫВАЕТ строки и получается разница, мать ее за ногу! Формула вроде бы одна, а вот результаты.... а вот результаты смотрите на фотке:  
    http://img125.imageshack.us/img125/5518/untitled1zx7.jpg
    Версия Эксес и Эксель - 2002 (10.2701.2625)

    Всего записей: 5 | Зарегистр. 06-08-2007 | Отправлено: 18:52 04-09-2007
    SERGE_BLIZNUK

    Silver Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Larix
    попробуйте перед экспортом выделить все ячейки с формулой "ОКРУГЛ" - и используя Специальную вставку - вставьте вместо формул значения.

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

    Junior Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Может кто-то подскажет, как найти сумму конкретных слагаемых из ряда чисел? Пример: имеем столбец с числами: 1,2,3,4,5 а нам надо найти числа которые дают в сумме 12. Возможно ли получить ответ с вероятными комбинациями: 3+4+5, 1+2+4+5, и так далее?
     
    Подскажите еще, как полученное значение “#N/A” заменить на ноль или пусто?
     
    И еще вопрос,
    Есть ли функция, которая работает как подбор параметра?  
    Нужно просто получать результаты без дополнительных манипуляций.

    Всего записей: 125 | Зарегистр. 01-02-2007 | Отправлено: 23:52 04-09-2007 | Исправлено: ol7ca, 00:40 05-09-2007
    SERGE_BLIZNUK

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

    Цитата:
    1,2,3,4,5 а нам надо найти числа которые дают в сумме 12. Возможно ли получить ответ с вероятными комбинациями: 3+4+5, 1+2+4+5, и так далее

    очень-очень-очень сильно сомневаюсь... Дело в том, что сложность этой задачи что то порядка n! (n факториал) - где n - число разных значений. и задача решается исключительно перебором. я когда-то делал подобное на Delphi (ну, чуть-чуть сложнее - искал максимально близкое к заданному числу), так при n=12 - вычислялось уже несколько минут - несложно посчитать - для n=13 будет в 13 раз дольше - т.е. ~ час, для n=14 - 14 часов и т.д....  
     

    Цитата:
    Подскажите еще, как полученное значение “#N/A” заменить на ноль или пусто?

    =ЕСЛИ(ЕНД(ячейка);"";ячейка)
     

    Цитата:
    Есть ли функция, которая работает как подбор параметра?  
    Нужно просто получать результаты без дополнительных манипуляций

    попробуйте через запись действий. Сервис - Макросы - Начать запись...
    выполнить один раз манипуляции.... Остановить запись.
    Потом вызывать при необходимости...
    впрочем, если нужно, чтобы само пересчитывалось - тогда можно повесить макрос на Worksheet_SelectionChange...

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

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

    Цитата:
    впрочем, если нужно, чтобы само пересчитывалось - тогда можно повесить макрос на Worksheet_SelectionChange...  

     
    как это сделать?
     
     

    Всего записей: 125 | Зарегистр. 01-02-2007 | Отправлено: 17:23 05-09-2007 | Исправлено: ol7ca, 21:20 05-09-2007
    Vitus_Bering



    Advanced Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Друзья, посоветуйте как удобнее заполнять таблицу с большим количеством столбцов. Перемещаться по столбцам не удобно.

    Всего записей: 936 | Зарегистр. 30-09-2005 | Отправлено: 11:14 06-09-2007
    arkasha81

    Junior Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Vitus_Bering
     
    ...Уточните, в чем неудобство? TAB вам не помогает?
     
    Чем заполняете-то? Если ничего особенного (текст, число), то можно создать текстовый файл, в котором ваши столбцы будут отделены каким-либо символом, и открыть файл в Excel с нужными опциями...

    Всего записей: 175 | Зарегистр. 17-06-2005 | Отправлено: 11:54 06-09-2007
    Vitus_Bering



    Advanced Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    arkasha81
    Вот такая таблица должна быть заполнена.
       
    Наименований товаров около 80.
    Магазинов около 2000.
     
     

    Всего записей: 936 | Зарегистр. 30-09-2005 | Отправлено: 12:12 06-09-2007 | Исправлено: Vitus_Bering, 12:14 06-09-2007
    vasiliy74



    Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    привет как написать условия чтобы при #ЗНАЧ! или #Н/Д! данные брались из другой ячейки? Пробую через ЕСЛИ, не немогу понять как писать условия сравнения?  
    Например:
    =ЕСЛИ(K28="#ЗНАЧ!";1;0) условие не проверяется результат просто #ЗНАЧ!

    Всего записей: 289 | Зарегистр. 21-02-2006 | Отправлено: 12:42 06-09-2007 | Исправлено: vasiliy74, 14:54 06-09-2007
    arkasha81

    Junior Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Vitus_Bering
     
    Ладно, подробнее...
    Создаете текстовый файл следующего содержания:
    есть*2700*-*нет*-*-*есть*1589*б/у*...... строка для первого магазина
    нет*-*-*есть*500*full*есть*100*-*...... строка для второго магазина
    и т.д.
     
    звездочку при этом можно заменить на любой другой символ...
    если нужна пустая ячейка, то просто ставите **
     
    Затем открываете этот файл в Excel, выбираете формат с разделителями, выбираете в качестве разделителя * (или другой символ, который вы использовали при создании файла), выбираете формат данных столбца. После открытия просто копируете получившиеся ячейки в вашу таблицу...
     

    Всего записей: 175 | Зарегистр. 17-06-2005 | Отправлено: 15:30 06-09-2007 | Исправлено: arkasha81, 15:31 06-09-2007
    robinLib

    Junior Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    ВОПРОС
    Здравствуйте!
    Вот такой вопрос: делаем программу на ехселе. Как любой творческий процесс - разработка программы сопровождается непрерывными изменениямм по дизайну формулам и.т.п.
     
    Знаю что не все программы корректно работают в случае большого числа изменений: т.е. после достаточно большого числа изменений они зачастую начинают притормаживать - но не все система удаляет. Как остот дела с excel-ем стоит ли мне после отладки программного кода переписывать то что мы сделем в новый чистый файл или можно отлаживать в рабочем?

    Всего записей: 138 | Зарегистр. 24-07-2005 | Отправлено: 16:49 06-09-2007
    Dmitriy_Kolesnikov

    Member
    Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
    На разных компьютерах под XP SP2 и 2003 R2 установлены MS Office версий 2003 и 2007.
     
    При открытии некоторых файлов и попытке скопировать в буфер обмена лист целиком появляется диалоговое окно с сообщением:
    Недостаточно ресурсов. Выберите меньше данных или закройте другие приложения
    При этом лист в буфер копируется.
     
    Системных ресурсов - хоть анусом кушай (на сервере с W2003, например, в момент копирования свободно 2,5 Гб ОЗУ и пара-тройка процессоров совсем не используется, на остальных компах тоже всего ватает).
     
    Вопросы:
    что это такое,
    как лечится?
     
    P. S. Юзеры говорят, что на WinXP SP1 + Office XP такого не было...
     
    Спасибо.

    ----------
    ===
    WBR, Dmitriy Kolesnikov.

    Всего записей: 268 | Зарегистр. 12-12-2004 | Отправлено: 18:04 06-09-2007
    w25

    Junior Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    vasiliy74
    Используй функцию ЕОШИБКА для проверки на наличие ошибок

    Всего записей: 175 | Зарегистр. 22-07-2005 | Отправлено: 18:36 06-09-2007 | Исправлено: w25, 18:36 06-09-2007
    ol7ca

    Junior Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    vasiliy74
     
    как полученное значение (#N/A, #VALUE!, #REF!, #DIV/0!, #NUM!, #NAME?, or #NULL!).
    заменить на ноль или пусто?  
    Я пользуюсь этим: =IF(ISERROR(ячейка),"",( ячейка))

    Всего записей: 125 | Зарегистр. 01-02-2007 | Отправлено: 18:47 06-09-2007 | Исправлено: ol7ca, 18:50 06-09-2007
    vinum



    Newbie
    Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
    Вопрос:
    через данные/проверка данных/список/
    можно создать выпадающий список, как можно создать по аналогии или другими средствами выпадающий календарь?

    Всего записей: 9 | Зарегистр. 28-09-2006 | Отправлено: 16:58 07-09-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