Embedded Files
いろいろ
いろいろ
エラー対処
エラー対処
セキュリティ
セキュリティ
名前
名前
クイック アクセス ツール バー
クイック アクセス ツール バー
クイックアクセスツールバー コマンド一覧.xlsx入門
入門
VB6からVB.NETへの変換
VB6からVB.NETへの変換
vbtransitionguide.pdf比較
比較
実行
実行
ファイル
ファイル
エクセルの神髄 VBA入門
Excel VBA入門
書式
書式
フォーム
フォーム
オブジェクト
オブジェクト
貼付
貼付
判定
判定
ADO
ADO
正規表現
正規表現
コントロール
コントロール
情報
情報
クラスモジュール
クラスモジュール
文字列
文字列
シート
シート
セル
セル
計算
計算
検索
検索
ソート
ソート
ショートカット
ショートカット
ワークシート関数
ワークシート関数
アクセス権
アクセス権
icaclsコマンド
VBAからicaclsコマンドを実行するには、Shell関数を使用することができます。以下はicaclsコマンドの基本的な使い方の例です。
Sub SetFolderPermissions() Dim folderPath As String folderPath = "C:\ExampleFolder" Dim userName As String userName = "ExampleUser" Dim permissionLevel As String permissionLevel = "F" Shell "icacls " & folderPath & " /grant " & userName & ":" & permissionLevel, vbNormalFocusEnd Sub
Shell "icacls C:\ExampleFolder /grant ExampleUser:F", vbNormalFocus
上記の例では、C:\ExampleFolderディレクトリに対して、ExampleUserユーザーにフルコントロール（/F）の権限を与えています。
以下はicaclsコマンドの主なオプションです。/grant：ユーザーにアクセス許可を与えます。/deny：ユーザーにアクセス許可を拒否します。/t：サブフォルダーとその中に含まれるファイルに対して設定します。/c：エラーを無視して処理を続行します。/q：処理中に進捗情報を表示しません。
Sub SetFolderPermissions() Dim folderPath As String folderPath = "C:\ExampleFolder" Dim userName As String userName = "ExampleUser" Dim permissionLevel As String permissionLevel = "F" Shell "icacls " & folderPath & " /grant " & userName & ":" & permissionLevel, vbNormalFocusEnd Sub
Shell "icacls C:\ExampleFolder /grant ExampleUser:F", vbNormalFocus
上記の例では、C:\ExampleFolderディレクトリに対して、ExampleUserユーザーにフルコントロール（/F）の権限を与えています。
以下はicaclsコマンドの主なオプションです。/grant：ユーザーにアクセス許可を与えます。/deny：ユーザーにアクセス許可を拒否します。/t：サブフォルダーとその中に含まれるファイルに対して設定します。/c：エラーを無視して処理を続行します。/q：処理中に進捗情報を表示しません。
設定
設定
パスワード解除方法
パスワード解除方法
VBA Win32API 64ビット版Excel対応に修正
VBA Win32API 64ビット版Excel対応に修正
Word VBA
Word VBA
Page updated
Google Sites
Report abuse