下記のマクロを実行すると
解凍ソフト「Lhaplus」を使用して圧縮ファイルを解凍できます。
このマクロを利用してWindows10の標準装備の解凍(ZIP形式)出来る方法を教えてください。
宜しくお願い致します。
マクロ
Sub 解凍()
On Error Resume Next
Dim wsh As Object
Dim Lhaplus実行ファイル As String
Dim 圧縮データフォルダ As String
Dim 解凍先フォルダ As String
Set wsh = CreateObject("WScript.Shell")
Lhaplus実行ファイル = "C:\Program Files (x86)\Lhaplus\Lhaplus.exe"
圧縮データフォルダ = ThisWorkbook.Path '①'
解凍先フォルダ = ThisWorkbook.Path
wsh.Run Chr(34) & Lhaplus実行ファイル & Chr(34) & " /o:" & Chr(34) & 解凍先フォルダ & Chr(34) & " " & Chr(34) & 圧縮データフォルダ & Chr(34), , True
Set wsh = Nothing
MsgBox "全て解凍されました"
End Sub
以上です。
宜しくお願い致します。
No.1ベストアンサー
- 回答日時:
Lhaplusはzipファイルの解凍もできるので、このままでもいけるように思います。
できないならLhaplusのバージョンが古いのかも。
https://forest.watch.impress.co.jp/library/softw …
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- フリーソフト Lhaplusソフトについて教えてください。 2 2023/10/03 08:32
- Visual Basic(VBA) エクセルのマクロについて教えてください。 7 2023/07/04 09:18
- Visual Basic(VBA) エクセルのマクロについて教えてください。 4 2023/07/03 09:11
- Visual Basic(VBA) フォルダの作成 3 2021/11/10 11:05
- ハッキング・フィッシング詐欺 変換、解凍、圧縮サイトを使用した場合、私のファイルがどこかにアップロードされますが、 どこかのダウン 6 2021/11/17 20:10
- Visual Basic(VBA) Excel VBAでフォルダ内の全テキストファイルの任意データを取得について 7 2021/12/18 16:00
- Visual Basic(VBA) エクセルのマクロについて教えてください。 1 2023/08/10 11:34
- Visual Basic(VBA) エクセルのマクロについて教えてください 物件ごとのフォルダを作成してます そのフォルダ内にサブフォル 2 2023/07/02 17:58
- Excel(エクセル) エクセルのマクロについて教えてください。 1 2023/02/11 11:05
- Visual Basic(VBA) エクセルのマクロについて教えてください。 1 2023/10/19 09:27
このQ&Aを見た人はこんなQ&Aも見ています
-
性格の違いは生まれた順番で決まる?長男長女・中間子・末っ子・一人っ子の性格の傾向
同じ環境で生まれ育っても、生まれ順で性格は違うものなのだろうか。家庭教育研究家の田宮由美さんに教えてもらった。
-
Excel VBAでの数値の計算についておしえてください
Visual Basic(VBA)
-
Excel マクロについて
Visual Basic(VBA)
-
VBEを開くのにコマンド名が「Visual Basic」な理由はなぜ?
Visual Basic(VBA)
-
-
4
エクセルの数式で教えてください。
Excel(エクセル)
-
5
エクセルのマクロについて教えてください。
Visual Basic(VBA)
-
6
ExcelのVBAのことで質問です。 以下のコードを入れ、ボタンを押せば作動させると写真のように画面
Visual Basic(VBA)
-
7
Excelの各シートを色ごとで分類して値転記するマクロの作り方を教えて下さい。
Visual Basic(VBA)
-
8
VBAに関して
Visual Basic(VBA)
-
9
エクセルのマクロについて教えてください。
Visual Basic(VBA)
-
10
excl2013 縦の表を横にVBAでする方法
Excel(エクセル)
-
11
VBAについて 集計シートの『A5』にデータシート『I1』からコピーした「2023/10/1」がはい
Visual Basic(VBA)
-
12
VBAユーザーホームテキストボックスにカーソルを自動で表示したい
Visual Basic(VBA)
-
13
ExcelのVBAコードを教えて頂けますでしょうか。 例シート2つがあります。 シート1は元データ
Visual Basic(VBA)
-
14
VBA コード
Visual Basic(VBA)
-
15
excelのVBAについて、以下のコードに追加をお願いいたします。
Visual Basic(VBA)
-
16
VBAコードが作動しません。修正したいのですが何処に原因かあるか教えて下さい。
Visual Basic(VBA)
-
17
Cellsのコードが打てません
Visual Basic(VBA)
-
18
VBA
Visual Basic(VBA)
-
19
ExcelVBAのFindFirstエラーについて
Visual Basic(VBA)
-
20
エクセルのマクロ
Excel(エクセル)
関連するカテゴリからQ&Aを探す
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Excel・Word リサーチ機能を無...
-
特定のPCだけ動作しないVBAマク...
-
マクロの記録を使用したマクロ...
-
エクセルで特定の列が0表示の場...
-
メッセージボックスのOKボタ...
-
Excel マクロ VBA プロシー...
-
ExcelのVBA。public変数の値が...
-
TERA TERMを隠す方法
-
一つのTeratermのマクロで複数...
-
EXCELのVBAでRange("A1:C4")を...
-
コマンドボタンに二回目のマク...
-
【緊急】エクセルVBA(20...
-
Excel VBAからAccessマクロを実...
-
ダブルクリックで貼り付けた画...
-
VBAにて別ワークブック上の実行...
-
Excelで特定の文字のところで自...
-
ExcelVBAでPDFを閉じるソース
-
特定文字のある行の前に空白行...
-
マクロを使って結合セルに丸を...
-
エクセルのマクロについて教え...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Excel・Word リサーチ機能を無...
-
エクセルで特定の列が0表示の場...
-
特定のPCだけ動作しないVBAマク...
-
Excel マクロ VBA プロシー...
-
メッセージボックスのOKボタ...
-
一つのTeratermのマクロで複数...
-
ExcelのVBA。public変数の値が...
-
Excel VBAからAccessマクロを実...
-
EXCELのVBAでRange("A1:C4")を...
-
ExcelVBAでPDFを閉じるソース
-
エクセルに張り付けた写真のフ...
-
エクセルで別のセルにあるふり...
-
TERA TERMを隠す方法
-
2つのマクロでチェックボックス...
-
マクロ実行時、ユーザーフォー...
-
【マクロ】1つのマクロの中に...
-
ピボットテーブルでの毎回可変...
-
特定文字のある行の前に空白行...
-
エクセルのマクロについて教え...
-
wordを起動した際に特定のペー...
おすすめ情報