2020-04-11から1日間の記事一覧

四半期の期間

Excel

第1四半期：DATE(年度,4,1)～DATE(年度,6,30) 第2四半期：DATE(年度,7,1)～DATE(年度,9,30) 第3四半期：DATE(年度,10,1)～DATE(年度,12,31) 第4四半期：DATE(年度+1,1,1)～DATE(年度+1,3,31) ネタ元 https://www.waenavi.com/entry/20190824/1566621613#%EF%…

URL指定されてるセルからURLを取る

excel

関数作ってそれを呼ぶ標準モジュールに以下追加 Function GetURL(lnk As Range) As String Dim Add As String If lnk.Hyperlinks.Count > 0 Then With lnk.Hyperlinks(1) If .Address Like "http*" Then Add = .Address End If End With End If If Add <> ""…