Ранг 2
FREE

Пламен Калинов Въреди LinkedIn адрес

Присъединил се: януари 2017
Човешки ресурси, Психология, Обучения.
Постоянство
бета

0

най-дълъг период: 0 дни
Аула точки

2465

 
Постижения

24

за седмица 0
Изгледани уроци

97

за седмица 0
Харесани отговора

9

за седмица 0
Общо отговора

11

за седмица 0
Въпроса

1

за седмица 0
Последвани

0

 

Потвърдени умения

от харесани отговори разделени по софтуер
5
Microsoft Excel
2
Power BI

Записани курсове

Постижения

В АУЛА винаги се стремим да подобрим начина на обучение и поради това въведохме точкова система с постижения.
Принципът на работа е съвсем прост - за определено действие в АУЛА (като преминати уроци, преминат тест, отговор на въпрос от друг колега) се получават точки и постижения. Така ще възнаграждаваме хората, които регулярно гледат уроците и помагат на другите в сайта.
Който помага на другите, помага на себе си
Записани четири курса!
Записани три курса!
Най-мощното оръжие
Здрав напредък
Страхотна екипна работа
Записан втори курс!
Имейл новини. Ниво 3
Имейл новини. Ниво 2
Който дава живот на ума и знанието, той не умира
Имейл новини. Ниво 1
Стабилен напредък
Добра екипна работа
Благодарност
Доказани знания
Добро начало
Който се учи, той ще сполучи
Напредък
Три влизания за една седмица
Профил със снимка
Напред, напред, напред
Първи стъпки

Последни форум дискусии

Чувам от всякъде за Microsoft Power BI. Много хора са ентусиазирани за този нов софтуер, но защо? Интересно ми е защо самите хора от Майкрософт правят продукт, който изглежда конкурентен на Ексел. След това защо хора, които с години са работили и познават Ексел преминават към Power BI? Не може ли анализите, което си правим в Excel да продължим да си ги правим там. Защо ни е още един софтуер? Ще е полезно ако повече хора се включат в дискусията с мнения.
Привет и от мен. ;-) Личното ми мнение е, че PBI e наследник на Аксес а не на Ексел. Ексела събира суровите и грозни данни. ПБИ ги прави хомогенни, красиви и достъпни за всички.
Изпълнение на процедури - кои редове да се изтрият
<p>В урока предварително знаем, че 2 реда трябва да се изтрият, но ако това не е ясно не е ли по-добре след като открием първата клетка с формула- без да правим Offset направо да зададем ActiveCell.Resize(1,1).EntireRow.Delete</p><p>След като изтрием този ред правим нова проверка, намираме друга формула - изтриваме и нейния ред и така докато се изтрият всички редове с формули.</p><p>Може ли активната клетка да не е в началото на реда за да го изтрием?</p>
Благодаря, яко го бях закъсал/;-) Аз го направих така: Range(Selection, Selection.End(xlToRight)).Select Selection.Name = "suma" Set MR = Range("suma") For h = 1 To 19 For Each cell In MR If cell.Value = "0" Then cell.EntireColumn.Delete 'òðèå êîëîíà àêî ñáîðà è å 0 Next h
Изпълнение на процедури - кои редове да се изтрият
<p>В урока предварително знаем, че 2 реда трябва да се изтрият, но ако това не е ясно не е ли по-добре след като открием първата клетка с формула- без да правим Offset направо да зададем ActiveCell.Resize(1,1).EntireRow.Delete</p><p>След като изтрием този ред правим нова проверка, намираме друга формула - изтриваме и нейния ред и така докато се изтрият всички редове с формули.</p><p>Може ли активната клетка да не е в началото на реда за да го изтрием?</p>
Може ли малко помощ? Имам колони със сбор, искам ако сбора под някоя колона е 0, колоната да се трие. Дотук какво съм направил: Dim c As Range For Each c In Selection If c.Value > 0 Then ActiveCell.Offset(0, 1).Range("A1").Select If c.Value = 0 Then c.EntireColumn.Delete Next c Не мога да измисля: как да го повтаря докато срещне празна клетка да укажа ако срещне празна клетка да се върни примерно на А1.
Добавяне на сумарен ред под таблица
Здравейте, как мога да променям и дефинирам коя да е active cell, спрямо която се изпълняват другите инструкции?
Може ли малко помощ? Имам колони със сбор, искам ако сбора под някоя колона е 0, колоната да се трие. Дотук какво съм направил: Dim c As Range For Each c In Selection If c.Value > 0 Then ActiveCell.Offset(0, 1).Range("A1").Select If c.Value = 0 Then c.EntireColumn.Delete Next c Не мога да измисля: как да го повтаря докато срещне празна клетка да укажа ако срещне празна клетка да се върни примерно на А1.
Използване на помощник (Builder) за съставяне на изрази
Здравейте, Когато се опитах да използвам функцията "Total" не получих числата посочени в упражнението. Необходимо ли е да се маркира ред или поле, за да изчисли правилно?
Не, не трябва да се маркира нищо. На някое от предните изчисляеми полето нещо се е объркало.
Изпълнение на процедури - кои редове да се изтрият
<p>В урока предварително знаем, че 2 реда трябва да се изтрият, но ако това не е ясно не е ли по-добре след като открием първата клетка с формула- без да правим Offset направо да зададем ActiveCell.Resize(1,1).EntireRow.Delete</p><p>След като изтрием този ред правим нова проверка, намираме друга формула - изтриваме и нейния ред и така докато се изтрият всички редове с формули.</p><p>Може ли активната клетка да не е в началото на реда за да го изтрием?</p>
Здравейте, имам нужда от помощ за една задача. Под колоните трябва да се добави сумарен ред и да се провери, ако сумата е 0 се трие колоната, ако не е се продължава напред и така до края. Стигнах до тук: Range("B1").Select Range(Selection, Selection.End(xlDown)).Select ActiveCell.Range("A1:A13").Select ActiveCell.Offset(12, 0).Range("A1").Activate ActiveCell.FormulaR1C1 = "=SUM(R[-12]C:R[-1]C)" ActiveCell.Offset(-12, 0).Range("A1:A13").Select Selection.End(xlDown).Select Selection.AutoFill Destination:=ActiveCell.Range("A1:F1"), Type:= _ xlFillDefault ActiveCell.Range("A1:F1").Select Selection.End(xlToRight).Select Selection.End(xlToLeft).Select If ActiveCell > 0 Then ActiveCell.Offset(0, 1).Range("A1").Select If ActiveCell = 0 Then ActiveCell.EntireColumn.Delete И сега не искам да започва макроса пак от начало а от иф?