word-vba

    1

    2答えて

    テンプレートがあり、ヘッダーに画像が含まれているページがあります。これらの画像を私のActiveDocumentにコピーしたいと思います。 Set doc = ActiveDocument strTemplate = "C:\Users\rajtilak\Desktop\Report.dotx" Set docTemplate = Documents.Open(strTemplate) Se

    0

    1答えて

    それぞれ2つのチェックボックスを持つ4つの列があります。各セットをループして両方のチェックボックスがオンになっているかどうかを確認しました。 msgboxに1セット内に2つのチェックボックスをチェックしてアイテムの名前を入れてください。 Set oRow = oTable.Rows Set oTable = doc.Tables(3) For Each oRow In oTable.Rows

    2

    1答えて

    Word文書でoleオブジェクトを検索しようとしていますが、それはInlineShapes(1).GroupItemsのようです。しかし、それは私にエラーを与えるので、グループ項目にアクセスできません。 Sub findOle() Dim shp As GroupShapes Dim c As Integer Set shp = ActiveDocument.Inli

    0

    1答えて

    連続した隣接文字を「単語」として認識するためのVBA文があるかどうかは分かりません。途中で(言葉として)? 私の研究は、句読点や非アルファベット文字を無視したいと思うほとんどの人は、文字をトリミングまたは選択解除することに焦点を当てていることを示しています。私はがのこれらの文字を保持したいが、私はまた、非アルファベット文字を無視してを無視してマクロが何個の "単語"を選択するかを決定したい。 ;

    1

    2答えて

    Excel文書の範囲を新しい文書にコピーしたいと思っています。ここに残したくない範囲があります。 、私は私のVBプログラムを実行し、自動的に新しい単語の文書に貼り付けます。 ただし、この範囲をコピーして新しい単語文書の画像形式に貼り付けています。 に単語表形式を貼り付けたいですが、単語表形式は横長A4の単語形式に最適です。これを行うにはどうすればいいですか?ここで が私のコードです: 'Tbl.C

    2

    1答えて

    excelが編集モードであるかどうかを調べたいと思っていますが、これはthreadを見て修正しようとしましたが、編集モードでは、それを実行して終了編集モードはまだ編集モードであると言い、それを再実行します。それはであることを把握することもひどい長い(15秒)をとります。 '********************************************************* '***

    2

    1答えて

    私はVBAと一般的なコーディングの初心者です。私はVBAコードに問題があります。 私は、2つのフォームフィールド(eleves_nomとeleves_numfiche)でcommand_click()を使用してWordファイルに置く必要があるAccessデータベースに2つの入力可能フィールド(f_autpar_nomとf_autpar_fiche)を持っています。次に、私のWord文書が開き、「こ

    -3

    1答えて

    私は、1つのMS Word文書をカスタム区切り文字を使用して複数に分割します。私はMS Word形式で複数のファイルを作成することができますが、代わりに複数の.txtファイルを作成したいと思います。 私が今使っているコードは次のとおりです。 Sub SplitNotes(delim As String, strFilename As String) Dim doc As Document

    -1

    1答えて

    <editBox id="layout_deck_search_replace_locate_Caption_item" label="Caption Item" showLabel="false" sizeString="xxx" maxLength="3" onChange="layout_se

    1

    1答えて

    Word 2010でマクロを作成する必要があります。この場合、拡張子なしでファイル名のフッターが追加されます。 私はあなたがDOCVARIABLEフィールドを使用するときに拡張子のないファイル名を表示するコードが見つかりました: フーツ: Sub autofilenamefooter() Dim fname As String fname = ActiveDocument.Name fna