Зачем нужен Chr(34)???

[RISagitov]

''....там где указываем имя и путь архива

Sub СозданиеSFXархива()
' имя создаваемого архива будет иметь вид Мой архив 17-Feb-2009.exe
WinRAR_Path = """C:\Program Files\WinRAR\WinRAR.exe"""
WinRAR_Keys = " a -r -sfx -ep -agDD-MMM-YYYY "

FolderPath = "C:\Documents and Settings\Игорь\Рабочий стол\" ' папка с файлами

ArchieveFileName = Chr(34) & FolderPath & "Мой архив .exe" & Chr(34) ' имя и путь создаваемого архива

Mask = Chr(34) & FolderPath & "*.xls" & Chr(34) ' добавляем только файлы Excel
Icon = " -iicon" & Chr(34) & "C:\Program Files\Microsoft Office\OFFICE11\MSN.ICO" & Chr(34) ' иконка

CommandLine = WinRAR_Path & WinRAR_Keys & ArchieveFileName & " " & Mask & Icon
'MsgBox CommandLine
Shell CommandLine
End Sub


''' WinRAR_Path = """C:\Program Files\WinRAR\WinRAR.exe""" - и тут зачем столько кавычек? обязательно так?


http://excelvba.ru/code/CreateBackup

[Казанский]

Путь C:\Program Files\WinRAR\WinRAR.exe содержит пробел, поэтому в командной строке его необходимо взять в кавычки, например

dir "C:\Program Files\WinRAR\WinRAR.exe"

По правилам синтаксиса VB*, для изображения символа " в текстовой строке (т.е. внутри кавычек) используются две кавычки подряд, например в окне Immediate

?"a""b"
a"b

Поэтому Chr(34) - это аналог текстовой константы """" , кому-то так кажется проще или нагляднее.
Эту строку

Mask = Chr(34) & FolderPath & "*.xls" & Chr(34) ' добавляем только файлы Excel

можно заменить на

Mask = """" & FolderPath & "*.xls""" ' добавляем только файлы Excel