word-vba

    0

    1답변

    Word 문서의 테이블 스타일을 업데이트 한 다음 너비를 17cm로 변경하는 코드가 있습니다. Sub ConvertTables() Dim tbl As Table For Each tbl In ActiveDocument.Tables tbl.Style = "K2 Table" Next Selection.Tables

    0

    1답변

    또 다른 전문가가 될 수 있습니다! MSWord 2016 문서의 표에서 형식이 지정된 항목을 추가하는 매크로를 개발하려고합니다 (형식이 지정된 항목의 경우 normal.dotx에 저장되는 자동 고침 라이브러리). 문서에는 두 개의 열이 포함 된 표가 있으며 왼쪽 열에는 짧은 텍스트가 있고 오른쪽 열에는 autocorrect 항목의 서식이 지정된 긴 텍스트가

    0

    1답변

    범위를 설정 했으므로 myRange이라고합시다. 또한 짧은 문자열 배열을 가지고 있는데, searchArray이라고 부르 자. 각 문자열의 모든 인스턴스에 대해 myRange 내에서 검색하고 텍스트 색을 변경하려고합니다. 내가 겪고있는 문제는 검색을 실행 한 후 매번 범위를 재설정하는 방법입니다. 나는 현재 시도하고있는 무슨이 그러나 Dim searchRa

    1

    1답변

    저는 VBA 멍청한 분이시기 때문에 약간의 도움이 필요합니다. 중요한 경우 Mac에서 Microsoft Word 2016을 사용하고 있습니다. 편지 병합을 사용하여 doc이라는 단어를 만들고, 결과 단어를 여러 페이지로 나눌 필요가 있습니다. 페이지를 분할하는 VBA 코드가있는 this 페이지를 찾았습니다. 내가 가지고있는 유일한 문제는 내 컴퓨터의 임의의

    0

    1답변

    폴더의 파일 목록을 특정 순서로 목록 상자에 추가하려고합니다. 현재 숫자 태그를 기반으로 탐색기보기에서 파일을 정렬 한 다음 각 파일의 이름을 (1) .docx, (2) .docx, (3) .docx 등으로 이름을 바꿉니다. 내 문제는 (10) .docx와 (11) .docx를 칠 때 일어난다. 순서는 알파벳이 아니고 숫자가 아니기 때문이다. 파일이 목록

    1

    2답변

    Word 문서에서 단어를 뒤집고 싶습니다. "elpmaS texT"는 "Sample Text"가됩니다. For Each word In ActiveDocument.Words word = StrReverse(word) Next word 가 작동하지 않습니다하지만 : 나는 이런 식으로 뭔가를 시도했다. 어떻게하면됩니까? 각 루프를 사용하는 경우

    0

    1답변

    내 요구 사항은 워드 문서의 테이블에서 선택한 셀의 날짜 형식을 변경하고자하는 것입니다. 나는 아래 코드를 시도했다. 단일 날짜를 선택하면 날짜 형식을 변경할 수 있습니다. 그러나 선택한 날짜 형식을 변경할 수는 없습니다. 테이블에있는 세포의. Sub ConvertDateFormat() ' ' Date formating ' Dim oCl As Wo

    0

    1답변

    달러 통화 형식을 사용했습니다. 그것은 잘 작동합니다. 유로, 파운드와 같은 다른 통화에 대해 수행하려는 동일한 통화 서식. 다음은 내가 시도한 코드입니다. Pls 도움. 코드 :는 Sub CurrencyFormat_UK() ' ' Currency formating ' Dim oCl As Word.Cell Dim oRng As Range '

    0

    1답변

    Selection.EndKey Extend : = wdExtend에 문제가 있습니다. 윈도우 7 64 비트, 내 프로젝트 참조 대화 상자에서 확인 다음 참조와 오피스 2013 : 마이크로 소프트 오피스 15.0 개체 • 일반 • OLE 자동화 • 마이크로 소프트 워드 15.0 개체 라이브러리 • 응용 프로그램 에 대해 VBA • 라이브러리 문장 단락 하나

    0

    1답변

    Word에서 활성 문서를 @ yahoo.com으로 검색하고 모든 인스턴스를 [email protected]으로 바꾸고 싶습니다. 나는 *@yahoo.com를 사용하는 경우는 명령에서 @ yahoo.com Sub kiffin() With Selection.Find .ClearFormatting .MatchWildcards =