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

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

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

Widok (01-04-2006 15:33): лимит страниц. переезжаем сюда.  Версия для печати • ПодписатьсяДобавить в закладки
Страницы: 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

   

ymy



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

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

 
  • Смена представления имен столбцов с буквенного на цифровое и обратно
  • Надстройки "Сумма прописью"
     
    Тема Excel VBA в разделе Прикладное программирование
     
     


    Вот такой вопрос у меня, помогите хто может: Как в Exсel-e ограничить число строк и колонок отображаемых на листе, точно можно, сам видел, но как?, в непонятках.

  • Всего записей: 1339 | Зарегистр. 22-04-2002 | Отправлено: 17:00 17-09-2002 | Исправлено: Maz, 22:44 24-02-2017
    nofate



    Junior Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    ssi
    Похоже, вставку надо делать через "Специальная вставка" и там не вставлять как лист эксель, документ ворд и т.п.
     
    Я так думаю...

    Всего записей: 66 | Зарегистр. 09-12-2001 | Отправлено: 11:32 29-04-2005
    OdesitVadim



    Advanced Member
    Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
    ivas
    ну так, помигивает диск время от времени, но думаю это не эксель.

    Цитата:
    А какой реальный объём файла?

    Я понимаю, если с нуля набрать? не более 100кб

    ----------
    Press any key to continue or any other key to exit
    Пишите так, чтобы не было стыдно за нобелевскую премию.

    Всего записей: 1568 | Зарегистр. 19-09-2003 | Отправлено: 12:08 29-04-2005
    icywind



    Junior Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    ssi
    У меня с вордом похожая проблема была: я тогда курсач писал, и много раз его редактировал. Постепенно файл распух до нескольких метров. Тогда я просто создал новый файл и тупо скопировал в него всю инфу через буфер. Размер нового файла сразу уменьшился до 500 килов.

    Всего записей: 95 | Зарегистр. 26-10-2004 | Отправлено: 12:19 29-04-2005
    vetal555

    Newbie
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Может кто-нибудь знает как добавить кнопку в окно останова которое выскакивает при неправильно введённом значении в ячейку (данные-проверка), через VB?. Либо перехватить это сообщение и назначить своё.

    Всего записей: 12 | Зарегистр. 21-03-2005 | Отправлено: 15:06 29-04-2005
    toNk



    Member
    Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
    Господа, подскажите решение.
    Пишу макрос, в котором нужно выделить весь столбец. Кто знаком с макросами знает, что эта сволочь в дальнейшем будет выделять только тот диапазон ячеек, который был выделен при записи, что меня напрочь не устраивает, т.к. диапазон этот бывает разным. Как вариант, можно просто выделить ячейки с запасом, но это не всегда подходит.
    Собственно вопрос: как выделить ячейки, скажем со 2-й и по последнюю (под последней понимается та, после которой нет никаких данных в ячейке).

    Всего записей: 205 | Зарегистр. 08-04-2003 | Отправлено: 11:26 01-05-2005
    ivas



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

    Цитата:
    весь столбец.
     
    Sub Col()
        Columns("C:C").Select
    End Sub

    или всё таки до последнего заполненого значения?
    Тогда цикл типа такого:

    Sub Num()
    Dim row As Integer, n As Integer
        row = Application.CountA(Sheets("Base").Columns(1))
        Лист1.Cells(2, 1).Value = 1
        For n = 2 To row
            .....
        Next
                n = n + 1
    End Sub

     

    Всего записей: 3175 | Зарегистр. 23-11-2004 | Отправлено: 19:43 01-05-2005
    toNk



    Member
    Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
    ivas
    А можно че-нить наподобие 1-го варианта, только не весь столбец, а со 2-й ячейки и до конца - такой вариант тоже устроит.
    А то во втором примере я нифига не понял - не шарю я в VB...

    Всего записей: 205 | Зарегистр. 08-04-2003 | Отправлено: 20:35 01-05-2005
    uhty

    Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Как в Excel последовательно пронумеровать ячейки в столбце без нумерации скрытых?
    Если протягивать маркером автозаполнения, то скрытые ячейки тоже учитываются.
    Надоть макрос писать... Но как передвинуть в макросе select на одну ячейку вниз, пропуская скрытые?  

    Всего записей: 207 | Зарегистр. 07-12-2002 | Отправлено: 05:42 02-05-2005
    ivas



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

    Цитата:
    не весь столбец, а со 2-й ячейки и до конца

    До конца - понятие относительное...  
    Вместо Columns("C:C").Select  ставишь Range("C2:C65000").Select

    Всего записей: 3175 | Зарегистр. 23-11-2004 | Отправлено: 10:49 02-05-2005
    toNk



    Member
    Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
    ivas
    Понял. Тогда давай вернемся к сложному варианту.
    Можешь чуть подробней объяснить что есть что в этом фрагменте:

    Цитата:
    Dim row As Integer, n As Integer  
        row = Application.CountA(Sheets("Base").Columns(1))  
        Лист1.Cells(2, 1).Value = 1  
        For n = 2 To row  
            .....  
        Next  
                n = n + 1  

    А то он у меня так и не заработал...

    Всего записей: 205 | Зарегистр. 08-04-2003 | Отправлено: 12:04 02-05-2005 | Исправлено: toNk, 15:58 02-05-2005
    Troitsky



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

    Цитата:
    как выделить ячейки, скажем со 2-й и по последнюю (под последней понимается та, после которой нет никаких данных в ячейке)

    А если так?

    Код:
    ActiveSheet.Range(Cells(2, 3), Cells(ActiveSheet.UsedRange.Row + ActiveSheet.UsedRange.Rows.Count - 1, 3)).Select

    (применительно к третьему столбцу)

    Всего записей: 795 | Зарегистр. 13-12-2003 | Отправлено: 13:30 02-05-2005
    toNk



    Member
    Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
    Troitsky
    Спасибо огромное!!! Именно то, что нужно!!!

    Всего записей: 205 | Зарегистр. 08-04-2003 | Отправлено: 16:05 02-05-2005
    vworld



    Silver Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Жду подсказки...проблема такая....есть файл прайса в нем несколько столбоцов и примерно 3000 строк, так вот надо перенести содержимое таблицы в другой проект, но в другом формате, т.е.нарушится последовательность столбоцов и т.д.
    Понимаю, что конечно же было бы лучше показать форматы обоих файлов, но думаю вдруг что нить и без этого подскажете?
    И еще вопрос, операцию перевода из одного в другой приходится иногда производить, так вот можно ли сделать так, чтобы менялось только то, чего нет, т.е. добавлялось новое, а имеющиеся исправлялось на новое....уфф....сам уже запутался что хотел объяснить
    Если кто может помочь, то могу форматы обоих файлов выслать...

    Всего записей: 2617 | Зарегистр. 13-02-2003 | Отправлено: 21:32 09-05-2005
    ivas



    Silver Member
    Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
    Можно сделать ссылку на исходную книгу, тогда при открытии второй книги будут автоматически обновляться данные.
    Сархивируй и выложи где-нибудь.

    Всего записей: 3175 | Зарегистр. 23-11-2004 | Отправлено: 10:45 10-05-2005
    bredonosec



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

    Цитата:
    Можно сделать ссылку на исходную книгу, тогда при открытии второй книги будут автоматически обновляться данные.  
    - Угу, вставить "= док такой-то, лист такой-то ячейка нумер такая-то". И растягивать диапазоны по строкам или столбцам (не забыв указать, какие координаты считать абсолютными, а какие - относительными (изменяющимися в зависимости от местонахождения ячейки-получателя))

    Всего записей: 16257 | Зарегистр. 13-02-2003 | Отправлено: 02:52 11-05-2005
    uhty

    Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    uhty
    Ответ про нумерацию ячеек пропуская скрытые. Вот такой удобный макросик в конфе iXBT написали:
     
    Public Sub NumNoHid()
    i = ActiveCell.Value
    For Each icell In Selection
        If icell.Rows.Hidden = False Then
            icell.Value = i
            i = i + 1
        End If
    Next
    End Sub
     
    Нумерует выделенный диапазон (в строке или столбце) пропуская скрытые. В первой ячейке нужно руками написать начальную цифру. Если ничего не написать, то начнет нумеровать с 1 со следующей ячейки.

    Всего записей: 207 | Зарегистр. 07-12-2002 | Отправлено: 14:17 11-05-2005
    Solenaja



    Silver Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    как всё же решать кубические уравнения в Excel
    VB не предлагать.

    ----------
    Могу помочь, но только своими знаниями и ...

    Всего записей: 4246 | Зарегистр. 02-09-2001 | Отправлено: 15:03 11-05-2005
    uhty

    Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Еще про нумерацию видимых подсказали в конфе iXBT.
    еще короче...
     
    Selection.SpecialCells(xlCellTypeVisible).Select
    Selection.DataSeries Rowcol:=xlColumns, Type:=xlLinear, Date:=xlDay, _
            Step:=1, Trend:=False
     
    Правда тот недостаток, что для строки нужон другой макрос.
    А проще всего без макроса вручную правка-перейти-выделить-только видимые-правка-заполнить-прогрессия-по столбцам. Не так часто ето надо.

    Всего записей: 207 | Зарегистр. 07-12-2002 | Отправлено: 15:31 12-05-2005
    vworld



    Silver Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    ivas
    bredonosec
    Можно мне более разжевано рассказать?
    Я в свою очередь тоже объясню...есть прайс и есть определенный формат завода данных на сайт, так вот и нужно подвести обычный прайс в нужный формат

    Всего записей: 2617 | Зарегистр. 13-02-2003 | Отправлено: 10:03 13-05-2005
    ivas



    Silver Member
    Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
    vworld
    Про сайт не было сказано ни слова. Пробовал сохранить лист как веб-страницу?

    Всего записей: 3175 | Зарегистр. 23-11-2004 | Отправлено: 22:22 13-05-2005
       

    Страницы: 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

    Компьютерный форум Ru.Board » Компьютеры » Программы » Microsoft Excel FAQ (Часть 1)
    Widok (01-04-2006 15:33): лимит страниц. переезжаем сюда.


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

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

    BitCoin: 1NGG1chHtUvrtEqjeerQCKDMUi6S6CG4iC

    Рейтинг.ru