나눔터  
  HOME > 나눔터 > 묻고답하기 > 엑셀
엑셀
엑셀에 대한 질문과 답변을 올려주세요. 단, 취지에 맞지 않는 글은 운영자가 삭제합니다.
 "000 님, 도와주세요", "부탁 드립니다.", "급합니다!" 등과 같이 막연한 제목을 달지 말아주세요.
[필독] 빠르고 정확한 답변을 얻는 16가지 Tip !
[필독] 저작권법 개정에 따른 이용안내

작성자:  

 미쉘한 (micellehan)

추천:  2
파일:     프라모델창고재고_최종.xlsm (168.3KB) 조회:  1421
제목:   행삭제 메크로 한번 봐주세요
     
  * 답변하시는 분들께 도움이 되도록 자신의 환경을 아래 항목 옆에 기재해 주세요.

 - 엑셀 버전(95,97,2000,xp,2003,2007):

* 아래줄에 질문을 작성하세요 >>
K열에 "O"값인 행만 삭제 하고 싶은데.. 
잘 안되요.. VBA를 보고 수정도 했봤는데 삭제는 안되고 수식 값이 변하기만 합니다
 
[불량 게시물 신고]  
speena저도 다른분것보고 수정한것뿐이긴한데 
한번 해보세요!

Sub O_DELETE()

    
   Application.ScreenUpdating = False
    

   Dim inRngCell, inRng As Range
   Dim delCnt As Integer
   Dim k As Integer

   Set inRng = ActiveSheet.Range("K6:K15000")
   delCnt = 1
   For k = inRng.Cells.Count To 1 Step -1
      If InStr(1, inRng(k), "O", 1) > 0 _
       Then
       inRng(k).EntireRow.Delete
    End If
Next
     
     Application.ScreenUpdating = True

End Sub

02-14 (16:11)
삭제 ■신고
미쉘한감사합니다..02-14 (17:51)
삭제 ■신고
        
  

작성일 : 2020-02-14(12:09)
최종수정일 : 2020-02-14(12:09)