Ранг 2
FREE

Elvira

Присъединил се: септември 2014
					
Постоянство
бета

0

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

1540

 
Постижения

19

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

62

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

2

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

5

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

2

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

0

 

Интереси

Microsoft Excel MS Word Microsoft 365 Тайните на Excel Тайните на Word Excel VBA VBA за Excel

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

от харесани отговори разделени по софтуер
1
Microsoft Excel

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


Постижения

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

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

Здравейте, опитах да премахна изписването на формулата, но не се получава, нито чрез клавишната комбинация, нито чрез бутона (Show formula), който междудругото въпреки, че виждам формилата не е активен. Моля кажете къде е проблема?
Здравейте, справих се с макроса.Очевидно трябва да има коментар пред '(xlInsideHorizontal) :) Бих искала да попитам защо не ми разрешава да поставя коментар по средата на реда( като го правя така ми маркира кото коментар целия ред, а не само след него) Наложи се да преместя '(xlInsideHorizontal) на нов ред и да поставя коментар само на него. Как да слагам коментари по средата на реда както е в урока?
Ето това са изписаните инструкции Sub FormatBorder() ' ' FormatBorder Macro ' Слага рамка на таблицата ' ' Range("J3:M9").Select ' Selection.Borders(xlDiagonalDown).LineStyle = xlNone ' Selection.Borders(xlDiagonalUp).LineStyle = xlNone ' With Selection.Borders(xlEdgeLeft) ' .LineStyle = xlContinuous ' .ColorIndex = 0 ' .TintAndShade = 0 ' .Weight = xlThin ' End With ' With Selection.Borders(xlEdgeTop) ' .LineStyle = xlContinuous ' .ColorIndex = 0 ' .TintAndShade = 0 ' .Weight = xlThin ' End With ' With Selection.Borders(xlEdgeBottom) ' .LineStyle = xlContinuous ' .ColorIndex = 0 ' .TintAndShade = 0 ' .Weight = xlThin ' End With ' With Selection.Borders(xlEdgeRight) ' .LineStyle = xlContinuous ' .ColorIndex = 0 ' .TintAndShade = 0 ' .Weight = xlThin ' End With With Selection.Borders(xlInsideHorizontal) .LineStyle = xlContinuous .ColorIndex = 0 .TintAndShade = 0 .Weight = xlThin End With Range("G7").Select End Sub