Защо макросът не работи?

Здравейте Валентина, Нека най-напред да уточня дали съм разбрала правилно логиката на програмата. Програмата трябва да изтрие съдържанието на даден диапазон (обект Range). За тази цел с променливата last_row определяте последния ред. След това за всяка клетка (rng) изтривате съдържанието. Според мен е излишно да се избира клетката (Select), а след това да се изтрива. Достатъчно е обектът да се дефинира правилно и след това да се зададе команда (method). Блок-операторът With ... End With също не е необходимо да се повтаря. Ето моето предложение: Sub Delete_Content_New() Dim sht As Worksheet Dim rng As Range Dim last_row As Long Dim i, j For Each sht In ActiveWorkbook.Worksheets sht.Activate i = 2 j = 4 last_row = Range("A1048576").End(xlUp).Row For Each rng In Range(Cells(i, j), Cells(last_row, j)).Cells rng.ClearContents rng.Offset(0, 2).ClearContents Next rng End Sub Надявам се, да свърши работа. Ако имате още въпроси, пишете ми.

Може ли да задам команда, с която да изтривам съдържанието в скритите листи? Създал съм макрос, с който в зависимост от стойност в клетка в лист1, скривам други пет листа и показвам шести.

Данните от скритите листове могат да се изтрият и без да се показват (Unhide) като използвате характеристиката (property) Visible=False на обекта Worksheet. В примера използвам променлива wks за обекта Worksheet: If wks.Visible = False Then wks.Cells.ClearContents. За wks.Visible може да се изберат и константите: wks.Visible = xlSheetHidden wks.Visible = xlSheetVeryHidden wks.Visible = xlSheetVisible Ако имате още въпроси, пишете.

Как да използваме библиотеките

Здравейте, Гергана. Библиотеките (Libraries) имат много полезна информация за синтаксиса на елементите във VBA. Още един полезен инструмент е F1 за допълнителна помощна информация, в модул 3 показвам как се използват. Когато се получава грешка в синтаксиса, най-лесният начин е да се запише макрос. Генерираният код с Macro Recorder винаги е точен, помага да се види коректния синтаксис. Във Вашия случай препоръчвам да запишете макрос, с който избирате желания формат. Ако имате още въпроси, пишете.

Защо въвеждане някои променливи с "as", а други само с името им?

Когато променливата се декларира с оператор Dim без да се посочи какъв тип данни съхранява (с оператор As), по подразбиране компилаторът приема тип Variant, т.е. може да съхранява текст и числа. Това ще стане чсно в следващия урок, но както разбирам от въпросите Вие веше сте го изгледали.

Защо макросът не работи - използвала съм 1:1 предложението на г-жа Вълкова?

Здравейте, Детелина, грешката "Compile error: For without Next" означава, че в кода на Вашия макрос има цикъл For без съответното затварящо Next. Всеки For трябва да бъде затворен с Next в края, за да указва къде да спре цикъла. За да решите проблема, моля, опитай да преминете тези стъпки: 1. Отворете макроса, който сте създали. 2. Прегледайте кода и намерете къде се използва цикъл For. 3. Уверете се, че всеки от циклите For е правилно затворен с Next. Приема се за добра практика да се включва и брояча след Next (например Next counter), но това не е задължително. 4. Ако някой от циклите For няма Next, добавете го. 5. След като сте уверени, че всеки цикъл For е правилно затворен, тествайте отново макроса. Моля, имайте предвид, че при вложени цикли For, всеки Next трябва да съответства на съответния For. В противен случай, може да се получи объркване при изпълнението на кода.

Безплатно! Онлайн събитие: AI за 10x продуктивност Регистрация тук.

Как да създаваме променливи (Variables) ?

Пълен достъп до курса: Не

За пълен достъп или безплатна проба (2 модула), моля влезте или се регистрирайте.

Предишен Следващ

VBA за Excel В курса ще се научите как да автоматизирате и оптимизирате вашите задачи в Excel чрез програмиране с Visual Basic for Applications (VBA). Този специализиран курс е подходящ за напреднали и ще ви даде възможност да създавате персонализирани макроси, функции и процедури, които ще ускорят работата ви и ще ви позволят да решавате сложни аналитични предизвикателства.