vba

1열

1답변

특정 규칙에 대해 켜기/끄기 사이를 전환하는 스크립트를 작성하려고하지만 작동하지 않는 것 같습니다. 여기에 내가 가진 무엇 : Public Sub ToggleFwd() Dim olRules As Outlook.Rules Dim olRule As Outlook.Rule Set olRules = Application.Session

1열

2답변

VLOOKUP과 같은 기능 : VBA Excel에서 긴 목록의 대/소문자를 선택하십시오.

Excel VBA에 여러 If ... Then 문 대신 Select Case 구조를 사용할 수 있습니다. 그러나이 사건이 긴 목록 일 경우이 업무를 어떻게 효율적으로 수행 할 수 있습니까? 열 AB에서 소녀 이름의 Code ID Girls Names 0001 Sophia 0002 Emma 0003 Olivia 0004 Isabella 0005 Av

2열

2답변

회색 대신 흰색으로 바뀌는 글꼴 색

코드 작성 방법을 배우는 중이지만 왜 내가 많은 시간을 이미 거쳤는 간단한 작업에 실패했는지 알 수 없습니다. 코드는 글꼴 색을 회색으로 변경하지만 대신 흰색으로 변경됩니다. For j = 1 To 12 With wsTank.Cells(first(i), j) .Value = "NIL" With .Font .ThemeColor = xlThemeC

1열

1답변

중첩 된 사전 : 오류 457이 :이 키가 이미 수집

내가 기본적으로 VBA에서 사전 구조의 사전을 만들려고 해요의 요소와 연결되어, 나는 3 열 테이블로 시작 : 제품 ID | 고객 ID | 소스 1 | 1 | A 1 | 2 | A 2 | 1 | A 3 | 1 | B 그리고 키를 사용자 ID로 사용하는 주요 사전 "DicByUser"로 변환하고 항목은 클라이언트가 방문한 제품과 소스 코드 항목을 키로 포함하

-1열

1답변

비어 있지 않은 셀을 다른 시트로 복사하는 열을 어떻게 찾을 수 있습니까?

간단한 VBA를 쓰려고하는데, 스프레드 시트의 모든 열을 가로 질러서 값이 있으면 Sheet2로 복사하여 하나의 긴 목록을 만듭니다. 는 어디 선가 잘못 가고있다, 나는 누군가가 내가 잘못거야 어디 알려 수있을 것만큼 간단 것으로 기대했다. Dim c As Integer Dim r As Integer Dim w As Integer Dim l As In

1열

2답변

은 삭제 ReDim을에서 배열 대

는 배경 : 난 그냥 this question을 가로 질러 와서 나를 배열에 대한 erase 한 Statment을 배울했다. 나는 항상으로 재설정하려면 다음을 사용하고 있습니다 : Sub TestWithRedimOnly() Dim ExampleArray() As String ReDim Preserve ExampleArray(1) Exam

0열

1답변

VBA에서 비 특정 셀을 기반으로 가변 카운터를 설정하는 방법은 무엇입니까?

기본적으로 실행될 때 차트를 만들 데이터 범위를 선택하는 매크로를 설정하려고합니다. 데이터의 열 수는 2로 설정되지만 더 많은 데이터가 추가되면 행의 양이 변경됩니다. 여전히 ... 그래프 (구문이 그 선택을 해제 할 수 있습니다를 만드는 그 선택을 사용하여 다음 Sheets("Risk ranking").Range("C2:D" & counter & ").s

-2열

1답변

테이블의 각 셀을 반복합니다.

루프 할 테이블이 있습니다. 활성 셀에 1이 들어 있으면 테이블 외부의 셀에서 열 표제가 반환되고 쉼표로 구분 된 목록에 놓입니다. 나는 그 루프가 첫 번째 행 셀에서 셀에 걸쳐 계속 진행하고 각 쉼표로 빌드 할 쉼표로 구분 된 목록을 찾고있다. 일단 루프가 행의 끝에 도달하면 다음 행으로 드롭 다운하여 동일한 프로세스를 계속 수행해야합니다 (그러나 2 행

0열

1답변

WorksheetFunction.Average 및 새 시트에 붙여 넣기

나는 sheet1에 대한 데이터 집합을 가지고 있으며 나는 모든 48 개의 값의 평균을 취하여 sheet2에 붙여 넣으려고합니다. 런타임 오류 '1004'가 나타납니다. WorksheetFunction 클래스의 Average 속성을 가져올 수 없습니다. 나는 다른 솔루션을 찾고 있지만 하나를 생각해 낼 수 없었다. 내 코드에 대한 도움을받을 수 있습니까?

5열

2답변

변수의 VBA 스토어 msoThemeColor

차트 색상 및 패턴이 동적으로 변경 될 수 있도록 변수에 mso 테마 색을 저장하려고합니다 (이 경우 변수 Th). 여기에 내 현재 코드가있다 : Dim Th As Long Th = "msoThemeColorAccent" & ActiveCell.Offset(-5, 0) If ActiveCell = "Realized" Then ActiveChar