VBA for EXEL- проблем с comment
3 отговора
167 прегледа
VBA for EXEL- проблем с comment
правя една програма в която се налага разместване на редове за да се подредят по дата, която е в 3тата колона. Проблема е ,че някои клетки имат Comments а други не и при простото разместване Comment-a си остава в клетката която е бил и не се размества. Как може да преместя него? Тоест да разбера дали има или няма дадена клетка щото ако няма и правя операция с него програмата дава грешка.
Благодаря
Благодаря
Re: VBA for EXEL- проблем с comment
Смятам, че това "EXEL" в заглавието на темата всъщност е excel. И изхождайки от това защо не опиташ със сортиране? Така се местят клетките без промяна на формат и т.н.
а ето и един макрос, ако държиш да стане по програмен път
ако в колона С от 1 до 8 ред са ти датите
а в D са ти клетките с коментарите опитай това
Range("C1:D8").Select
Selection.Sort Key1:=Range("C1"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
а ето и един макрос, ако държиш да стане по програмен път
ако в колона С от 1 до 8 ред са ти датите
а в D са ти клетките с коментарите опитай това
Range("C1:D8").Select
Selection.Sort Key1:=Range("C1"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
Re: VBA for EXEL- проблем с comment
много благодаря оправих вече проблема точно по този начин като записах макроса разбрах и всички параметри само това Key1:=Range("C1") за мен остава загадка - работи си и с "C3" , "C50" или каквото друго це да избера Но важното е че работи и е много по-бързо отколкото да ги сортирам с метод на мехурче 
Re: VBA for EXEL- проблем с comment
Key1:=....... това е аргумента. Виж сега. Когато извикваш някоя функция или процедура, която изисква задаване на аргументи (параметри), ти можеш да изпишеш само стойностите на аргументите без да ги описваш коя стойност за какво е, но трябва да спазваш строго последователността им. Втория вариант - за всяка стойност да описваш и името на аргумента, за да можеш да пропуснеш тези аргументи, за които не задаваш стойности, но тези, които ти трябват са след тях.
Действай сега. Ако има нещо ясно - питай. ;о))))
Щирлиц
Действай сега. Ако има нещо ясно - питай. ;о))))
Щирлиц