下記のマクロを実行すると
解凍ソフト「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も見ています
-
外出時に「待たせる妻」vs イライラする「待つ夫」は日本だけ?見習いたい海外事情
夫の家事参加に積極的なイメージのある海外でも、同様の事例はあるのか。結婚カウンセラーの佐竹悦子さんに伺ってみた。
-
Excel VBAでの数値の計算についておしえてください
Visual Basic(VBA)
-
csvファイルを列数ごとに分割するExcelマクロが書けずに困っています
Visual Basic(VBA)
-
エクセル VBAでの転記の方法について
Visual Basic(VBA)
-
-
4
Excel マクロについて
Visual Basic(VBA)
-
5
VBEを開くのにコマンド名が「Visual Basic」な理由はなぜ?
Visual Basic(VBA)
-
6
エクセルの数式で教えてください。
Excel(エクセル)
-
7
エクセルのマクロについて教えてください。
Visual Basic(VBA)
-
8
ExcelのVBAのことで質問です。 以下のコードを入れ、ボタンを押せば作動させると写真のように画面
Visual Basic(VBA)
-
9
エクセルのマクロについて教えてください。
Visual Basic(VBA)
-
10
FileCopy時のエラー
Visual Basic(VBA)
-
11
Excelの各シートを色ごとで分類して値転記するマクロの作り方を教えて下さい。
Visual Basic(VBA)
-
12
VBAについて 集計シートの『A5』にデータシート『I1』からコピーした「2023/10/1」がはい
Visual Basic(VBA)
-
13
VBAに関して
Visual Basic(VBA)
-
14
excl2013 縦の表を横にVBAでする方法
Excel(エクセル)
-
15
ExcelのVBAコードを教えて頂けますでしょうか。 例シート2つがあります。 シート1は元データ
Visual Basic(VBA)
-
16
エクセルのマクロについて教えてください。
Visual Basic(VBA)
-
17
VBAユーザーホームテキストボックスにカーソルを自動で表示したい
Visual Basic(VBA)
-
18
VBA コード
Visual Basic(VBA)
-
19
excelのVBAについて、以下のコードに追加をお願いいたします。
Visual Basic(VBA)
-
20
Cellsのコードが打てません
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
エクセルで特定の列が0表示の場...
-
Excel マクロ VBA プロシー...
-
Excel・Word リサーチ機能を無...
-
特定のPCだけ動作しないVBAマク...
-
EXCELのVBAでRange("A1:C4")を...
-
一つのTeratermのマクロで複数...
-
Excel VBAからAccessマクロを実...
-
メッセージボックスのOKボタ...
-
非表示の列をすべて削除するマクロ
-
エクセルに張り付けた写真のフ...
-
エクセルで別のセルにあるふり...
-
ExcelのVBA。public変数の値が...
-
ExcelVBAでPDFを閉じるソース
-
VBA アドインについて お詳しい...
-
TERA TERMを隠す方法
-
マクロで空白セルを詰めて別シ...
-
EXCELマクロでのThisisWor...
-
サクラエディタ・マクロ → VSCo...
-
エクセルマクロ自動更新
-
[初心者です]VBAで指定列か...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Excel・Word リサーチ機能を無...
-
特定のPCだけ動作しないVBAマク...
-
エクセルで特定の列が0表示の場...
-
Excel マクロ VBA プロシー...
-
メッセージボックスのOKボタ...
-
一つのTeratermのマクロで複数...
-
エクセルで別のセルにあるふり...
-
ExcelのVBA。public変数の値が...
-
エクセルに張り付けた写真のフ...
-
ExcelVBAでPDFを閉じるソース
-
EXCELのVBAでRange("A1:C4")を...
-
Excel VBAからAccessマクロを実...
-
TERA TERMを隠す方法
-
エクセルのマクロについて教え...
-
エクセルのマクロについて教え...
-
エクセルのマクロについて教え...
-
エクセルのマクロについて教え...
-
マクロ実行時、ユーザーフォー...
-
Excelのマクロについて教えてく...
-
ソース内の行末に\\
おすすめ情報