Suradnik:Goranigaly
Izvor: KiWi
(Nije prikazano 12 međuinačica) | |||
Redak 1: | Redak 1: | ||
dr.sc. Goran Igaly, viši predavač | dr.sc. Goran Igaly, viši predavač | ||
+ | |||
+ | Stranica za prognozu: http://www.yr.no/place/Croatia/Grad_Zagreb/Zagreb/hour_by_hour.html | ||
+ | |||
+ | === Tajna koju znaju samo vrhunski ofisinstalateri === | ||
+ | |||
+ | If you look at the markup for one of your own documents, you may see code similar to the preceding example along with additional tags labeled '''w:rsidR''' and '''rsidRPr''', each followed by a set of numbers. Those tags and their corresponding numbers are a result of the feature Store Random Number To Improve Combine Accuracy, which you can find on the Privacy Options tab of the Trust Center. (See Chapter 23 of this book, "Using VBA and XML Together to Create Add-Ins," for more on using the Trust Center.) | ||
+ | |||
+ | Unless you intend to use the '''Combine''' feature (available from the Compare options on the Review tab) with a particular document, there's no benefit to enabling this option (but it is on by default). For the sake of simplicity, since these tags are not essential to your documents, they're not included in any XML samples throughout this chapter. | ||
+ | |||
+ | (sa stranice http://msdn.microsoft.com/en-us/library/office/dd721893(v=office.12).aspx) | ||
[[Image:goranigaly.jpg]] | [[Image:goranigaly.jpg]] | ||
- | web stranica: [http:// | + | web stranica: [http://web.math.hr/~igaly osobna stranica] |
+ | |||
+ | Konzultacije: | ||
+ | * srijedom 9-10 | ||
+ | * četvrtkom 17.30-18.30 | ||
+ | |||
+ | <math>a^2+b^2=c^2</math> | ||
+ | |||
+ | [[SvH.Home]] | ||
+ | |||
+ | Private Sub Worksheet_Change(ByVal Target As Range) | ||
+ | |||
+ | Dim icolor As Integer | ||
+ | |||
+ | |||
+ | |||
+ | If Not Intersect(Target, Range("A1:A10")) is Nothing Then | ||
+ | |||
+ | Select Case Target | ||
+ | |||
+ | Case 1 To 5 | ||
+ | |||
+ | icolor = 6 | ||
+ | |||
+ | Case 6 To 10 | ||
+ | |||
+ | icolor = 12 | ||
+ | |||
+ | Case 11 To 15 | ||
+ | |||
+ | icolor = 7 | ||
+ | |||
+ | Case 16 To 20 | ||
+ | |||
+ | icolor = 53 | ||
+ | |||
+ | Case 21 To 25 | ||
+ | |||
+ | icolor = 15 | ||
+ | |||
+ | Case 26 To 30 | ||
+ | |||
+ | icolor = 42 | ||
+ | |||
+ | Case Else | ||
+ | |||
+ | 'Whatever | ||
+ | |||
+ | End Select | ||
+ | |||
+ | |||
+ | |||
+ | Target.Interior.ColorIndex = icolor | ||
+ | |||
+ | End If | ||
+ | |||
+ | |||
+ | |||
+ | End Sub |
Trenutačna izmjena od 06:22, 2. studenog 2012.
dr.sc. Goran Igaly, viši predavač
Stranica za prognozu: http://www.yr.no/place/Croatia/Grad_Zagreb/Zagreb/hour_by_hour.html
Tajna koju znaju samo vrhunski ofisinstalateri
If you look at the markup for one of your own documents, you may see code similar to the preceding example along with additional tags labeled w:rsidR and rsidRPr, each followed by a set of numbers. Those tags and their corresponding numbers are a result of the feature Store Random Number To Improve Combine Accuracy, which you can find on the Privacy Options tab of the Trust Center. (See Chapter 23 of this book, "Using VBA and XML Together to Create Add-Ins," for more on using the Trust Center.)
Unless you intend to use the Combine feature (available from the Compare options on the Review tab) with a particular document, there's no benefit to enabling this option (but it is on by default). For the sake of simplicity, since these tags are not essential to your documents, they're not included in any XML samples throughout this chapter.
(sa stranice http://msdn.microsoft.com/en-us/library/office/dd721893(v=office.12).aspx)
web stranica: osobna stranica
Konzultacije:
- srijedom 9-10
- četvrtkom 17.30-18.30
a2 + b2 = c2
Private Sub Worksheet_Change(ByVal Target As Range)
Dim icolor As Integer
If Not Intersect(Target, Range("A1:A10")) is Nothing Then
Select Case Target
Case 1 To 5
icolor = 6
Case 6 To 10
icolor = 12
Case 11 To 15
icolor = 7
Case 16 To 20
icolor = 53
Case 21 To 25
icolor = 15
Case 26 To 30
icolor = 42
Case Else
'Whatever
End Select
Target.Interior.ColorIndex = icolor
End If
End Sub