エンジョイ経理情報 経理の世界におけるプログラミングとノーコードツール活用の可能性と課題
はじめに
現代のビジネス環境は、急速にデジタル化と自動化が進展しています。経理部門もその例外ではなく、従来の手作業からデジタルツールの活用へと移行しつつあります。とはいえ、なぜ経理マンたちはプログラミングやノーコードツールをあまり活...
エンジョイ経理情報
エンジョイ経理情報 
ChatGPTによる業務改善 -ChatGPT-4に「VBAでセルの書式を数値で桁区切りを使用するに設定して」と頼んだら
-ChatGPT-4への質問
VBAでセルの書式を数値で桁区切りを使用するに設定して
ChatGPT4の回答
Range("A1:A10").NumberFormat = "#,##0.00"
ChatGPTによる業務改善 -ChatGPT-4に「VBAで開いているファイルのセルの範囲を別の開いているファイルのセルにコピペして」と頼んだら
-ChatGPT-
-ChatGPT-4の回答
Option Explicit
Sub CopyRangeBetweenOpenedFiles()
Dim SourceWorkbook As Workbook
...
ChatGPTによる業務改善 -ChatGPT-4で「VBAでファイルダイアログでファイルを開きます。セルの範囲を選択します。そして、もう一回ファイルダイアログを使って別のファイルを選択します。その別のファイルのセルを選択するとセルの範囲をコピペして」と頼んだら
-ChatGPT-
-ChatGPT-4の回答
Option Explicit
Sub CopyRangeBetweenFiles()
Dim SourceWorkbook As Workbook
Dim T...
ChatGPTによる業務改善 -ChatGPT-4に「VBAで仕訳シートとmanualシートを残して他のシートをすべて削除してください。」と頼んだら
-ChatGPT-
-ChatGPT-4に質問
「VBAで仕訳シートとmanualシートを残して他のシートをすべて削除してください。」
ChatGPT4の回答
Sub DeleteSheetsExceptSpeci...
ChatGPTによる業務改善 -ChatGPT-4に「VBAで1行目から一番最初にデータがある行まで削除してください。」と頼んだら
-ChatGPT-
-ChatGPT-4へ質問
「VBAで1行目から一番最初にデータがある行まで削除してください。」
「1行目からデータがある場合の制御も加えて」
ChatGPT4の回答
Sub Delete...
ChatGPTによる業務改善 -ChatGPT-4に「このブックのシートを選択するのにインプットボックスで入力した名前が部分一致した場合、そのシートを設定してください。」と頼んだら
-ChatGPT-
-ChatGPT-4の回答
Sub SelectWorksheetByPartialNameInCurrentWorkbook()
Dim TargetWorkbook As Workbook
...
ChatGPTによる業務改善 -ChatGPT-4に「VBAででダイアログボックスで選択したファイルを開き、シートを選択するのにインプットボックスで入力した名前が部分一致した場合、そのシートを設定してください。」と頼んだら
-ChatGPT-
-ChatGPT-4の回答
Sub SelectWorksheetByPartialName()
Dim SourceWorkbook As Workbook
Dim FileDialog ...
ChatGPTによる業務改善 -ChatGPT-4にVBAでダイアログボックスで選択したファイルのInvoice_details(編集用)シートのBI列のデータをこのブックの立替精算変換シートのA列に文字列が重複しないデータだけ追加してください
-ChatGPT-
-ChatGPT-4の回答
Sub ImportUniqueData()
' 必要な変数を定義する
Dim SourceWorkbook As Workbook
Dim Target...
ChatGPTによる業務改善 -ChatGPT-4にVBAで勘定科目（銀行口座）シートの1列目にデータがある場合、2列目のセルに消費税リストシートの1列目のデータを含む入力規則リストの作成をして
-ChatGPT-
-ChatGPT-4の回答
Sub AddTaxList()
Dim wb As Workbook
Dim wsBank, wsTax As Worksheet
Dim lastR...