GBKEE

¦^´_ 2# no3-taco

1. If Range("e1").Value <> "" And Range("e2").Value <> "" And Range("e3").Value <> ""

½Æ»s¥N½X

¦pªG¦³§ó¦h­ÓÀx¦s®æ,·|¼g¨ì²´ªá¤F.

1. Option Explicit
   
2. Sub Ex()
   
3.     Dim Rng As Range
   
4.     Set Rng = Range("E3, F3, H3")
   
5.     'Set Rng = Range("E3, F3, H3,J3,K3,M3") '§ó¦hªºÀx¦s®æ"
   
6.     If Application.CountA(Rng) = Rng.Cells.Count Then
   
7.         MsgBox Rng.Address(0, 0) & " ³£¦³¸ê®Æ"
   
8.     End If
   
9. End Sub

½Æ»s¥N½X