VBA за Excel: Как да управляваме колекции (Collections) - блок-оператор For each

Q: Може ли въпрос?

Здравей, относно първия въпрос Лектора би дал най правилния отговор :) втория въпрос може ли да кажеш какъв е лаптопа Lenovo, Mac .. обикновено там са настройките F1 .... F12 да работят с Fn?Ако е Lenovo ( наскоро ползвах за извесно време една Lenovo клавиатура затова директно споделям как се реши проблема ) може да направите следното отидете с Start бутона на Windows и след това отиде на лентата за търсене и там да изпишете : Lenovo Ultraslim Plus Wireless Keyboard and Mouse отворете го след което ще ви излезне прозорец в който може да дадете отметка за това F1- F12 да са със стандартни си функции.Ако е друг вид лаптопа или пишете тук за да помогнем или пък директно отидете на сайта на производителя на лаптопа и изпишете като ключови думи :Switching Function key to standart ( или пък F1 F12 to standart )няма как да няма тема в която се пояснява как става това.

Q: Може ли да се използва For Each - Next оператор за таблици съдържащи числа и текст

Правилно се насочвате за още една проверка, за да се оцветяват само числа. Например: If IsNumber(rng_cell.Value) And rng_cell.Value > 5000 Then ....(следва инструкцията). IsNumber проверява дали стойността в клетката е число Ако е число ще върне True, aко не е число ще върне False. Текстът в клетката за компилатора означава стойност > 5000 и затова оцветява и клетки с текст. Ето защо трябва да се допълни, да се прецизира условието с още една проверка (за Вашия пример) да оцветява само числа. Друго решение е дефинирате обекта Range, който ще оцветявате, така че да включва само числа. Надявам се идеите да Ви помогнат.