[okshef]

Подскажите, пожалуйста, код VBA для решения задачки. Язык системы - русский, раскладка и язык загрузки - английский. Нужно при открытии файла *.xls автоматически менять язык ввода на русский

[Smasher]

Помогите пожалуйста написать макросы. Таблица моя выглядит вот так:


Первая задача заключается в следующем: в эту таблицу в низ столбцов добавляются записи. Если можно, то надо сделать так, чтобы при добавлении новой записи производился поиск по документу не существует ли в таблице уже такая запись. Ну либо просто макрос, котороый ищет дубликаты.

Вторая задача - составление алфавитного перечня. То есть, жмёшь кнопку - получаешь список всех записей отсортированных по алфавиту при чём чтобы было видно где эта запись находится. Например, если у меня имеется "apelsin" в столбце 1, "ananas" в столбце 2 и "kokos" в столбце 3 результат должен выглядеть так:
ananas - 2
apelsin - 1
kokos - 3

[TURNSKIN]

привет
мне нужно в excel или как form сделать 2 и более combobox связаных между собой
т.е. если в первом вывераеться item Россия, то во втором поевляеться Москва, Питер, Ростов, Владик, если в первом Франция то во втором Париж, Морсель и Ница
как это сделать?

[delog]

мне нужно в excel или как form сделать 2 и более combobox связаных между собой т.е. если в первом вывераеться item Россия, то во втором поевляеться Москва, Питер, Ростов, Владик, если в первом Франция то во втором Париж, Морсель и Ница как это сделать? »

Вставь два активиксных комбобокса и в коде листа напиши это:

Код:

Private Sub ComboBox1_MouseDown(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
  ComboBox1.Clear
  ComboBox2.Clear
  ComboBox1.AddItem ("Франция")
  ComboBox1.AddItem ("Россия")
End Sub

Private Sub ComboBox1_Change()
  If ComboBox1.ListIndex = 0 Then
    ComboBox2.AddItem ("Париж")
    ComboBox2.AddItem ("Марсель")
    ComboBox2.AddItem ("Ница")
  End If
  If ComboBox1.ListIndex = 1 Then
    ComboBox2.AddItem ("Москва")
    ComboBox2.AddItem ("Питер")
    ComboBox2.AddItem ("Ростов")
  End If
End Sub

[okshef]

Подскажите, кто знает. Ситуация такая. Есть файл, созданный в WinVista. Создан сертификат и добавлена цифровая подпись. При открытии файла заданы настройки "Доверять макросам этого издателя", соответственно, никаких дополнительных нажатий кнопок на разрешение выполнения при открытии файла не требуется. На компьютере установлена Win7, в которой прежняя цифровая подпись не принимается. Каким образом правильно экспортировать сертификат в Se7en, чтобы открывать тот же файл в обоих системах без лишних "телодвижений" (нажатий на кнопки о запуске макроса)?

[winsor2008]

Господа) есть задачка )
Вводные: по сети над 1-м Эксель-файлом (2007) работают 4-5 человек в режиме совместного доступа. Файл занимает в среднем 4 МБ. Очень часто файл "ломается" и зависает, - после чего начинает занимать 60 метров и все данные пропадают. Замечено, что вероятность сбоя увеличиваеся с использованием формул (возможно, формулы мешают???)
Подскажите, что делать? Спасибо!

[sidor84]

Добрый день.... возможно ли при вводе определённых данных в ячейку, будет окрашиваться другая???????
т.е. допустим при вводе числа 155в одну из ячеек диапазона D1 : d171 окрашивается ячейка "В1" а при вводе 156 в диапазон, окрашивается "В2"


я думаю что плясать нужно наверное от той ячейки, которая будет окрашиваться!
в ней наверное нужно указать какуюто формулу, или может значение какоето! чтобы при появлении нужного числа в диапазоне D1 : d171 она окрашивалась в любой другой цвет!!! (красненький например!)

Спасибо заранее)))

[okshef]

sidor84, на вкладке "Главная" во фрейме "Стили" есть кнопка "Условное форматирование". Задайте правило форматирования нужных ячеек из диапазона В по значению чисел из диапазона D. Но тогда вам придется пользоваться формулой Di=Bi.
Как-то так, в общем - экспериментируйте.

[sidor84]

ничё непонял!!!!


можно описать пошагово!!!



А теперь пожалуйста подскажите что, и в какую ячейку нужно ввести, и какую нужно отредактировать!!!????

б.Спасибо!!!

[okshef]

Пошагово так:
1. Выделите нужный диапазон. Например А1-А10
2. На вкладке "Главная" найдите кнопку "Условное форматирование"
3. Наведите на "Правила выделения ячеек"
4. Из раскрывшегося списка выбирите нужное и при необходимости измените формат. Например: выбираем Больше. В левое поле пишем 155, в правом жмем на стрелку и внизу списка нажимаем "Пользовательский формат". В открывшемся окне для форматирования ячеек выбираем нужные параметры заливки, границы, числа.
5. Вводим значения в диапазон: в ячейку А1-151, А2-152....А5-155...А10-160, А11-161. При невыполнении условий форматирования ячейка не изменяет формат, как только условие выполняется - формат меняется на выбранный. Т.е. ячейки А1-А5 останутся белыми (условие не выполняется), А6-А10 изменят цвет на выбранный (условие выполняется), А11 и ниже - белые, т.к. на них условное форматирование не распространяется. Вводить цифры руками - при автозаполнении заполняется и формат.

это всего лишь объяснение принципа, а не решение конкретной задачи.