Гость
Войти | Профиль | Очистить
Действия ...
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Поиск и замена значений ячеек Excel (vba) / 13 сообщений из 13, страница 1 из 1
12.10.2017, 16:33
    #39535507
lsor
lsor
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Поиск и замена значений ячеек Excel (vba)
Доброго времени суток!
Суть вопроса: есть 2 таблицы (i.e. "1" и "2")
из таблицы 1 нужно найти все ячейки, у которых в имени имеется "$name" и заменить "$name" на значение ячеек из 2 столбца таблицы 2. Количество строк в обоих таблицах - значение не константное.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
12.10.2017, 16:58
    #39535530
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Поиск и замена значений ячеек Excel (vba)
lsorСуть вопроса:Вопрос не найден. Также не ясно, что вы вкладываете в понятие "таблица" и что такое имя ячейки.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
12.10.2017, 17:09
    #39535540
lsor
lsor
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Поиск и замена значений ячеек Excel (vba)
Shocker.Pro, извиняюсь за некорректность вопроса. Исправляюсь:
2 листа (1 и 2)
ищем в 1-ом листе ячейки у которых в значении имеется "$name"(+ бла-бла-бла) и меняем "$name" на значение ячейки из 2-го столбца 2 листа.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
12.10.2017, 17:16
    #39535547
lsor
lsor
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Поиск и замена значений ячеек Excel (vba)
Shocker.Pro,

Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
With Worksheets(2).range("A1:A13")
  Set c = .Find("$name*", LookIn:=xlValues)
  If Not c Is Nothing Then
    firstResult = c.address
    Do
      c.Value = Worksheets(1).range("B2:B13")
      Set c = .FindNext(c)
    Loop While Not c Is Nothing And c.address <> firstResult
  End If
End With



пока есть что-то такое, но не понимаю как диапазон не привязывать к конкретным значениям, да и не записывает ничего.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
12.10.2017, 17:22
    #39535555
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Поиск и замена значений ячеек Excel (vba)
lsorна значение ячейки из 2-го столбца 2 листа.а из какой строки?

Рекомендую выложить пример файла
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
12.10.2017, 17:23
    #39535557
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Поиск и замена значений ячеек Excel (vba)
lsor
Код: vbnet
1.
Not c Is Nothing And c.address <> firstResult

Условие некорректное. Если с=Nothing все равно произойдет падение на c.address
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
12.10.2017, 17:26
    #39535558
lsor
lsor
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Поиск и замена значений ячеек Excel (vba)
Shocker.Pro,

поочерёдно
1-я строка из 1 - 1-я строка из 2
2-я строка из 1 - 2-я строка из 2
и т.д. до конца
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
12.10.2017, 17:40
    #39535573
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Поиск и замена значений ячеек Excel (vba)
А VBA принципиально? Почему не формулой?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
12.10.2017, 17:43
    #39535577
lsor
lsor
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Поиск и замена значений ячеек Excel (vba)
Shocker.Pro,

задание руководителя. Для него это почему-то принципиально
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
12.10.2017, 19:27
    #39535634
The_Prist
The_Prist
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Поиск и замена значений ячеек Excel (vba)
lsor,

такой вариант не подойдет? Массовая замена слов
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
13.10.2017, 09:03
    #39535793
lsor
lsor
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Поиск и замена значений ячеек Excel (vba)
The_Prist,

к сожалению нет, но спасибо за ответ.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
13.10.2017, 12:17
    #39535926
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Поиск и замена значений ячеек Excel (vba)
Каждый раз, когда находите нужное значение, нужно определить строку у найденной ячейки, затем обратиться к значению конкретной ячейки на втором листе и вырезать и склеить значения с помощью функции Mid$
Что именно вызывает проблему?

ЗЫ: Проще было бы сделать простым циклом по ячейкам, хотя на очень большом объеме Find будет работать побстрее
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
13.10.2017, 16:16
    #39536099
The_Prist
The_Prist
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Поиск и замена значений ячеек Excel (vba)
lsorк сожалению нетА чем именно? Судя по описанию из первого сообщения - очень даже подходит. Вы хоть попробовали? Или может я не понимаю что надо?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Поиск и замена значений ячеек Excel (vba) / 13 сообщений из 13, страница 1 из 1
Целевая тема:
Создать новую тему:
Автор:
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
созд. / загр.: 430ms
Закрыть
start [/forum/topic.php?fid=60&tablet=1&tid=2155199]:
 0ms
get settings:
 9ms
get forum list:
 13ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 43ms
get topic data:
 9ms
get forum data:
 2ms
get page messages:
 49ms
get tp. blocked users:
 2ms
others: 295ms
total:  430ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]