반응형 전체 글167 Worksheet.Visible 속성 Worksheet.Visible property 개체가 표시되는지 여부를 결정하는 XlSheetVisibility 값을 반환하거나 설정합니다. xlSheetVeryHidden으로 숨긴 시트는 목록에 보이지 않습니다. 숨겨진 시트가 모두 xlSheetVeryHidden이면 Unhide메뉴가 비활성화됩니다. 아래 코드는 Sheet1을 숨기는 예제입니다. Worksheets("Sheet1").Visible = False 아래 코드는 Sheet1을 화면에 표시하는 예제입니다. Worksheets("Sheet1").Visible = True 아래 코드는 현재 통합 문서의 모든 시트를 화면에 표시하는 예제입니다. Sub ShowAllSheets() Dim ws As Worksheet For Each ws In Th.. 2024. 2. 20. 카테고리별로 시트 생성하여 나누기 Sub CreateSheetsBasedOnCategory() Dim categoryCol As Variant Dim category As Variant Dim rowIndex As Long Dim categoryDict As Object Set categoryDict = CreateObject("Scripting.Dictionary") With Sheets("Product").Range("A1").CurrentRegion categoryCol = .Columns(2).Value For rowIndex = 2 To UBound(categoryCol, 1) If Not categoryDict.exists(categoryCol(rowIndex, 1)) Then Set categoryDict(categoryCo.. 2024. 2. 19. Dictionary를 이용하여 행/열 변환하기 Sub TransformAndWriteData() Dim Data As Variant ' 원본 데이터를 저장할 변수 Dim Temp As Variant ' 변환된 데이터를 저장할 변수 Dim dict As Object ' 딕셔너리 객체를 저장할 변수 Dim Valu As Long ' 데이터 열의 최대 개수를 저장할 변수 Dim i As Long ' 반복문에서 사용할 인덱스 변수 Dim x As Long ' 새로운 행의 인덱스를 저장할 변수 Dim xx As Long ' 데이터 열의 인덱스를 저장할 변수 ' Data 시트에서 데이터를 가져옴 Data = Sheets("Data").Cells(2, 2).CurrentRegion ' 딕셔너리 객체를 생성 Set dict = CreateObject("Script.. 2024. 2. 16. Field Object Field Object 일반 데이터 형식의 데이터 열을 나타냅니다. 속성 ActualSize property 필드 값의 실제 길이를 나타냅니다. 설정 및 반환 값 Long 값을 반환합니다. 일부 공급자는 이 속성을 설정하여 BLOB 데이터용 공간을 예약할 수 있으며, 이 경우 기본값은 0입니다. 주의 ActualSize 속성을 사용하여 Field 개체 값의 실제 길이를 반환합니다. 모든 필드의 ActualSize 속성은 읽기 전용입니다. ADO에서 Field 개체 값의 길이를 확인할 수 없으면 ActualSize 속성은 adUnknown을 반환합니다. 다음 코드는 ActualSize속성을 사용하는 간단한 예를 보여줍니다. Sub TestActualSize() Dim conn As ADODB.Connect.. 2023. 10. 3. 이전 1 ··· 3 4 5 6 7 8 9 ··· 42 다음 반응형
