Предлагаем воспользоваться купоном - cvkyp05r1n1jrdwvefclqwkz6lwx28db - на 10% скидку при покупке GOLD-аккаунта DepositFiles с периодом действия 6 месяцев или 1 год. Купон действителен до 2010-10-19.
Мой администратор дал мне файл config.xml для того, чтобы я установить программы из пакета Microsoft Office. Что же мне теперь делать с этим файлом?
Файл config.xml содержит в себе сведения о том, какие именно компоненты должны быть установлены во время установки Microsoft Office. Также он позволяет указать некоторые настройки процесса установки.
Для того, чтобы выполнить установку пакета Microsoft
Office с использованием данного файла, вам нужно воспользоваться параметром /config файла установки Microsoft Office (файла setup.exe).
Описание этого параметра, а также других параметров файла установки setup.exe представлено ниже:
/admin - Запустить программу настройки Microsoft Office для создания файла параметров настройки установки.
/adminfile [файл] - Установить пакет Microsoft Office с использованием указанного
файла параметров настройки установки.
/config [файл] - Определяет путь к файлу config.xml, который будет использован при установке.
/modify [код продукта] - Позволяет добавить или удалить дополнительные компоненты к установленному продукту. Данный параметр может использоваться совместно с параметром /config. Код нужного продукта можно найти в файле Setup.xml.
/repair [код продукта] - Позволяет восстановить указанный
продукт.
Изменение цвета ячеек таблицы, содержащих определенное слово Теги: Word
Вы можете назначить данный макрос какой-либо клавише. Перед использованием макроса, необходимо установить курсор внутрь таблицы.
Sub cellscolor() 'Расцвечивание отдельных ячеек в таблице в зависимости от текста в этих ячейках 'Помощь Steven Craig Miller
Dim rngTable As Range Dim oTable As Table Dim oRow As Row Dim oCell As cell Dim sStr As String Set rngTable = Selection.Range Set oTable = Selection.Tables(1) If Not rngTable.Information(wdWithInTable) Then MsgBox prompt:="Курсор находится вне таблицы" Else With oTable For Each oRow In .Rows For Each oCell In oRow.Cells oCell.Shading.BackgroundPatternColor = wdColorRed 'заливаем все ячейки одним
цветом sStr = oCell.Range.Text 'помимо текста ячейка всегда содержит два дополнительных символа 'в конце. Эти символы нужно исключить, что и делает сл.оператор sStr = Left(sStr, Len(sStr) - 2) Select Case sStr Case "ready" oCell.Shading.BackgroundPatternColor = wdColorGreen 'зеленым Case "on goning" oCell.Shading.BackgroundPatternColor
= wdColorYellow 'желтым End Select Next oCell Next oRow End With End If End Sub