Не успявам да направя автоматичното генериране на презентацията
Здравейте,
След като поставя VBA кода в празния прозорец на PowerPoint и стартирам скрипта с Run ми излиза този прозорец и не се генерира презентацията. Ползвам MS Office 2019.
Здравейте, Атанас,
Грешката, която получавате – Compile error: Expected End Sub, показва, че Visual Basic очаква затварящ ред End Sub за основната процедура Sub Generate_AI_Customer_Service_Presentation().
Как да решите проблема стъпка по стъпка:
- Превъртете надолу Вашия VBA код до самия край.
- Ще видите, че функцията
AddSlideе коректно затворена сEnd Function, но самата макрос процедураGenerate_AI_Customer_Service_Presentation()няма затварящ редEnd Sub. - След последния ред на кода (след
idx = idx + 1), добавете нов ред със следното:
End Sub
Така би трябвало кодът да се компилира без проблем.
Допълнителен съвет:
Уверете се, че всяка функция и подпрограма, която започва с Sub или Function, има съответстващ край – End Sub или End Function. Това е основно правило във VBA.
След това опитайте отново да пуснете макроса с Run.
Поздравления, че работите по частта с презентациите в модула – това упражнение е чудесен начин да разв
Много благодаря за бързия отговор!
1. На края на VBA кода има написан от CHATGPT END Sub, така че според мен има затварящ ред.
2. В кода от CHATGPT тази част idx = idx + 1 се намира само на две места, като след първото място пише End Function. Написах след втората част End Sub, натиснах Run, но получавам същото съобщение.
