АБОНАТ
Abakalov
Присъединил се: декември 2017
Постоянство бета
0
Аула точки
9630
Постижения
40
Изгледани уроци
456
Харесани отговора
5
Общо отговора
2
Въпроса
0
Последвани
2
Интереси
Microsoft Excel
Електронни таблици
Microsoft 365
Excel VBA
Програмиране
VBA за Excel
Микроинвест Делта про
Потвърдени умения
от харесани отговори разделени по софтуер
5
Microsoft Excel
Записани курсове
Завършени обучения
PDF удостоверения могат да се се свалят от лични настройки и документи.
Постижения
В АУЛА винаги се стремим да подобрим начина на обучение и поради това въведохме точкова система с постижения.
Принципът на работа е съвсем прост - за определено действие в АУЛА (като преминати уроци, преминат тест,
отговор на въпрос от друг колега) се получават точки и постижения. Така ще възнаграждаваме хората, които
регулярно гледат уроците и помагат на другите в сайта.
Научихте десет урока!
Научихте пет урока!
Записани осем курса!
Записани седем курса!
Записани шест курса!
Записани пет курса!
Записани четири курса!
Записани три курса!
Добра екипна работа
Благодарност
Богатството на образованието
Непрекъснато израстване
Образованието е ключът
Инвестиция в знания
Обучение под пара :)
Добро утро!
Записан втори курс!
Пет влизания за една седмица!
Потенциал!
Продължаваме напред
Най-мощното оръжие
Здрав напредък
Добро начало
Който дава живот на ума и знанието, той не умира
Връзка с Facebook
Профил със снимка
Стабилен напредък
Доказани знания
Напредък
Първи стъпки
Който се учи, той ще сполучи
Имейл новини. Ниво 3
Имейл новини. Ниво 2
Три влизания за една седмица
Имейл новини. Ниво 1
Напред, напред, напред
Последни форум дискусии
Ето линк към екселски файл с който може да си изчислите
изминалото време, кода съм го писал на VBA, но може да се ползва
и за групи от хора:
https://infosoftbg.com/programs/Timer_2016_b1.zip
Предлагам Ви следния макрос за запис на диаграми в изображения в текущата директория където се намира Екселския файл.
Моля вградете си кода в макросите
като отделен модул,
тестван е и работи коректно.
Как автоматично да конвертирате диаграми в работни таблици на Excel в различни формати на изображения с VBA.
Ето пълния код на VBA:
Sub ExportCharts()
Dim sht As Worksheet
Dim cht As ChartObject
Dim i As Integer
i = 1
Application.ScreenUpdating = False
Application.EnableEvents = False
Set sht = ActiveSheet
For Each sht In ActiveWorkbook.Worksheets
For Each cht In sht.ChartObjects
cht.Activate
ActiveChart.Export ActiveWorkbook.Path & "\" & sht.Name & "-" & i & ".gif"
i = i + 1
Next cht
i = 1
Next sht
Application.EnableEvents = True
Application.ScreenUpdating = True
End Sub
