홈>
테이블이 MS WORD에 있지만 VBA를 사용하여 반복하려고합니다. 현재 소스에서 데이터를 추출했으며 MS 단어로 테이블에 입력하고 싶습니다. 테이블에는 여러 행과 2 개의 열이 있습니다. 데이터는 각 행의 두 번째 열 안에 입력됩니다. 현재 많은 데이터가 있으며 각 행 번호를 계속 지정할 수 없으므로 셀이 채워질 때마다 추가 행을 추가하는 방법을 찾고 싶습니다.
Excel에서이 코드 세트는 작동하지만 단어로는 작동하지 않습니다.
Do While (Len(Worksheets("Overall Performance").Cells(NewRecordRow, 12).Value) <> 0)
NewRecordRow = NewRecordRow + 1
Loop
현재 이것은 내가 가진 것입니다.
Dim intNoOfRows
Dim intNoOfColumns
Dim objWord
Dim objDoc
Dim objRange
Dim objTable
intNoOfRows = 1 (Initially 6 because I Preset it)
intNoOfColumns = 2
Set objWord = CreateObject ("Word.Application")
Set objDoc = objWord.Document.Add
objDoc.Tables.Add objRange, intNoOfRows, intNoOfColumns
Set objTable = objDoc.Tables(1)
objTable.Borders.Enable = True
For Each cell(intNoOfRows,2) in objDoc.Table(1).range.cells
If Len(cell.range.text) <1 Then
intNoOfRows = intNoOfRows + 1
End if
Next
ObjTable.Cell(intNoOfRows,2).Range.Text = "ABC"
- 답변 # 1
관련 자료
- python - 배열이 포함 된 목록에 대한 빈도 표를 만드는 방법
- javascript - 안녕하세요, 제 목표는 "확인란 생성"버튼을 누르면 입력 유형 텍스트를 사용하지 않고 ID가있는 확인란이 자동으로 생성됩니다
- 특정 행과 열이있는 html 테이블을 만드는 방법
- c# - 문자열에는 숫자, 문자 및 기호의 조합이 포함됩니다 숫자를 기준으로 정렬하는 최적의 방법은 무엇입니까?
- sql - 두 날짜 사이의 매초 날짜 테이블 만들기
- postgresql - 임시 테이블을 만들고 삽입 한 다음 pgsql 함수 내에서 선택합니다
- vba - vb powerpoint 매크로 - 테이블 생성 및 참조
- mysql - 다른 테이블의 데이터를 자동으로 테이블에 삽입하는 방법은 무엇입니까?
- JavaScript - 자바 스크립트 - 개체에서 테이블을 만드는 방법은 무엇입니까?
- sqlite - 변수를 사용하여 sqlite3 python에 존재하지 않는 경우 테이블 생성
- visual studio - 팩트 테이블 열을 기반으로 새 계산 된 측정 값 만들기
- 파이썬에서 자동으로 클래스의 인스턴스를 동적으로 생성하는 방법
- python - 독립 실행 형 설치 가능한 하위 패키지를 포함하는 name_space 패키지 생성
- javascript - 입력 상자가 여러 개인 2 열 테이블을 만드는 방법
- python - 주파수 테이블에서 pdSeries를 만드는 방법은 무엇입니까?
- 결과에 특정 수량의 숫자가 포함 된 경우 선택 (mysql)에서 문자 제거
- java - 표 줄 문자가 "?"로 대체됩니다 mvn 패키지 이후
- javascript - 필드 이름에 실행중인 인덱스를 포함하는 양식 데이터를 만드는 방법은 무엇입니까?
- ms access - 자동으로 재설정되는 시퀀스 열을 만드는 방법이 있습니까?
- regex - 문자열에 RegExp에서 전달 된 문자가 포함되어 있는지 확인하는 방법은 무엇입니까?
관련 질문
- vba : 단어 열의 배경색을 변경하는 매크로 작성
- vba - PDF를 여는 방법?
- vba - 제한된 편집 모드에서 Word-Ribbon에서 사용자 정의 글꼴 그룹을 활성 상태로 유지하는 방법이 있습니까?
- vba - PDF로 인쇄하는 동안 Excel 시트에서 파일 이름을 바꾸는 Word 매크로
- 텍스트 상자에 특정 텍스트가 포함 된 Microsoft Word (VBA)에서 페이지 삭제 시도
- 사용자 양식 목록 상자에서 선택 항목을 글 머리 기호 MS-Word-VBA로 채우는 방법은 무엇입니까?
- Word VBA에서 단어 계산 및 새 줄 무시
- 지정된 단어 (포함)의 Word에서 VBA 복사
- vba - 문서 서명을위한 OLE 자동화 WordBasic 매크로
- vba - DOS 문서 인라인 각주를 MS Word 페이지 하단 각주로 변환하도록 매크로 수정
내 테스트에 따르면 다음 코드는 내 측면에서 잘 작동합니다 (핵심 포인트는InStr ([시작], 문자열, 하위 문자열, [비교])).
전체 코드 작업 (테스트 목적으로, 먼저 N 개의 행과 세 개의 열로 된 테이블을 수동으로 작성하십시오) :
다음 코드도 사용할 수 있지만 메모리 문제가 발생하여 권장하지 않습니다.