Hello world!

WordPress へようこそ。こちらは最初の投稿です。編集または削除し、コンテンツ作成を始めてください。

https://anbtksh.com/wp-login.php?redirect_to=https%3A%2F%2Fanbtksh.com%2Fwp-admin%2F&reauth=1

Sub フォルダ作成()

Dim パス As String
パス = InputBox("フォルダを作成する場所のパスを入力して下さい")

Dim i As Long

For i = 2 To Cells(Rows.Count, 1).End(xlUp).Row
    MkDir パス & "\" & Cells(i, 1)
Next i

End Sub

=TEXT(D2,”yyyymmdd”)

=IFERROR(VLOOKUP(D2,休日マスタ,2,FALSE),0)

=IF(OR(WEEKDAY(D2)=7,WEEKDAY(D2)=1),1,0)

http://office-qa.com/Excel/ex176.htm