Открытие файлов Excel в отдельных окнах в Windows 7 Код статьи: 2636670 - Список продуктов, к которым относится данная статья. По умолчанию файлы Excel открываются в системе Windows 7 в одном окне. Иногда же требуется просматривать некоторые файлы на экране одновременно. Для этого можно запустить новый процесс Excel (excel.exe), нажав кнопку Excel в меню "Пуск". При этом компьютер можно настроить так, чтобы файлы Excel всегда открывались в разных окнах. Использовать способ, описанный в этой статье, рекомендуется только при наличии достаточного объема ОЗУ. Способ 1. Помощь в решении проблемы Чтобы автоматически настроить компьютер так, что файлы Excel будут открываться в разных окнах, нажмите кнопку или щелкните ссылку Устранить проблему. Затем в диалоговом окне Загрузка файла нажмите кнопку Выполнить и следуйте инструкциям мастера. (Примечание. Так как при этом изменяются разделы реестра, пакет Fix it создаст резервную копию реестра на рабочем столе.) Устранить проблему Microsoft Fix it 50801 Способ 2. Решить проблему самостоятельно Нажмите на клавиатуре сочетание клавиш WIN+R, чтобы открыть окно Выполнить, и введите regedit.exe. Нажмите клавишу ВВОД, чтобы открыть редактор реестра. Если система запросит пароль администратора или подтверждение, введите пароль или нажмите кнопку Да. Внимание! Неправильное изменение разделов реестра может привести к возникновению серьезных проблем. Поэтому при выполнении этих действий рекомендуется строго соблюдать инструкции. Найдите следующий раздел реестра: HKEY_CLASSES_ROOT\Excel.Sheet.12\shell\Open Щелкните его правой кнопкой мыши и выберите команду Экспортировать. Это позволяет создать резервную копию раздела реестра. После резервного копирования раздела выполните следующие действия. Измените значение раздела Open\command. Для этого разверните узел Command, дважды щелкните запись Default и измените значение следующим образом (включая кавычки). Office 2010: "C:\Program Files\Microsoft Office\Office14\EXCEL.EXE" "%1" Office 2007: "C:\Program Files\Microsoft Office\Office12\EXCEL.EXE" "%1" Затем дважды щелкните раздел command, поставьте указатель в конец строки и замените параметр /dde на "%1". Если вы используете Office 2007, замените /e на "%1". Переименуйте раздел Open\ddeexec. Для этого щелкните раздел ddeexec правой кнопкой мыши, выберите команду Переименовать и укажите новое имя. Например: ddeexec2. Аналогичным образом повторите перечисленные действия для резервного копирования и изменения раздела реестра HKEY_CLASSES_ROOT\Excel.Sheet.8\shell\Open. Проверьте, открываются ли файлы Excel в разных окнах. Ваше мнение важно для нас! Сообщите, что вы думаете об этой статье, используя поле для комментариев внизу. Это позволит нам улучшить содержимое. Заранее спасибо! Свойства Код статьи: 2636670 - Последнее изменение :: 23 марта 2012 г. - Редакция: 1.0 Информация в данной статье относится к следующим продуктам. Microsoft Excel 2010 Microsoft Office Excel 2007 Перейти к началу страницы | Отправить отзыв Отправить отзыв Помогли ли вам эти сведения? Да Нет Частично Насколько сложно Вам было следовать инструкциям из этой статьи? Очень просто Просто Немного сложно Сложно Очень сложно Оставьте свой отзыв о качестве предоставляемых нами сведений и предложения по их улучшению. Перейти к началу страницыПерейти к началу страницы Популярные поисковые запросы Для Дома Для Работы Администрирование Разработчикам Безопасность Загрузки и обновления Поделиться

http://support.microsoft.com/kb/2636670

Formulas

Using SumProduct without hidden cells
Conditional sum of visible cells in a filtered list
Excel Sum Function Examples

Outlook 2010: Подключение почтового ящикак через imap

http://www.lytebyte.com/2009/08/11/guide-to-setup-gmail-imap-in-outlook-2010/
http://www.howtogeek.com/howto/17314/add-your-gmail-account-to-outlook-2010-using-pop/

Useful links

CodeName:
Using sheet codenames in Microsoft Excel VBA

Is file open:
is file open in network?
Latest changed by and date/time
VBA Code To Determine Who Has File Open
Excel 2010 VBA code to determine username of open file on network 
File owner attributes through Excel VBA

Удалить все элементы из входящих, которые не являются письмами.

Option Explicit
'Удаление всех элементов, которые не являются письмами
Sub delete()

    Dim Inbox As Object
    Dim mi As Object 'раньше был mailitem и ничего не работало. Почему?
    Dim asdf As Integer
   
    Set Inbox = Outlook.Application.GetNamespace("MAPI").GetDefaultFolder(olFolderInbox) 'olFolderSentMail)
   
    asdf = Inbox.Items.Count
    For Each mi In Inbox.Items 'Inbox.Items.Restrict("[Unread]=TRUE")
        If mi.Class <> olMail Then
            'MsgBox (mi.Subject)
            Debug.Print (mi.Subject)
        End If
    Next mi

End Sub

Изменение имён кода

При открытии книг эксель 2007 версии (*.xlsx, *.xlsm) в екселе 2003 (Version 11). Програмное название листов принимает значение по умолчанию и к листам уже не возможно обращаться с помощью их прогрмного названия:

Outlook: Манипуляции с письмами

Private Sub Application_NewMail()

Set myFolder = Outlook.Application.GetNamespace("MAPI").GetDefaultFolder(olFolderInbox)


On Error GoTo ErrHandler

For Each mi In myFolder.Items.Restrict("[Unread]=TRUE")
If mi.Class = olMail Then
If mi.Attachments.Count = 0 And mi.FlagStatus = olFlagComplete Then
For miNum = 1 To mi.Attachments.Count

Next miNum

End If
End If
Next mi
Exit Sub

ErrHandler:
'MsgBox ("Error was find")
Debug.Print (Err.Description)
Debug.Print (Err.Number)
End Sub


http://www.cyberforum.ru/vba/thread630949.html