word-vba

    0

    1答えて

    MS Word(2016)では、リボンの挿入タブを使用してイメージ(通常は簡単なもの)を挿入しようとしています。ブラウズダイアログが表示されることを期待してピクチャボタンをクリックしますが、何も起こりません。 さらに、VBA application.Dialogs(wdDialogInsertPicture).Showは、挿入画像のダイアログを生成できません。 思考?これらの設定の

    0

    1答えて

    Word文書をさまざまなクライアントから定期的に取得していて、時にはそれらを「読み取り専用」モードで私に送信します。 'View> Edit Document'を手作業で行っても大したことではありませんが、VBAコード内でこれを行う方法はわかりません。 文書を編集可能な状態で開くか、開いた状態で編集可能な状態に切り替えることで、自分のニーズに十分対応できます。 「readOnly = false」

    0

    1答えて

    私は従業員データとWordテンプレートを持つExcelファイルを持っています。私はメールをマージして、従業員の名前を尋ねるマクロを作成し、その名前に基づいてその従業員の従業員の詳細をExcelファイルからWordファイルに取り出します。 マクロは、レコードがExcelシートの上から下に来るとレコードを取得できます。ただし、現在検索されているレコードの上にあるレコードは取得されません。それは本当に問

    1

    1答えて

    Xeroのテンプレート請求書を作成しようとしています。 XeroはMS Wordテンプレート内の特定のフィールドを探し、指定されたフォーマットのテキストフィールドに割り当てられた変数を入力します。この出力 { MERGEFIELD InvoiceNumber \* MERGEFORMAT} :INV1234成功したテンプレートにフォーマットを持つ «InvoiceNumber» か名前:一

    1

    1答えて

    次のExcelコンテンツをワードドキュメントに変換したいと考えています。 新しい単語のレポートには、学生の名前、日付、件名、元の試験時間、新しい試験時間が含まれています。 私はこれを行う簡単な方法を使用しようとしました。範囲(a79:L85)&の範囲(A90:L92)を新しい単語文書にコピーします。しかし、それは動作せず、2つのテーブルを一緒に(同じ行に)結合します。 Sub ExcelRange

    1

    1答えて

    Word 2010ファイルで名前を付けて保存を無効にしますが、保存は許可します。つまり、ユーザーは既存のファイルを更新できるが、コピーは作成できないようにしたい。これは本当に回避策を知っている人には不可能だが、一般ユーザーにとってはこれをExcelでうまくやったが、VBAという言葉にはまったく新しいものだ。 私が意図したとおりにすべての作品ブランドの新しい文書に次の行を追加します。 Sub Fil

    0

    1答えて

    私は2つの範囲がExcelファイルにあります。 (A79-I84)& Excel.RANGE.copy.を使用して2つのテーブルをコピーし、wordファイルに貼り付けます。 しかし、2つの範囲は2つの別々のテーブルになり、元のExcelテーブル形式は新しい単語ファイルに継承することはできません。また、単語レポートの一部のセルは2行で表示されます。 結論として、レポートの形式は非常に面倒です。 2つ

    0

    1答えて

    マイタスク スプリットにWord文書を保ちます。 私はどこですか? 1つのドキュメントで基本的な例を試しましたが、配列がなくても機能しました。 Option Explicit Public Sub CopyWithFormat() Dim docDestination As Word.Document Dim docSource As Word.Document

    1

    1答えて

    Word文書を開いて操作するExcelでマクロを作成しています。コードはvbaエディタで単語を実行すると機能しますが、Excelのマクロにコードの行をインポートすると、実行時に438エラーが発生します。 Wordのマクロ Selection.Collapse WdCollapseDirection.wdCollapseEnd コードは、私は問題が選択オブジェクトであるか、私は参照をしないのです

    0

    2答えて

    私の文書では、「小」という表スタイルがあります。 Sub FormatTables() Dim t As Table For Each t In ActiveDocument.Tables If t.Style = "Small" Then t.Range.Font.Size = 8 End If Next End Sub