Xかxの次の文字を２文字抜き取る式は ChatGPT ChatGPT 「X」または「x」の次の文字を2文字抜き取る数式は、SEARCH関数とMID関数を組み合わせて次のようになります。以下の数式は、セルA1に入力された文字列から「X」または「x」の直後の2文字を抜き取ります…

sumで範囲内にエラーがあっても無視して合計を出したい ChatGPT ChatGPT エラーを無視して合計を出すためには、SUM関数にIFERROR関数を組み合わせて使うことができます。IFERROR関数は特定の式や関数にエラーがある場合に代替値を返すことができます。 たと…

Sub CopyAllSheetsToDestination() Application.DisplayAlerts = False ActiveWorkbook.Save Application.ScreenUpdating = False Dim path As String, fso, file, files path = "Z:\Mail\一括処理" Set fso = CreateObject("Scripting.FileSystemObject") S…

Sub RemoveDuplicatesFromColumnN() Dim LastRow As Long Dim i As Long LastRow = Cells(Rows.Count, "N").End(xlUp).Row ' N列の最終行を取得 ' 重複を取り除いた値を一時的に格納するためのコレクションを作成 Dim uniqueValues As New Collection Dim cu…

冷ご飯のパラパラ復活: 材料: 冷ご飯 手順: アルミホイルで包んで軽く蒸すことで、ご飯がパラパラに。 柑橘類の絞りやすくする裏ワザ: 材料: 柑橘類（例: レモン、オレンジ） 手順: 柑橘を電子レンジで10秒ほど温め、絞りやすくする。 冷凍庫の臭い対策: 材…