VBA280 [VBA] 성적 등급표 만들기(Feat. 수우미양가~~~) 본인이 엑사남님 통해서 VBA를 조금씩 알아갈 때쯤 하나의 갈증같은게 있었다. 구글링을 하던 어떻게 어떻게 로직을 만들기는 했으나, 변수는 i, j으로 늘 이중 For문으로 로직을 짜고 있었다. 그게 나쁘다거나 틀렸다는 것이 아니라, 그냥 본인 스스로가 완성된 코드가 그리 이뻐 보일질 않았다. 오늘은 절대 이중 for문 쓰지말자 다짐하고 Do until ~ Loop 를 써보기도 하고 For Each문으로 대신 해보기도 했지만, 셀에 출력을 할땐 행과 열이 필요했기 때문에 또다시 이중 For문으로 돌아가길 반복했다.. 물론 지금은 거의 고정적으로 rngA, rngAll 를 사용하여 For each로 순환하고 있지만 이전보다는 만족스러운 코딩 생활을 하고 있다. 이게 중요하냐 아니냐는 VBE창을 블랙으로 하.. 2022. 4. 20. [VBA] Alt + Enter 셀 텍스트 색상 변경하기 이전에 이런 글을 올릴적이 있다 https://1stminokingdom.tistory.com/56 [VBA] 글자색 바꾸기(feat. Instr/Characters) 오늘 해볼건 이런것이다. 색상 을 변경할 단어를 Inputbox로 입력받은 후 입력받은 단어를 색상은 빨강색 / Bold는 True하는 작업이다. 이 역시 막상 해보려면 좀 난감하기에 코드를 한번 쏴악 훝어보 1stminokingdom.tistory.com 이건 해당 영역을 순환하면서 값을 찾은 후 글자수를 계산하여 해당 글자만큼 색상을 입혀주기만 하면 된다. 아무 생각할 필요도 없다고 건방을 떨었다...와...근데 하루 반나절이 걸렸다. 물론 일하는 짬짬이 해결했지만 시간 상으론 하루 반나절이 맞다... 이전 글에 올렸던 글자색 변경 문.. 2022. 4. 20. [VBA] 반편성하기(메모에 사진넣기) 각 조건에 모두 부합하는 반편성을 구하시오 ※ 조건1 : 1반 부터 100반까지 1~100까지의 랜덤 숫자 넣기 ※ 조건2 : 각 10배수 / 10 = 반편성 ex) 50번일 경우 5반 ※ 조건3 : 각 5배수는 각 반 한명만 위치하기(반드시 떨어져야 하는 아이들) 코드 진행은 이렇다. 1. 고유값을 전체 영역에 출력한다. 2. 고유값중 10의 배수들은 각 배수의 몫이 해당반에 속해야 한다. 3. 5의 배수중 홀수는 반에 한명씩만 있어야 한다. (메모 사진을 보길 바란다) 4. 학생에 해당하는 사진을 넣는다( 이건 개인 차가 있으니 자신들의 폴더 영역을 수정해야한다.) 핵심구문1: 코드 진행 중 숫자 위치를 변경하기 위해 temp = 1 1=2 2=temp 이렇게 하면 1번과 2번의 값을 바꿀 수 있다... 2022. 4. 15. [VBA] 내일의 로또당첨을 위해(feat. 인생한방!!) 인생 뭐있냐..한방이지... 최근 고유값을 찾기 위한 배열과 셀기반 구문들을 계속 해오고 있는데 고유값 문제의 단골문제는 로또번호를 구하는 문제가 주를 이루기에 이참에 본인도 만들어 보기로 하였다. https://www.youtube.com/watch?v=RhVgm-zDhX0&t=302s 엑사남님이 1년전에 만드신걸 이제야 만들게 되다니...반성중~~ 기본 골격은 엑사남님 파일에서 가져왔다. 엑사남님이 셀기반과 Countif 로 중복값을 걸러내면서 로또번호를 도출하였다면 본인은 최근 계속 사용하고 있는 배열내 고유값을 찾아내는 구문으로 해결하였다. 로또 번호의 생성과 함께 번호의 구문으로 도형의 색상도 함께 변경되도록 구문을 정리하였다. 도형의 텍스트는 셀의 값을 연동시키는 방식으로 하였는데 도형에 바로.. 2022. 4. 14. 이전 1 ··· 49 50 51 52 53 54 55 ··· 70 다음