yanto913

¦]¬°§Ú¬Oªì¾ÇªÌ©Ò¥H¥u·|³o¼Ë§PÂ_...¥Î¤F«Ü¦hAnd

1. Sub ¨ú¥N()
   
2. For j = 1 To 9
   
3. For i = 3 To 22
   
4. If Cells(i, j) <> Cells(1, 1) And Cells(i, j) <> Cells(1, 2) And Cells(i, j) <> Cells(1, 3) And Cells(i, j) <> Cells(1, 4) And Cells(i, j) <> Cells(1, 5) And Cells(i, j) <> Cells(1, 6) And Cells(i, j) <> Cells(1, 7) And Cells(i, j) <> Cells(1, 8) And Cells(i, j) <> Cells(1, 9) Then
   
5. Cells(i, j) = "X"
   
6. End If
   
7. Next i
   
8. Next j
   
9. End Sub

½Æ»s¥N½X