도구1 Early binding 이제 자동으로..(Feat.Guid) Option Explicit Sub Haja_ListReference() Dim i& On Error Resume Next With ActiveSheet [a1].CurrentRegion.Clear .[a1] = "참조이름" .[b1] = "참조경로" .[c1] = "GUID" [a1:c1].HorizontalAlignment = xlCenter End With For i = 1 To ThisWorkbook.VBProject.References.Count With ThisWorkbook.VBProject.References(i) ActiveSheet.Cells(Rows.Count, "a").End(3)(2) = .Name ActiveSheet.Cells(Rows.Count, "b").End(3)(2) =.. 2022. 5. 3. 이전 1 다음