엑셀 VBA (11) 썸네일형 리스트형 엑셀 VBA로 열에 포함된 글짜 찾기 (instr 함수) 안녕하세요~ 청년군입니다. 여러 행들중에 특정 글짜가 포함된 열을 찾고 싶을때가 있지요? 아래의 소스를 넣으시고 실행시켜 보시면 쉽게 찾으실 수 있을거에요 ^^ Sub mj() For i = 2 To 7 If InStr(Cells(i, 1), Cells(1, 4)) Then Cells(2, 4) = i End If Next End Sub 아주 간단하죠? 화면 구성은 요렇게 하시면 됩니다. 아래 행이 늘어날 경우에는 for i = 2 to 7에서 7을 바꿔 주시면 되겠죠~~^^ 주식초보가 사용하면 좋은 자동매매 프로그램(파일 및 설치안내) 다운받기 설정한 시간마다 주식을 살 수 있는 프로그램입니다. 이제 한번에 오백만원 천만원씩 사시지 마시고 1분에한번 2분에 한번씩 사세요~ 테스트 해본결과 확실히 좋습니다. ^^ 이 프로그램은 제가 직접 만든거라 사용에 제한은 없습니다 ㅎㅎ 향후에 더 좋은 기능들을 추가할 예정입니다. 마음껏 쓰세요 ㅎㅎ MJ_Trader는 별도의 설치없이 사용하실 수 있습니다. 해당 프로그램은 이베스트증권 계좌가 있으셔야 합니다. 또한 이베스트투자증권 API프로그램 설치 및 사용등록을 하셔야 합니다. 전혀 어렵지 않아요 ㅎㅎ 따라오세요~^^ 다음에서 이베스트증권 검색하셔서 고객센터 > 매매시스템 > API 로 들어가시면됩니다. 로그인을 하세요~ 어차피 설치파일 받으시려면 로그인 하셔야 합니다. ㅎㅎ 요기서 최신버전설치를.. 공지 url https://youtu.be/P6fDdu5Gi78 ver (Ver 2017.01) 기본 테스트 테스트 입니다. 엑셀 VBA 값 찾기~ 안녕하세요~ 청년군입니다~ 여러값들을 전체 혹은 특정페이지에서 검색할 필요가 있을때~ 아래 소스를 넣으시고 for next 나 Do loop 문을 사용하시면 손쉽게 이용하실 수 있으실꺼에요~~ -전체 페이지에서 검색하기- Sub Mj() Cells.Find(What:=Cells(1, 1), After:=ActiveCell, LookIn:=xlFormulas, LookAt:= _ xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False _ , MatchByte:=False, SearchFormat:=False).Activate End Sub -특정영역에서 검색하기- Sub Mj2() Columns("B:B").Select Select.. 엑셀 VBA 목표값 찾기~ 엑셀 VBA 제작 주문받고 있는 청년군입니다~^^ 국민전화번호가 될 010-3761-1487 날려드리면서~~ 요즘 스포츠 토토를 하면서 증액방식으로 좀 해보려고 엑셀을 만들어 봤네요 ㅎㅎ 버튼 누르기가 귀찮아서 Worksheet에 Change 기능을 이용해서 배당율만 고치면 자동으로 금액이 나오도록 만들었습니다. ㅎㅎ Private Sub Worksheet_Change(ByVal Target As Range) For j = 3 To 18 Step 5 For i = 4 To 11 Cells(i, j + 2).GoalSeek Goal:=Cells(1, 1), ChangingCell:=Cells(i, j) Next Next End Sub 배팅한도가 없으면 당연히 수익이 나겠지만 다들 배팅한도가 얼마 안되서 수.. 이전 1 2 다음
