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

コンピュータサイエンスのマクロは、定義されたルールと手順に従って特定の入力シーケンスを特定の出力シーケンスにマッピングする方法を指定するルールまたはパターンです。質問がMicrosoft Office製品に関するものである場合は、このタグの代わりに[vba]タグの使用を検討してください。これにより、人々はより効率的に回答し、質問をフィルタリングできます。

3
デスクトップマクロレコーダーWindows
デスクトップで(画像に基づいて)行うアクションを「記録」できるソフトウェアを聞いたことがあるので、何かをして「記録」すれば、あなたと記録したexecute itものを後で再現できます。 このソフトウェアの名前を知っていますか?

1
特定のセルから開始して別のシートにデータを転送し、(後続の呼び出しで)下方向に動作するマクロを作成する方法は?
SHEET1にDATA INPUTセル(セルB3)があります。マクロボタンを押すと、SHEET1のセルB3のデータがSHEET2のセルC5にコピーされ、SHEET1のセルB3に入力されたデータが削除されるマクロコードを作成します。そして、別のデータを入力してボタンをもう一度押すと、データはSHEET2の次の行(この場合はセルC6)にコピーされます。次に、セルC7、C8など。 このためのコードを作成しようとしましたが、セルC5で開始することはできません。常にセルC2から始まり、下向きになります。「Startrow」などのコードを調べてみましたが、機能しません。 以下のコードをご覧ください: Sub Button1_Click() Response = MsgBox("Are you sure?", vbYesNo) If Response = vbNo Then Exit Sub Dim nextrow As Long nextrow = Worksheets("Sheet2").Cells(Rows.Count, "C").End(xlUp).Row + 1 Worksheets("Sheet1").Range("B3").Copy Worksheets("Sheet2").Range("C" & nextrow) Worksheets("Sheet1").Range("B3").ClearContents End Sub

2
Excel 2013のうるう年に基づいて単一の列データを複数の列に分割する
気象データで構成されるMS Excelのファイルは約100個あります。 私は毎年データを必要としていますが、ファイルには約140年のデータを持つ単一の列があり、手動でのコピーと貼り付けは非常に時間がかかります。したがって、1年(365セル)のデータが連続した行にコピーされるようにドラッグできる単純なコマンドを使用して、データを分割する方法はありますか。 また、3年ごとのデータは、残りの365セルではなく366セルでなければならないというyear年の問題があります。

1
Excel 2010:データソース検証ワークシートの変更に基づいたドロップダウンリストの動的更新
複数のデータ検証リストのデータソースを設定するためのワークシートが1つあります。つまり、このワークシートを使用して、他の複数のワークシートにドロップダウンリストを提供しています。 データソースワークシートの1つまたは複数の変更のいずれかで、すべてのワークシートを動的に更新する必要があります。これは、ブック全体のイベントマクロを使用する必要があることを理解できます。 私の質問は、これをどのようにしてブック全体で「オフセット」式を維持するのですか? どうも 私の質問をサポートするために、私はそれを機能させようとしているコードを入れました: 以下の情報を提供しました: 私はドロップダウンリストの擬似動的更新のためにそのような式を使用しています、例えば: = OFFSET(MyDataSourceSheet!$ O $ 2; 0; 0; COUNTA(MyDataSourceSheet!O:O)-1) 私はピアソンの本のイベントの章を調べましたが、これにはあまりにも初心者です。 このマクロを理解し、データソースと同じワークシートのドロップダウンリストを使用してテストとして正常に実装しました。私のポイントは、これを完全なワークブックに展開する方法がわからないということです。 データソースワークシートに関連するマクロ: Option Explicit Private Sub Worksheet_Change(ByVal Target As Range) ' Macro to update all worksheets with drop down list referenced upon ' this data source worksheet, base on ref names Dim cell As …

1
さまざまな条件に基づいたExcelの自動日付計算機
各セルにリンクされた自動日付計算機能を備えたExcelシートがあります。この関数を異なる条件に基づいて機能させたい。例:(2つの条件AとBがあるとしましょう)条件A(AをA1セルに入れます)の場合、日付関数を[DATE(YEAR(B2)、MONTH(B2)、DAY(B2 )+5)]および条件B(BをA2セルに配置します)の場合、日付関数を[DATE(YEAR(B2)、MONTH(B2)、DAY(B2)+10)]にする必要があります。これは、入力した条件に基づいて1つのシートでExcelで実行できますか?どうもありがとう。 ヌプル

0
Excel 2010では、ファイルを再度開かずに別のブックからマクロを表示できない理由
Excel 2010でタブ区切り形式のtxtファイルを開きます。その後、.xlsmとして保存します。開いている別のブックからマクロを適用したいのですが、新しく保存したファイルのマクロリストが空白のままです。.xlsmファイルを閉じたり開いたりせずに「更新」する方法はありますか?モジュールを個人用リストに保存しても役に立ちません。 編集:問題はtxtファイルが開かれている方法にリンクされているようです。空のブックを作成して、txtファイルをインポートすれば、問題ありません。txtファイルを右クリックして[Excelで開く]を選択すると、問題が発生します。なぜ異なる振る舞いですか?

0
列の順序に従ってコピーして貼り付ける
シリーズBからデータをフェッチし、シリアルAのシリアルに従って自動的に貼り付けるマクロが必要です。AシリーズBとシリーズAのデータは同じですが、シリーズBは注文されていません。だから私はシリーズAの順序に従ってシリーズCの列にシリーズBのデータを置くものを探しています それは可能ですか? シリーズBはシート1の列Fにあります。番号は1〜30(F2:F31)で、昇順です。 シリーズAはシート1の列Aにあります。満たされるターゲットセルは(A2:A31)です。 シリーズCはシート2の列Aにあります。番号は1〜30ですが、順序は異なります(1,30,25,16,14,8など)。(A2:A31) PS:画像を投稿できません。十分な評判

1
強調表示されたテキストのセットをALLCAPSするためにphraseexpressを使用する方法は?
特定のテキストをハイライトし、Ctrl+ Shift+ Uを押してすぐにすべての文字を大文字に戻したい マクロマニュアルを読みましたが、まだこれに対する簡単な解決策が見つかりませんでした 参考までに、これは私の設定がどのように見えるかです これをどのように正確に行いますか?

1
Excel 2010の数式:文字列値に基づいて動的な列を検索し、その列内の「0」の数をカウントする
これを解決するための多くの異なる可能性のある手段を調べてみました。INDEX、MATCH、DCOUNT、INDEX&MATCH付きHLOOKUP、INDEX&MATCH付きCOUNTIF。私が探しているのは、他の列が追加/削除されると移動する列にフォーカスを設定する方法です。固定文字列値「スマートフォン」である列ヘッダーがあります。行は私の地域内のさまざまな店舗であり、シートは在庫レベルと、地区マネージャーのために追跡する必要があるその他の指標用です。データは、数式を使用しているサマリーレポートとは別のシートに保持されます。 理想的には、さまざまな数式に再利用できる数式スニペットがありますが、当面の必要性は(私の正気のために)この数式が「列をたどる」ことができるようにすることなので、列の文字を変更し続ける必要はありませんほぼ毎月。単純な数式は、指定された列の0の数をカウントします。 =COUNTIF('Data'!AG:AG,0) みんなありがとう!

1
コンテンツをクリアするときにExcel VBAで「ランタイムエラータイプ13タイプの不一致」を解決するにはどうすればよいですか?
いくつかのセルからコンテンツをクリアするVBAコードがあります。これらのセルのほとんどにはデータ検証があるため、オプションのリスト(yes、no、NA)から値を選択する必要があり、残りはすべてのタイプのデータに対して開いています。 コードを初めて実行するためのボタンをクリックすると、次のエラーが表示されます([終了]をクリックしても、ボタンをクリックしてもエラーは表示されません)。 私は他の質問をチェックし、問題をグーグルで調べました。異なるタイプの値を追加することと関係があるようですが、私は内容をクリアするだけなので、これは問題ではないはずです。 これが私のコードです。エラーは最初のクリアコンテンツで発生します(セルC5:D5の行8): Sub ReiniciarRef() ' ' ReiniciarRef Macro ' ' Range("C5:D5").Select Selection.ClearContents Range("C7").Select Selection.ClearContents Range("C9:G10").Select Selection.ClearContents Range("C13:G13").Select Selection.ClearContents Range("C16:G16").Select Selection.ClearContents Range("C18").Select Selection.ClearContents Range("C23:D23").Select Selection.ClearContents Range("C25").Select Selection.ClearContents Range("C27:G28").Select Selection.ClearContents Range("C31:G31").Select Selection.ClearContents Range("C34:G34").Select Selection.ClearContents Range("C36").Select Selection.ClearContents Range("C41:D41").Select Selection.ClearContents Range("C43").Select Selection.ClearContents Range("C45:G46").Select Selection.ClearContents Range("C49:G49").Select Selection.ClearContents Range("C52:G52").Select Selection.ClearContents Range("C54").Select Selection.ClearContents Range("C59:D59").Select Selection.ClearContents …

1
Wordで無効になっているマクロ
Wordのマクロが突然無効になる理由がわかりません。テンプレートの場所と私のドキュメントを信頼できる場所として配置すること、すべてのマクロを有効にすることなど、すべてを試しました。まだ実行されません。どんな助けも大歓迎です。ありがとう 今朝は順調だった。その後、normal.dotmテンプレートにいくつかの新しいマクロを作成しました。後でドキュメントで実行してみましたが、無効になっていると表示されました。

1
列の値を合計して、その合計をワークブックのファイル名に追加します。
こんにちは私は列の一意の値に基づいて新しいワークシートを作成することができました。これに加えて、列の値を合計して、この合計を対応する各ワークシートのファイル名に含めます。 このワークブックのファイル名に、列Dの値の合計をFilename_Sum(D).xlsの形式で追加します。 これが私がしたことです、私が必要とするすべては列I2の合計をすることです:私は、合計を文字列に変換してファイル名(列Aの値)に含める 'Copy/paste the visible data to the new workbook My_Range.SpecialCells(xlCellTypeVisible).Copy With WSNew.Range("A1") ' Paste:=8 will copy the columnwidth in Excel 2000 and higher ' Remove this line if you use Excel 97 .PasteSpecial Paste:=8 .PasteSpecial xlPasteValues .PasteSpecial xlPasteFormats Application.CutCopyMode = False .Select End With mySum = Application.WorksheetFunction.Sum(Columns("I2:I1024")) 'Save …

1
これら2つのマクロを組み合わせる方法は? (エクセル2010)
私はマクロのプログラミングの経験が全くありません(しかし、私はまだマクロを記録することができます、そしてそれは私を助けるものです) だから、私は全体のマクロコードに、マクロのこの部分を「スロット」する方法を質問している? これが、マクロ全体です。 Sub CaseOpen1() ' ' CaseOpen1 Macro ' ' With Selection.Interior .Pattern = xlSolid .PatternColorIndex = xlAutomatic .ThemeColor = xlThemeColorDark1 .TintAndShade = 0 .PatternTintAndShade = 0 End With End Sub そして、私が「スロットイン」したいマクロの一部です。 CaseOpen1 Macro Dim rng As Range Set rng = ActiveSheet.Range("G5") ' ' ' 'With rng.Interior ' おお、そして、あなたがコードの1つに誤りがあると思うならば、あなたは訂正して自由に感じることができます。あなたは私よりも上手くやるべきだ。 …

1
単一セルに複数の結果がある「IF式」のVBA [完了]
これをVBAに変換する方法この式を使用すると、6行のみがカバーされ、式はすでに長すぎます。私のレポートは600行あります。 =IF(AND('Risk & Issue Log'!$K$2=$D5,'Risk & Issue Log'!$L$2=F$8,OR('Risk & Issue Log'!$F$2="Open",'Risk & Issue Log'!$F$2="In-progress")),'Risk & Issue Log'!$D$2," ")&IF(AND('Risk & Issue Log'!$K$3=$D5,'Risk & Issue Log'!$L$3=F$8,OR('Risk & Issue Log'!$F$3="Open",'Risk & Issue Log'!$F$3="In-progress")),'Risk & Issue Log'!$D$3," ")&IF(AND('Risk & Issue Log'!$K$4=$D5,'Risk & Issue Log'!$L$4=F$8,OR('Risk & Issue Log'!$F$4="Open",'Risk & Issue Log'!$F$4="In-progress")),'Risk & Issue Log'!$D$4," ")&IF(AND('Risk …
弊社のサイトを使用することにより、あなたは弊社のクッキーポリシーおよびプライバシーポリシーを読み、理解したものとみなされます。
Licensed under cc by-sa 3.0 with attribution required.