エントリーの編集
![loading...](https://b.st-hatena.com/bdefb8944296a0957e54cebcfefc25c4dcff9f5f/images/v4/public/common/loading@2x.gif)
エントリーの編集は全ユーザーに共通の機能です。
必ずガイドラインを一読の上ご利用ください。
ファイルの属性・サイズを調べる・設定する - アプリケーションとしてのVBA
記事へのコメント0件
- 注目コメント
- 新着コメント
このエントリーにコメントしてみましょう。
注目コメント算出アルゴリズムの一部にLINEヤフー株式会社の「建設的コメント順位付けモデルAPI」を使用しています
![アプリのスクリーンショット](https://b.st-hatena.com/bdefb8944296a0957e54cebcfefc25c4dcff9f5f/images/v4/public/entry/app-screenshot.png)
- バナー広告なし
- ミュート機能あり
- ダークモード搭載
関連記事
ファイルの属性・サイズを調べる・設定する - アプリケーションとしてのVBA
Sub Get_Attribute() Dim FileNamePath As String Dim File_Attri As Integer 'ファイルのパスを取得 Fi... Sub Get_Attribute() Dim FileNamePath As String Dim File_Attri As Integer 'ファイルのパスを取得 FileNamePath = SelectFileNamePath 'ファイルの属性を取得 File_Attri = GetAttr(FileNamePath) MsgBox File_Attri End Sub Function SelectFileNamePath() As String SelectFileNamePath = Application. _ GetOpenFilename("ファイルの選択 (*.*),*.*") End Function ファイルの属性を設定には、 SetAttr ステートメントを使用します。 GetAttr Pathname,Attributes 複数の属性を設定する場合には、合計