엑셀 VBA

[@hwl9223]

감사합니다

[@TheJaebeomPark]

좋은 강의 감사합니다

[@엑셀디자인]

반갑습니다 :)

[@i1683u]

강사님 안녕하십니까 다시 반복해서 공부하고 있습니다 감사합니다 VBA118 강좌에서 준비된 파일에서 제품열이 나오게 VBA를 for문으로 작성해 봤습니다 그런데 new collection 이나 dictionary로 만들고 싶은데 강의 부탁드리고 싶습니다 참고로 Sub 그룹별순번매기기_배열() Dim i As Long Dim j As Long Dim lastRow As Long Dim currentRow As Long Dim a() Dim rngS Dim count As Long Application.ScreenUpdating = False If Range("B2") "" Then Range("B2", Cells(Rows.count, "B").End(xlUp)).ClearContents End If rngS = Range("A2", Cells(Rows.count, "A").End(xlUp)) lastRow = Cells(Rows.count, "A").End(xlUp).Row ReDim Preserve a(UBound(rngS)) For i = 0 + 2 To lastRow count = 0 currentRow = i For j = 0 + 2 To currentRow If Cells(currentRow, "A") = Cells(j, "A") Then count = count + 1 a(j - 2) = Cells(j, "A") & "-" & count ' Cells(currentRow, "B") = Cells(j, "A") & "-" & Count End If Next j Next i Range("B2").Resize(UBound(a), 1) = Application.Transpose(a) Application.ScreenUpdating = True End Sub

[@엑셀디자인]

안녕하세요:) #VBA 119, #VBA 127 이 두개의 영상을 이어서 보셔요. 원하시는 것을 얻으실 수 있으실겁니다.

[@투썬-u6v]

좋은 강의 감사드립니다 :)

[@Hello-Annyeong]

선생님 자려고 했는데 밤에 영상이 올라와서 공부중입니다 ^^ 야간 자율학습 너무 좋네요^^ dictionary 보긴봤는데 제대로 처음 제대로 알게되었습니다 : ) 감사합니다! 선생님 영상에서도 배열이 나왔는데 혹시 2차원 행열 정&동적 배열 섞어서 사용하는 예시 한번 영상 부탁드려도 괜찮을까요 ? 열은 날짜 1~31일 (정적배열) 행은 리스트 (동적배열) 구조인데 배열 이해는되면서도 2차원 으로 가니 너무 어렵습니다 ㅠㅠ

[@엑셀디자인]

늦게까지 공부하시고..열정 대단하십니다! 샘플 파일을 보내줘보세요. 어떻게 처리를 하고 싶으신지 적으시고. 많은 분들에게 유익한 부분이면 영상으로 제작해서 공유하면 좋지요 :)

[@미적분기하-곽경도]

안녕하세요. 딕셔너리에 대해 잘 알게 되었습니다. 항상 깔끔한 설명과 유익한 내용이 정말 좋아서 자주 듣고 있습니다. 질문이 있는데 딕셔너리 안에 딕셔너리를 넣을 수 있을까요?? 예를 들어 키값이 "1" 이고 아이템들이 "ㄱ", "ㄴ"인 Dict_1이 있다고 가정하고, 위의 아이템들인 "ㄱ", "ㄴ"이 키 값이 되고 각 키값별로 아이템이 다음과 같이 만들어지는 Dict_2를 새롭게 만들 수 있을까요?? "ㄱ : a, b, c" "ㄴ : d, e, f "

[@엑셀디자인]

딕셔너리 안에 딕셔너리를 넣는다...는 아직 경험이 없구요. (가능할까요? ) 위처럼 결과물이 나오도록 딕셔너리 개체를 활용하게 전에 또 다른 로직을 구현한 후 딕셔너리로 조인을 하면 될 것 같기는 합니다.

[@미적분기하-곽경도]

@@엑셀디자인 답변 감사드립니다. 딕셔너리가 활용도가 높은것같네요. 틈나는대로 잘 듣고 있습니다. 감사합니다^^항상 응원하겠습니다.