Excel: заполнить колонку по условию / Microsoft Office

ReSQL.ru

Мобильная версия Контакт Правила FAQ Помощь

Гость

Войти | Регистрация | Профиль | Очистить

Новые сообщения | Избранное

Форумы | Пользователи | Статистика | Мод. лог | Поиск

Цитировать

Написать

Автор*:

Ввести пароль для входа

Тема*:

Сообщение

Данное сообщение тематическое

Сообщение содержит картинки или видео 18+

Автор:

ВНИМАНИЕ! На данном подфоруме действуют строгие правила. Удостоверьтесь, что ваше сообщение соответствует им!

Форум или тема закрыты для гостей. Необходима авторизация!

Загрузить последнюю сохраненную версию

Вложение:

Вставить как галерею

Максимальный размер вложений: 4,0 МБ, аудио/видео: 8,0 МБ. Картинки большего размера ужимаются, если возможно.

Введите код, изображенный на картинке. Если код нечитаемый, кликните картинку, чтобы загрузить другой вариант.

Отправляя сообщение, я выражаю свое согласие с правилами форума и принимаю пользовательское соглашение.

Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр

Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Excel: заполнить колонку по условию

15 сообщений из 15, страница 1 из 1

Excel: заполнить колонку по условию

#38306528

due

Гость

У меня не совсем тривиальная задача - нужно заполнить справочник по следующему принципу:
1. Если в ячейке "F1" стоит значение "1", то в ячейку "I1" нужно добавить значение "15".
2. Если в ячейке "F2" стоит значение "11", то в ячейку "I2" нужно добавить значение "18".
... и т.д.

Как это можно сделать с помощью VBA?

...

Рейтинг:

0 / 0

21.06.2013, 16:35

| Ответить | Цитировать | Написать

Excel: заполнить колонку по условию

#38306530

due

Гость

Пример таблицы:

...

Рейтинг:

0 / 0

21.06.2013, 16:36

| Ответить | Цитировать | Написать

Excel: заполнить колонку по условию

#38306534

Shocker.Pro

Участник

Откуда: ->|<- :адуктО

Сообщения: 23 134

Рейтинг: 0 / 0

Обязательно VBA? Формулой нельзя?

...

Рейтинг:

0 / 0

21.06.2013, 16:38

| Ответить | Цитировать | Написать

Excel: заполнить колонку по условию

#38306539

Maxim12345678

Гость

due,

сколько таких строк? обязательно использовать пример vba или можно написать длинную формулу?

...

Рейтинг:

0 / 0

21.06.2013, 16:39

| Ответить | Цитировать | Написать

Excel: заполнить колонку по условию

#38306544

due

Гость

Да, лучше бы VBA, т.к. его сравнительно легко спарить с Delphi (механизм "Delphi + Excel + макрос" уже отработан), а вот с формулами наверняка запарюсь.

...

Рейтинг:

0 / 0

21.06.2013, 16:41

| Ответить | Цитировать | Написать

Excel: заполнить колонку по условию

#38306547

due

Гость

Количество строк - варьируется. Т.е. величина непредсказуемая (в каждом файле - по разному, файлов - без пяти минут миллион).

...

Рейтинг:

0 / 0

21.06.2013, 16:42

| Ответить | Цитировать | Написать

Excel: заполнить колонку по условию

#38306555

Shocker.Pro

Участник

Откуда: ->|<- :адуктО

Сообщения: 23 134

Рейтинг: 0 / 0

а вот эти условия - они в каком виде хранятся? БД?

...

Рейтинг:

0 / 0

21.06.2013, 16:48

| Ответить | Цитировать | Написать

Excel: заполнить колонку по условию

#38306584

due

Гость

Я как раз-таки и потрошу сей файл, чтобы указанные в нём колонки соответствовали эталонным значениям, хранящимся в БД. Только вот нет возможности вытягивать данные из БД, сопоставлять их и заполнять файл. Так было бы проще, да, знаю. Но не судьба.
Зато есть обнадёживающий момент: значения эти строго фиксированные, обновлению/изменению не подлежат ("плавает" лишь их количество), поэтому, если получится сделать то, что я хочу, то в итоге одним ОГРОМНЫМ геморроем станет меньше. С форматированием файла разобрался, с книгами и листами разобрался, осталось заполнить файл значениями (грубо говоря ключами) перед загрузкой в БД. Такая вот печенька.

...

Рейтинг:

0 / 0

21.06.2013, 17:01

| Ответить | Цитировать | Написать

Excel: заполнить колонку по условию

#38306608

Shocker.Pro

Участник

Откуда: ->|<- :адуктО

Сообщения: 23 134

Рейтинг: 0 / 0

Тогда я не понимаю, в чем загвоздка. Ты не знаешь, как обратиться к конкретной ячейке или что?

...

Рейтинг:

0 / 0

21.06.2013, 17:14

| Ответить | Цитировать | Написать

Excel: заполнить колонку по условию

#38306616

due

Гость

Нет, я не знаю, как написать условия этого макроса. Т.е. как должна выглядеть конструкция типа "if ячейка F на текущей строке = '1' then ячейка I на текущей строке = '15'".

Т.е. для знающих проблемы-то на самом деле нет, а я вот с макросами (как и Экселем в целом) на "Вы".

...

Рейтинг:

0 / 0

21.06.2013, 17:21

| Ответить | Цитировать | Написать

Excel: заполнить колонку по условию

#38306630

Shocker.Pro

Участник

Откуда: ->|<- :адуктО

Сообщения: 23 134

Рейтинг: 0 / 0

Код: vbnet

If Cells(i,7)=5 Then Cells(i,9)=10

Но перед Cells еще должна идти квалификация объекта, а я не знаю, как ты обращаешься к нему из дельфи, на что у тебя есть ссылки.
В общем случае так:

Код: vbnet

Application.Workbook.Worksheet.Cells(i,j)

...

Рейтинг:

0 / 0

21.06.2013, 17:28

| Ответить | Цитировать | Написать

Excel: заполнить колонку по условию

#38306633

due

Гость

А если опустить использование Delphi - то как будет выглядеть макрос в полном виде (т.е. если используется голый Excel)?

...

Рейтинг:

0 / 0

21.06.2013, 17:31

| Ответить | Цитировать | Написать

Excel: заполнить колонку по условию

#38306649

Shocker.Pro

Участник

Откуда: ->|<- :адуктО

Сообщения: 23 134

Рейтинг: 0 / 0

Например

Код: vbnet

ThisWorkbook.Worksheets("Лист2").Cells(1,1)

...

Рейтинг:

0 / 0

21.06.2013, 17:39

| Ответить | Цитировать | Написать

Excel: заполнить колонку по условию

#38306699

due

Гость

Спасибо за направление, вроде получилось:

Код: vbnet

1.
2.
3.
4.
5.
6.
7.
8.
9.

Sub replace()
Dim ws As Worksheet
Dim i As Integer
For i = 1 To 555
If Cells(i, 7) = 1 Then Cells(i, 9) = 15
If Cells(i, 7) = 11 Then Cells(i, 9) = 18
If Cells(i, 7) = 119 Then Cells(i, 9) = 36
Next
End Sub

Но я не знаю, как мне обозначить вместо "555" последнюю строку. Помогите, пожалуйста.

...

Рейтинг:

0 / 0

21.06.2013, 18:17

| Ответить | Цитировать | Написать

Excel: заполнить колонку по условию

#38306742

due

Гость

Всё - с диапазонами разобрался самостоятельно, всем ещё раз огромное спасибо за помощь!!!

...

Рейтинг:

0 / 0

21.06.2013, 18:53

| Ответить | Цитировать | Написать

15 сообщений из 15, страница 1 из 1

Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Excel: заполнить колонку по условию

Читали тему (0):

Читали форум (0):

Пользователи онлайн (0):

start [/forum/topic.php?fid=61&msg=38306547&tid=2174719]:	0ms
get settings:	10ms
get forum list:	14ms
check forum access:	4ms
check topic access:	4ms
track hit:	40ms
get topic data:	10ms
get forum data:	3ms
get page messages:	49ms
get tp. blocked users:	1ms
others:	328ms

total:	463ms