| Вопрос: Как создать юникодный txt | Добавлено: 23.01.09 07:59 |
Автор вопроса:  Dropper
|
|
Вот создаю к примеру просто txt
Application.GetSaveAsFilename(fileFilter:="Text Files (*.txt), *.txt")
Еще вопрос: где почитать про fileFilter и FilterIndex. Офисная справка ничего не дает. Что такое FilterIndex? |
| Ответы | Всего ответов: 4 |
|
Номер ответа: 1 Автор ответа:  Kardinal ICQ: 360041513 Вопросов: 1 Ответов: 164 |
Web-сайт: Профиль | | #1 | Добавлено: 23.01.09 08:56 |
| Фильтр индекс, если не ошибаюсь - выбранный тип файла из списка типов(фильтров), для уникода надо что-то другое там был параметр тип сохр. файла и его кодировка... | ||
|
Номер ответа: 2 Автор ответа: fAndOrInВопросов: 5 Ответов: 344 |
Профиль | | #2 | Добавлено: 23.01.09 09:36 |
|
Справка Microsoft Visual Basic
(Function GetOpenFilename([FileFilter], [FilterIndex], [Title], [ButtonText], [MultiSelect]) Member of Excel.Application) GetOpenFilename Method See AlsoApplies ToExampleSpecificsDisplays the standard Open dialog box and gets a file name from the user without actually opening any files. expression.GetOpenFilename(FileFilter, FilterIndex, Title, ButtonText, MultiSelect) expression Required. An expression that returns an Application object. FileFilter Optional Variant. A string specifying file filtering criteria. This string consists of pairs of file filter strings followed by the MS-DOS wildcard file filter specification, with each part and each pair separated by commas. Each separate pair is listed in the Files of type drop-down list box. For example, the following string specifies two file filters— text and addin: "Text Files (*.txt),*.txt,Add-In Files (*.xla),*.xla". To use multiple MS-DOS wildcard expressions for a single file filter type, separate the wildcard expressions with semicolons; for example, "Visual Basic Files (*.bas; *.txt),*.bas;*.txt". If omitted, this argument defaults to "All Files (*.*),*.*". FilterIndex Optional Variant. Specifies the index numbers of the default file filtering criteria, from 1 to the number of filters specified in FileFilter. If this argument is omitted or greater than the number of filters present, the first file filter is used. Title Optional Variant. Specifies the title of the dialog box. If this argument is omitted, the title is "Open." ButtonText Optional Variant. Macintosh only. MultiSelect Optional Variant. True to allow multiple file names to be selected. False to allow only one file name to be selected. The default value is False Remarks This method returns the selected file name or the name entered by the user. The returned name may include a path specification. If MultiSelect is True, the return value is an array of the selected file names (even if only one filename is selected). Returns False if the user cancels the dialog box. This method may change the current drive or folder. Example This example displays the Open dialog box, with the file filter set to text files. If the user chooses a file name, the code displays that file name in a message box. fileToOpen = Application _ .GetOpenFilename("Text Files (*.txt), *.txt" 
If fileToOpen <> False Then MsgBox "Open " & fileToOpen End If |
||
|
Номер ответа: 3 Автор ответа: fAndOrInВопросов: 5 Ответов: 344 |
Профиль | | #3 | Добавлено: 23.01.09 09:52 |
|
Из справки Microsoft Visual Basic
Function AscW(String As String) As Integer Member of VBA.Strings Returns an Integer representing the character code corresponding to the first letter in a string. AscW function returns the Unicode character code except on platforms where Unicode is not supported, in which case, the behavior is identical to the Asc function. |
||
|
Номер ответа: 4 Автор ответа: GDKВопросов: 13 Ответов: 348 |
Профиль | | #4 | Добавлено: 28.01.09 12:39 |
| Может макрос проще записать и посмотреть его код? | ||
Страница: 1 |