世間では三連休だと思いますが、土曜日仕事だったため私は普通のお休みと同じです。
今週はお仕事は忙しかった、、、
なので、今週の大切なお休みは家族と過ごすようにします。
そして今日は近くのお店にご飯を食べに来ています。
家族とまったりした休日最高です。
お外も寒いですしね。
世間では三連休だと思いますが、土曜日仕事だったため私は普通のお休みと同じです。
今週はお仕事は忙しかった、、、
なので、今週の大切なお休みは家族と過ごすようにします。
そして今日は近くのお店にご飯を食べに来ています。
家族とまったりした休日最高です。
お外も寒いですしね。
今日はVBAのネタです。
VBAでファイルやフォルダが存在してるか確認したいことは多々あります。
そういうときに使える存在チェックの方法についてです。
下記のようにすることで実装できます。
'ファイル、フォルダの存在チェック Public Function existDirCheck(path As String) As Boolean '結果 Dim result result = Dir(path, vbDirectory) If result <> "" Then 'フォルダが存在する existDirCheck = True Else 'フォルダが存在しない existDirCheck = False End If End Function
Windows 98のアイコンが見れるサイトWindows 98 Icon Viewerというのがあったのでメモ。
win98icons.alexmeub.com
私はWindows 98は使ったことがないですが、懐かしい気持ちになります。
アイコンはダウンロードすることもできるようですね。