Microsoft Excel

1
Microsoft Excel
2
Excel ?????

• ??? ?? .xls
• ???????????
• ??? ?? Sheet
• ?????????256? 65536?
• ??? ?? Range
• ????????????
• ???????????????

3
??????

• ????Excel?????????
• ?????????(?????)
• ????????
• ????
• ?????????????????
• ?????????????????

4
??????

• ??????????
• ?A1?B13?????
• ????????
• ??A1??????B3???,?
• ?A1???????B3???
• ????????????,???A1??????????????2????????
• ?????A1????A2?,????

5

• ????????
• ?A1??????????????
• ?????????A1????,?????????????
• ????? ??????,? A10

6
1. VBA ??

• 1-1 ?????????VBA?

7
??????

• ??
• ?????????????
• ?Excel?, ????????? ???????????? ??????????

8
(No Transcript)
9
???VBA?

• VBA (Visual Basic for Applications)
• ????????????Excel?????????????????,????????,??????
  ?VBA?????????
• VBA?????????????

10
VBA???
Office2007
07
11
1. VBA ??

• 1-2 ?????????

12
????????

• ???????????????
• ??????????????????
• ???????????
• ?????????????????
• ???????
• ?Excel?????????
• ??Windows???????

13
???????????????
14
??????????????????
????????
15
???????????
16
?????????????????
17
???????
18
?Excel?????????
19
????

• ????????????????
• ????????????, ????????
• ???????True(?)??False(?)
• Excel???????????
• if ( ???, ????, ????)

20
(No Transcript)
21
(No Transcript)
22
????

• ?????

23
???? if
24
????????????

• Sub InteriorRed()
• Dim myRange As Range
• For Each myRange In Worksheets(2).Range("C4F1
  2")
• If myRange.Value lt 60 Then
• myRange.Interior.ColorIndex 38
• Else
• If myRange.Value gt 85 Then
• myRange.Interior.ColorIndex 4
• Else
• myRange.Interior.ColorIndex 0
• End If
• End If
• Next
• End Sub