=WORKDAY(EOMONTH(A2,0)+1,-1) ネタ元 http://www.eurus.dti.ne.jp/~yoneyama/Excel/waza/hiduke02.html

シート1番目の内容をCSVファイルで出力する方法 Sub writeCSV() Dim ws As Worksheet Set ws = ThisWorkbook.Worksheets(1) Dim csvFile As String csvFile = ActiveWorkbook.Path & "\data.csv" Open csvFile For Output As #1 Dim i As Long, j As Long i …

・スプレッドシートでのセルの挿入、削除、または書式の設定。 ・別のセルの値の変更。 ・ブックでのシートの移動、名前の変更、削除、または追加。 ・計算方法や画面表示など、環境オプションの変更。 ・ブックへの名前の追加。 ・プロパティの設定およびほ…