Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Автоматическая замена части формулы в ячейке Excel - VBA / 6 сообщений из 6, страница 1 из 1
26.06.2017, 13:08:53
    #39477646
Lamptop
Lamptop
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Автоматическая замена части формулы в ячейке Excel - VBA
Добрый день. Требуется заменить букву в формуле. Нашел пример макроса, изменил значения, но после запуска 0 изменений. Формула простая, вида =Лист1!С16
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
Sub AVTOZAM_()
Dim c As Range
Dim s As String
   For Each c In UsedRange.Cells.SpecialCells(xlCellTypeFormulas)
     s = c.Formula
       If Mid(s, Len(s) - 2, 1) = "C" Then Mid(s, Len(s) - 2, 1) = "E": c.Formula = s
   Next
End Sub

Модератор: Учимся использовать тэги оформления кода - FAQ
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
26.06.2017, 13:17:57
    #39477658
Akina
Akina
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Автоматическая замена части формулы в ячейке Excel - VBA
1) Нельзя использовать UsedRange без указания объекта (Worksheet). Замените, например, на ThisWorkbook.Sheets("Лист1").UsedRange.
2) Макрос должен быть размещён в common-модуле.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
26.06.2017, 14:09:56
    #39477713
Lamptop
Lamptop
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Автоматическая замена части формулы в ячейке Excel - VBA
Akina, out of range
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
26.06.2017, 14:30:14
    #39477736
iMrTidy
iMrTidy
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Автоматическая замена части формулы в ячейке Excel - VBA
Lamptop,

Возможно лист пуст?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
26.06.2017, 14:32:51
    #39477740
iMrTidy
iMrTidy
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Автоматическая замена части формулы в ячейке Excel - VBA
iMrTidyLamptop,

Возможно лист пуст?

Или, может быть, листа с таким именем не существует?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
26.06.2017, 15:05:40
    #39477768
The_Prist
The_Prist
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Автоматическая замена части формулы в ячейке Excel - VBA
iMrTidyлиста с таким именем не существуетПо скрину видно - что все-таки не существует в книге с кодом листа "Лист1".
Lamptop, может ThisWorkbook надо на ActiveWorkbook заменить? Где формулы-то ищете?
И еще вопрос: а стандартная замена(Ctrl+H) чем не подходит в данном случае?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Автоматическая замена части формулы в ячейке Excel - VBA / 6 сообщений из 6, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 536ms
Закрыть
start [/forum/topic.php?fid=61&mobile=1&tid=2172644]:
 0ms
get settings:
 16ms
get forum list:
 22ms
check forum access:
 5ms
check topic access:
 5ms
track hit:
 52ms
get topic data:
 17ms
get forum data:
 5ms
get page messages:
 62ms
get tp. blocked users:
 2ms
others: 350ms
total:  536ms
x
x
Закрыть


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