|
Тема
|
Как се променя автоматично border&color на клетка?
|
|
Автор |
PeteRHR (C18NZ) |
Публикувано | 28.02.06 11:26 |
|
Как мога да направя една клетка да ми е = на друга клетка и като сменя форматирането (цвят и border) на първата клетка да ми се промени автоматично и втората клетка?
Само промяна на стойност е лесно, ама как да се променя и начина на форматиране на клетката???
| |
Тема
|
Re: Как се променя автоматично border&color на кле
[re: PeteRHR]
|
|
Автор |
kibik (позициониран) |
Публикувано | 28.02.06 14:25 |
|
Format
Conditional Formatting
и тук вече задаваш както искаш да изглежда, и с коя клетка да =
| |
Тема
|
Re: Как се променя автоматично border&color на кле
[re: kibik]
|
|
Автор |
PeteRHR (C18NZ) |
Публикувано | 28.02.06 15:09 |
|
Как да му задам в Conditional Formatting една клетка да е вързана с друга?
Аз искам при всички положения да е вързана, не само ако стойността й е в определени граници.
Но искам като променя цвета на фона или размера на borders (или изтрия лявата линия) да се променя и втората клетка.
| |
Тема
|
Re: Как се променя автоматично border&color на клетка?
[re: PeteRHR]
|
|
Автор |
River_ (Eliniki) |
Публикувано | 01.03.06 14:13 |
|
май трябва макрос. Например
Sub copyFormat(R1 As String, R2 As String)
Range(R1).Select
Selection.Copy
Range(R2).Select
Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False
Application.CutCopyMode = False
End Sub
Ще трябва и бутонче, на което да се присвои
Sub Button1_Click()
copyFormat "A1", "A2"
End Sub
| |
Тема
|
Re: Как се променя автоматично border&color на кле
[re: River_]
|
|
Автор |
PeteRHR (C18NZ) |
Публикувано | 02.03.06 11:23 |
|
Не ми се искаше да е много с макроси, защото незнам как да направя да се върже дадена клетка и когато променя (примерно insert column) и номерацията на дадената клетка се променя. А в самия макрос си остава същата.
Може ли да се направи в макроса да е вързана клетката и ако се промени адреса й да се променя автоматично и в макроса?
Иначе искам да променят border&color на 100-ина клетки разхвърляни в 10-ина sheet-a.
| |
Тема
|
Re: Как се променя автоматично border&color на кле
[re: PeteRHR]
|
|
Автор |
zhitov (непознат
) |
Публикувано | 03.03.06 09:02 |
|
Може да стане, ако дадеш име на областта, от която трябва да копираш формата и подадеш това име като параметър на процедурата на River_.
А за обхождане на именувана област клетка по клетка (напр. Data) се използва for each:
For Each Cell In Range("Data")
Cell.Select
....
Next
| |
Тема
|
Re: Как се променя автоматично border&color на кле
[re: zhitov]
|
|
Автор |
PeteRHR (C18NZ) |
Публикувано | 04.03.06 08:29 |
|
ОК, мерси за помощта на всички, ще го пробвам.
| |
|
|
|
|