タグ付けされた質問 「macros」

マクロに問題があります。このコードを新しいマクロで使用して（Book1に新しいマクロを作成してそこにコードを貼り付けて）、このBook1からマクロをアクティブ化すると、コードは機能します。 私がアドインを使って解決したとき、事態はますます困難になっています（ "MyOwnGroup"と呼ばれるリボンの新しいグループには "MyOwnButton"というボタンがあります）。そして、私はあなたにここで本当にアドバイスが必要です。 だから、私がやろうとしていることと何が起こるのか。 1）アドインなしでどのように動作するか Book2で範囲を選択し、Alt + F8を押してBook1のマクロを有効にするだけです。選択した範囲がBook1にコピーされます。 マクロBook1の中にThisWorkBookがあり、Book2がActiveWorkBookです。私はマクロには2つの異なる参照があることを意味します：ThisWorkBook（コードがあるところ）とActiveWorkbookへの範囲のコピー時です。 2）アドインでは事情が異なります。今は3冊の本があります。 Book1（他の本から選択した範囲をこの本に貼り付ける必要があります） 選択された範囲のBook2 私のマクロのコードを含むWorkbook.xlam ThisWorkBookはコードを含むためWorkbook.xlsmになりました。 ActiveWorkbookは選択範囲を持つ本です。 Book1でどこに値を貼り付けようとしているのかはマクロでは知られていませんが、参照できません。 例えば Book1を開き（そしてWorkbook.xlam with macroも開きます）、次にBook2を開きます。 Book2で範囲を選択し、Book1をアクティブにして "MyOwnButton"を押します。 Book2から（activebookから）選択したものをBook1にコピーして貼り付ける必要があります（追加せずにThisWorkBook）。ただし、ThisWorkBookはWorkbook.xlamでActiveWorkBookはBook2なので、Book1への参照は取得できません。彼らはすでに関わっています。 この場合Book1の参照を取得する方法はありますか？

macros 

1つのグラフに複数のデータ系列があり、選択したグラフに基づいてグラフ内の約55行に太さを変えることができます。私は一度にすべての線の太さを調整する次のマクロを見ました。 Sub SetWeights() Dim srs As Series For Each srs In ActiveSheet.ChartObjects("Chart 1").Chart.SeriesCollection srs.Format.Line.Weight = 0.75 Next End Sub Excelワークシートのいずれかの列で定義されているように各線の太さが異なるようにする方法（マクロ）はありますか。 線の色やマーカーの種類を一度に変更する同様の方法はありますか（各行に異なるマーカーは不要です）。

microsoft-excel  vba  macros 

私はコンピュータ上のすべてのアプリを含むセルを持つスプレッドシートを持っています。マクロからリストから特定のアプリケーションを抽出し、残りのアプリケーションを削除して、必要なアプリケーションを同じセルまたは次のセルに表示するようにします。 たとえば、セルデータは次のようになります。 "Microsoft Office Project Professional 2010 - 14.0.6029.1000"; "Microsoft Office 2010用のセキュリティ更新プログラム（KB2598039）32ビット版"; "Microsoft Office 2010用のセキュリティ更新プログラム（KB2553091）"; "Microsoft Office 2010（KB982726）32ビット版の定義の更新"; "Microsoft Office 2010（KB2553455）32ビット版用の更新プログラム"; "Microsoft Office 2010用の更新プログラム（KB2494150）"; "Microsoft Office 2010（KB2553181）32ビット版用の更新プログラム"; "Microsoft Project 2010 Service Pack 1（SP1）"; "Microsoft Office Project"の任意のバージョンのセルを検索してから、残りのセルテキストを削除してMicrosoft Office Project Professional 2010 - 14.0.6029.1000を表示します。 マクロを作成したことがないので、どこから始めたらよいのかわかりません。どのように私はこれを行うことができますか？

microsoft-excel  macros 

列をフィルタリングしてから、値をコピーして貼り付けます。 しかし、範囲クラスのPasteSpecialメソッドが失敗したというエラーが表示されます。 Sub DD() ' ' DD Macro ' ' Rows("1:1").Select Selection.AutoFilter ActiveSheet.Range("$A$1:$H$132").AutoFilter Field:=8, Criteria1:="1" Columns("A:A").Select Selection.Copy ActiveSheet.Range("$A$1:$H$132").AutoFilter Field:=8 Columns("I:I").Select ActiveSheet.Paste Range("I6").Select End Sub Sub dds() ' ' dds Macro ' ' Rows("1:1").Select Selection.AutoFilter ActiveSheet.Range("$A$1:$I$132").AutoFilter Field:=8, Criteria1:="1" Columns("A:A").Select Selection.Copy ActiveSheet.Range("$A$1:$I$132").AutoFilter Field:=8 Columns("I:I").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Range("J9").Select …

microsoft-excel  vba  macros 

インデックスカードの各面に1つずつ、2つのスタイル（テキストサイズ、配置など）を作成することで試しましたが、垂直方向の配置を設定することはできません。スタイルと垂直方向の配置の適用を組み合わせるためにマクロを作成する必要がありますか。それとも、Wordでページを交互に配置するように自動的に設定するのですか。 垂直方向の配置については、1ページの[改ページ]または[空白のページ]をクリックして次のページに移動した後、テキストが1行上に移動したため、中央揃えされませんでした。カーソルをテキストの末尾に置き、deleteキーを押してそれを下に移動させる必要があります。改ページ/空白ページ以外にこれを回避できるものがありますか。 問題を説明する短いGIF： http://i.imgur.com/e59goXX.gifv

microsoft-word  macros  microsoft-word-2013 

私は自分のマイクを無効にするマクロを設定しようとしているので、毎回窓の迷路を移動する必要はありません。サウンドウィンドウが開くまですべてうまくいきます。毎回ランダムな場所で開きます。一貫して開くことができる方法はありますか？ Windows 10 Home 1803を実行しています。 （比較のために、マウス座標ウィンドウは同じ場所にあります）

windows  windows-10  macros 

私は比較的Excelに慣れていないので、同一人物の複数の休日の行を1行に統合する方法を探しています。これがサンプルデータの一部です。 この人のために1行になってしまいたいのですが、NumOfDaysが追加されているので、この例では "Test Person"のNumOfDays列に7がありますが、1行のみです。どうすればよいかわからないが、それほど難しいことではないと想像できる。 それが（少なくとも私にとっては）複雑になるのは、2016年30月9日までHolidayToにしか興味がないということです。したがって、たとえば、誰かがHolidayFrom 28-09-2016とHolidayTo 03-10-2016を持っている場合、これは6 NumOfDaysとしてリストされますが、私は30日まで3（28/29/30）を記録したいだけです9月 Excelでこれをすべて実行できる方法はありますか。 （すべての日付はイギリス形式、dd / MM / yyyyです）

microsoft-excel  macros  date 

こんにちは私は誰もが私はカスタムリストに勝るために選択を追加するマクロを作成するのを助けることができるかどうか疑問に思いました。通常これを行うには、1つの列から一連の行を選択し、次にファイル、オプション、詳細設定、一番下までスクロールして[カスタムリストの編集]をクリックします。マクロ作成者がオンにした状態でこれを実行すると、選択した特定のセルに関連する非常に単純なスクリプトが得られます。カスタムリストに追加するために現在選択しているものがすべて使用されるように、コードを微調整したいと思います。そのように私はいつもJ4-J9範囲に縛られていません。以下は私が受け取るコードです。 Sub Customlistadd() ' ' Customlistadd Macro ' ' Keyboard Shortcut: Ctrl+Shift+I ' Application.AddCustomList ListArray:=Range("J4:J8") End Sub それはj4：j8の代わりに現在の選択を追加するのと同じくらい簡単ですか？もしそうならどのように私は正確にそれを書くのですか？現在のセクションを保持するために最初に変数型を宣言する必要がありますか？これまでに見たほとんどすべての例では、現在行っている選択範囲を保持するために変数を使用する傾向があります。ありがとうございました。

microsoft-excel  microsoft-excel-2010  macros  vba 

私はoutlookマクロを使ってすべてのドラフトを直接outboxに移動してきました。 Sub SendAllDrafts() ' Send the messages in the Drafts folder (ignore any subfolders) If MsgBox("Are you sure you want to send ALL the items in your default Drafts folder?", _ vbQuestion + vbYesNo) <> vbYes Then Exit Sub Dim fldDraft As MAPIFolder, msg As Outlook.MailItem, intCount As Integer Set …

microsoft-outlook  vba  macros 

Mac OS X 10.10（Yosemite）でキーボードを設定して、指定した記号を書き込むためにファンクションキーをマップするにはどうすればよいですか？ \(押すたびに書きたいF1。

macos  keyboard  macros 

特定の日付のデータを検索して計算するExcelファイルがあります。次のように機能します。特定のセル（入力）に日付を入力すると、同じシートに必要なデータが表示されます（20セル）。（計算などは別のシートで行われます） 次に、自分で日付を入力して手動でデータをコピーすることなく、このすべてのデータを要約したExcelファイルを作成したいと思います。 マクロが行うべきことは、日付ごとにその特定の入力セルの値を変更し、出力データをコピーして新しい日付（日付の隣）に貼り付けることです。 これをどのように行うことができますか？私はずっと前にマクロを扱っていましたが、ほとんどの構文を忘れていました。

microsoft-excel  macros  database  paste 

Outlook 2013で次のような内容の電子メールを受信した場合： Please call me. -Bill そして、私はそのメールを転送しに行きます。 _________________________________ From: Bill Sent: Monday, January 7 2019 11:00 AM To: Herbert <Herbert@Domain.com> Subject: Free stuff Please call me. -Bill Outlookで作成された小さなヘッダーを編集して置き換える場合 From: Bill と From: Bill <Bill@Domain.com> どうすればいいですか？私はマクロを受け入れ、ウェブサービスを交換します。 ユースケースは、カスタマーサポートチケットを管理するためにサードパーティのクラウドサービスにメールを転送するルールを設定することです。ただし、サードパーティのクラウドサービスは、元の送信者の電子メールアドレスを知る必要がありません。Outlookは、From作成した小さなヘッダーの行の電子メールアドレスを削除するためです。また、添付ファイルとしてメールを転送することは、そのサービスではうまく機能しないため、そのまま転送したいと思います。 私はこのルートを試しましたが、Fromメールアドレスに対して適切に機能させることができません。 また、メールの本文を置換しようとしましたが、本文にはその小さなヘッダーが含まれていません。プログラムでアクセスする方法がわかりません。

microsoft-outlook  macros  exchange  microsoft-outlook-2013 

次の見出し段落を見つけ、それをタイトルケースに変換するLibreOffice Writerマクロを持っています。現在、ファイルの最後に到達するまで繰り返し呼び出す必要があります。私はすべてを実行するループを設定しようとしていますが、EOFで停止します。しかし、ループは機能していません。 任意の助けをいただければ幸いです。これが私が持っているものです。 sub Convert_Headings_to_Title_Case rem define variables dim document as Object dim dispatcher as Object Dim Proceed As boolean rem get access to the document document = ThisComponent.CurrentController.Frame dispatcher = createUnoService("com.sun.star.frame.DispatchHelper") rem loop not working Do ' Call other macro to find next Heading: Heading_findNext dispatcher.executeDispatch(document, ".uno:EndOfLineSel", "", 0, …

macros  libreoffice  libreoffice-writer  eof 

gpp（Generic Preprocessor）を使用して、の前後にいくつかの追加情報を追加しようとしています#include。コードは次のとおりです。 \define{\code{filename}}{PRE \include{\filename} POST} ==> \code{./t.txt} <== そして出力： $ gpp -T t.mkd -o t.out t.mkd:2: error: Requested include file not found 私が参照に問題があることを考えている\filenameとの\includeよう\filenameに一度だけ評価されますが\code（私が正しくドキュメントを理解していれば）メタマクロを定義するときにそれらのパラメータを保存する一方で呼ばれています。 私はさまざまなものを試しましたが、これは明らかにRTFMの種類の質問ですが、ツールの私の使用目的はツールを学習するのに多くの時間を使用することを正当化するにはあまりにも制限されています1つが十分に機能するまで-後でさらに必要になった場合はかなり有能だと思われるため、gppでテストを開始しました）。 PS：関連するタグがなくて申し訳ありません。タグを作成するのに十分な評判がなく、ポップアップしたのはのみでしたmacro。

macros 

私はいつも同じ内容を持っているが、異なるクライアントグループに関する手紙を持っています。 私の質問は、変数データを開くときにすぐに変数データを要求するメーリングを作成できるかどうかです。例：手紙の著者、関係する製品番号など。 refフィールドとaskフィールドを設定してみましたが、うまく機能せず、自動的に開かず、askウィンドウが次々とポップアップします。 さらに、メーリングのデータのソースを調整できる必要があります。また、クライアントのリストが長いため、それらを除外し、関係者に「X」を設定します。ソースを自動的に調整し、コンピューターからExcelリストを選択できるマクロを作成したいと思います。 簡単に言うと、ダイアログポップアップウィンドウに次のものが含まれます。 可変データを入力する3つのフィールド Excelリストを選択するための機能/マクロ有効化ボタン 「X」のExcelリストをフィルタリングする機能/マクロ起動ボタン（またはこれが自動的に実行された場合はさらに良い） 「確認」ボタン 私のアイデアが何であるか想像して、それが可能であれば、そして可能であれば、それを行う方法を教えてください あなたが私のすべての質問への答えを知らないなら、私は本当に私が必死になっているのであなたが知っていることに答えることができてうれしいです よろしくお願いします！

microsoft-excel  microsoft-word  macros  popups  dialog