Обект Worksheet и обект Sheet - най-често използвани команди (methods)

Безплатни 20 урока
регистрирай се и научи

Ако сте вече потребител - Регистриран съм
Видео

Тест за преминаване към следващия урок

 
Характеристиката (property) DisplayAllerts е характеристика на:
Application
ActiveWorkbook
ActiveSheet
 
За да добавим 2 или повече нови листа, използваме команда Add с аргументи
Count
Before или After
Команда Add добавя само един нов лист
 
С команда (method) Add се добавя нов лист само пред ActiveSheet
Твърдението Не е вярно
Твърдението е вярно
 
Команда Move без аргумент премества автоматично листа в нов екселски файл
Твърдението е вярно
Твърдението НЕ е вярно

Въпроси и отговори

  • Защо дава грешка

    Cvetelina Raykova:

    Здравейте,

    Тренирам преместването на листове,но ми дава грешка "Compile error : expected function or variable" за (Sheets.Count) при положение, че редът от инструкцията за преместване ми е същия като във урока. Къде греша?

    Public Sub Sheets()

    ActiveWorkbook.Sheets.Add Before:=Worksheets(1) Worksheets(1).Name = "Събота" Sheets("Събота").Move After:=Sheets(Sheets.Count)

    End Sub

    Cvetelina Raykova:

    Разбрах какъв е проблема. Във файла има само worksheets, няма sheets и затова дава грешка на "Sheets".

  • Как да сменя настройките на език, за да виждам коментарите във VBA?

    Валентина :

    Здравейте, как да сменя локалните настройки на лаптопа, за да разчита кирилицата в коментарите на VBA ( Alt + F11) и в същото време езика на компютъра да си остане английски? Аз съм с Уиндоус 7. Благодаря предварително

    Краси Кръстев:

    Здравейте, Валентина.

    Ето тези теми от форума са по отношение на това какви точно настройки на Windows 7 трябва да направите за да не излиза кирилицата като "шльоковица"

    Как да оправя надписите на кирилица в отворен автоматично .csv файл?

    Как да оправя кирилицата в отворен с Notepad текстов файл?

    Деница Григорова:

    Здравейте, имам същия въпрос - може ли да покажете как да настроим само VBA да чете кирилицата без да се налага да променяме настройките на Уиндоус изцяло. Английският език трябва да остане основен, а българският - допълнителен. И аз съм с уиндоус 7.

    Димитринка Вълкова:

    Опитайте с една частична промяна в Windows 7. От Control Panel, изберете групата Region and Language.

    В таба Format - English(Unated States)

    За да се чете българския език в Редактора на VBA, в двата таба Location and Administrative трябва да се избере Bulgaria, Bulgarian:

    Надявам се това да помогне!

    Деница Григорова:

    благодаря, ще опитам

  • Мога ли да попитам, защо кодовете за оцветяване на клетките се различават?

    Даниела Йорданова:

    Здравейте, бих искала да разбера от къде идва разликата в оцветяването на клетките между урока и моя компютър. В посочения пример " ... rng_cell.Interior.Color = 43 .... " използвате код 43 за оцветяване на клетките със определена стойност, който код при вас изглежда приятно зелено. Когато аз използвам същия код, клетките ми се оцветяват в доста неприятен тъмен цвят. От къде идва тази разлика? Windows, настройка на Windows или от версията на Excel....?

    Димитринка Вълкова:

    Разликата според мен идва от графичната резолюция на монитора.

  • Каква е разликата между двата реда?

    Viacornewadd:

    Не разбирам тези два реда:

    'изтрива лист с номер 10 от колекцията Worksheets Worksheets(10).Delete

    'изтрива лист с номер 10 от колекцията Sheets Sheets(10).Delete

    Димитринка Вълкова:

    Обърнете внимание, Worksheets и Sheets са две различни колекции. Worksheets включва само екселските листове, a Sheets - екселските листове и листовете диаграми, Charts. Препоръчвам да изгледате още веднъж видеото.

  • С кой метод да именовам новия Sheet?

    Viana Conrad:

    Искам да добавя нов sheet след последния, до тук добре. Но искам да ме пита как да се казва новия sheet?

    Димитринка Вълкова:

    Това става с функцията InputBox, която разглеждам в следващите уроци. За сега малко търпение.

  • Как да копирам само част от таблицата от Sheets ("Лист1") в нов Workbook?

    Виолета Николова:

    Здравейте! Мислех си, че сама мога да стигна до отговора, но започнах да се заплитам - може ли малко помощ?

    Виолета Николова:

    Успях!!! Все пак ми е интересно дали имате и други предложения :)

    Димитринка Вълкова:

    Здравейте, Виолета. Чудесно е, че сама сте намерила решение. Достатъчно е да дефинирате диапазона (обект Range), който трябва да се копира в нов файл и за него да се изпълни команда Copy. Предполагам, че това е и Вашето решение. Пишете, ако имате въпроси.