生成AI

-ChatGPT--ChatGPT-4へ質問「VBAで1行目から一番最初にデータがある行まで削除してください。」「1行目からデータがある場合の制御も加えて」ChatGPT4の回答Sub DeleteRowsAboveFirstData() ...

-ChatGPT--ChatGPT-4の回答Sub SelectWorksheetByPartialNameInCurrentWorkbook() Dim TargetWorkbook As Workbook Dim SheetNamePa...

-ChatGPT--ChatGPT-4の回答Sub SelectWorksheetByPartialName() Dim SourceWorkbook As Workbook Dim FileDialog As FileDialog Dim...

-ChatGPT--ChatGPT-4の回答Sub ImportUniqueData() ' 必要な変数を定義する Dim SourceWorkbook As Workbook Dim TargetWorkbook As Workbook ...

-ChatGPT--ChatGPT-4の回答Sub AddTaxList() Dim wb As Workbook Dim wsBank, wsTax As Worksheet Dim lastRowBank, lastRowTax, i,...

Sub ReplaceWithExtractedData() Dim secondSourceWorksheet As Worksheet Dim lastRow As Long, lastColumn As Long Dim curren...

-ChatGPT4--ChatGPT4-に質問VBAでダイアログボックスで選択したファイルの編集用という文字列が部分一致のシートをコピーして新規ファイルに貼り付けてください。そしてそのシートをコピーして消込用というシートを作成します。もう一...

-ChatGPT4--ChatGPT4-に質問VBAでインプットボックスで入力された数値（月）に基づいて、その月の最終日を日付形式で取得し、指定したセルに代入する。セルの書式はグレゴリオ暦で日付にしてください。ChatGPT4の回答Sub ...

-ChatGPT4--ChatGPT4-に質問VBAで給与仕訳を作成します。コメントは日本語にしてください。パスワードは解除し、ダイアログボックスでファイルを選択して、Sheet1の右隣にコピーして給与データと名前を変更する。給与データの最...

-ChatGPT4--ChatGPT4-に質問新しいVBAモジュールを作成してください。実行ファイルに立替精算勘定科目変換シートと一般経費勘定科目変換シートがあります。ダイアログボックスで選択したInvoice_details(編集用)シー...

ChatGPT4に質問VBAでダイアログボックスで選択したファイルのInvoice_details(編集用)シートのP列にソートを降順でかけて、P列のデータを支払日の列に代入、AT列を金額の列に代入、貸方消費税に対象外を代入、F列と（D列）...

-ChatGPT4--ChatGPT4-に質問VBAでダイアログボックスで選択したファイルのInvoice_details(編集用)シートのBB列にある連続する行のデータにVATという文字がある場合は、その行を削除してください。ChatGP...

-ChatGPT4--ChatGPT4-へ質問VBAでInvoiceという文字を含むシートをコピーしてInvoice_ details(編集用)というシート名に変更してください。ChatGPT4の回答Sub CopyInvoiceSheet...

-チャットGPT4--チャットGPT4-に質問ダイアログボックスで選択したファイルのSheet1からダイアログボックスで選択した別のファイルのBank Statement（編集用）R列のデータがUSDでF列がSheet1のC列が一致した時、...

-チャットGPT4--チャットGPT4-に質問　VBAで勘定科目変換ツールを作成したいと思います。このファイルに勘定科目変換シートがあります。A列に変換前の勘定科目、B列に変換後の勘定科目があります。これをダイアログボックスで選択したファイ...