word-vba

    0

    1答えて

    あなたがこの問題を手伝ってくれるかどうかは疑問でした。だから私はms単語で表を表示/非表示にするボタンが必要です。しかし、私はコードを表示または非表示にすることができます。現在、このコードは、私のテーブルが表示されます: Sub Loan1() 'Hides Sections Not Used in Expanded Form Dim CollapseRange1 As Range

    -1

    2答えて

    マクロの作成にはいくつかの助けが必要です。 Word文書からスタイル名を取得した後、他の単語文書に適用する方法はわかりません。

    0

    1答えて

    のWord 2016での配列の機能これは、基本的な質問であるならば、私は高度に謝罪を使用します。私はこのコミュニティとVBAの新人です。私はWord 2011で次のマクロを使用しています。 ActiveDocument.Save On Error Resume Next Dim saveName As String saveName = ActiveDocumen

    0

    2答えて

    インデックスカラーではなく、衣装RGBである3種類の色付き箇条書きからなるテキストですべての箇条書きを数えたいと考えています( 51,204,204 )。そして、各色の数を表示したいとします(例えば 42が青色) これは思い付きましたが、コンパイルされず、 "無効な修飾子"が ".Font"を指しています。 Sub GetNumberOfBullets() Dim objRange A

    0

    1答えて

    マクロの目的は次のとおりです:メインフォルダ内に、複数のサブフォルダ、サブサブフォルダ、サブサブサブフォルダなどがあります。メインフォルダには、異なる拡張子(例:doc、docx)のMS Office Wordファイルがありますサブフォルダ/サブサブフォルダ/サブサブサブフォルダ。すべてのWordファイルが1秒/ 3階層フォルダにあるわけではありません。それらのWordファイルは、数千から数万、ま

    0

    1答えて

    私は現在、ドキュメント内のすべてのコメントをつかむと、新しく作成されたExcelファイルでそれらを返すことになっている単語のためのVBAマクロを書いています。私はほとんど終わりましたが、段落の表示に問題があります。私は段落に対応するヘッダーをExcelにも入れたいと思う。これを行うには、段落ヘッダーを直接取得するか、段落の上にある最初のヘッダー関連の形式を見つけなければなりません。少なくともそれら

    2

    1答えて

    の多数を挿入しようとすると、VBAは、Word用のVBAで、次のことを実行しようとしたとき、私は神秘的な問題が発生したクラッシュ: Option Explicit Sub Test() Dim allHeadlines As Variant Dim i As Integer allHeadlines = ActiveDocument.GetCrossRefere

    0

    2答えて

    コードを書く手助けが必要です - 私はユーザーフォームを開発しました。 私は手紙の主なセクションを表示するには1つのコンボボックスを必要とする: 「私たちの決意に基づき、HE/SHEが還付を受けることが」 「私たちの決意に基づき、彼は/彼女は返金する権利がない」 が、私はまた、性別を選択するために、コンボボックスを必要とする: "HE" "SHE" これまでのところ、私は持っている: Privat

    3

    1答えて

    問題は、現在のWord文書をHTML形式で保存するためにマクロを実行しても、文書は開いたままですが元の.docx形式ではなく、.htm形式です。 マクロを実行した後にドキュメントを編集する場合、後で元の.docx形式にはならない。 コピーを別の形式で保存すると、元の形式を維持する方法についてのご意見をお待ちしております。ありがとう。ここで は、あなたがこの停止のようなことを行うと、コードなしでUI

    0

    1答えて

    私は簡単な質問をする必要があります。私は括弧で囲まれた数字の出現を文書で検索しています。 [4]または[14]などです。パターンを書いて1桁または2桁の数字を見つけることはできますが、どちらのパターンにも一致するパターンを使用するにはどうすればよいですか?ここで は一桁の場合のための私の作業コードです: set fnd=ActiveDocument.Range.Find While (fnd.E