엑셀 VBA

[@hwl9223]

감사합니다

[@투썬-u6v]

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

[@TheJaebeomPark]

좋은 강의 감사합니다

[@엑셀디자인]

반갑습니다 :)

[@Hello-Annyeong]

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

[@엑셀디자인]

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

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

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

[@엑셀디자인]

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

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

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

[@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 이 두개의 영상을 이어서 보셔요.
원하시는 것을 얻으실 수 있으실겁니다.