Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/превратить относительные ссылки в абсолютные большая формула - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » превратить относительные ссылки в абсолютные большая формула (Макросы/Sub)
превратить относительные ссылки в абсолютные большая формула
Flatcher Дата: Пятница, 22.12.2017, 10:48 | Сообщение № 1
Группа: Проверенные
Ранг: Участник
Сообщений: 94
Репутация: 1 ±
Замечаний: 0% ±

Excel 2010
подскажите пожалуйста как макросом преобразовать ссылки в формуле типа:
Код
=-СУММЕСЛИМН(СМЕЩ(ИНДЕКС(ОСВ_10!B6:B6000;ПОИСКПОЗ("66.01";ОСВ_10!B6:B6000;0);1);0;9):СМЕЩ(ИНДЕКС(ОСВ_10!B6:B6000;ПОИСКПОЗ("66.02";ОСВ_10!B6:B6000;0);1);-1;9);
СМЕЩ(ИНДЕКС(ОСВ_10!B6:B6000;ПОИСКПОЗ("66.01";ОСВ_10!B6:B6000;0);1);0;1):СМЕЩ(ИНДЕКС(ОСВ_10!B6:B6000;ПОИСКПОЗ("66.02";ОСВ_10!B6:B6000;0);1);-1;1);
"+Займы Банки")+СУММЕСЛИМН(СМЕЩ(ИНДЕКС(ОСВ_10!B6:B6000;ПОИСКПОЗ("66.01";ОСВ_10!B6:B6000;0);1);0;10):СМЕЩ(ИНДЕКС(ОСВ_10!B6:B6000;ПОИСКПОЗ("66.02";ОСВ_10!B6:B6000;0);1);-1;10);
СМЕЩ(ИНДЕКС(ОСВ_10!B6:B6000;ПОИСКПОЗ("66.01";ОСВ_10!B6:B6000;0);1);0;1):СМЕЩ(ИНДЕКС(ОСВ_10!B6:B6000;ПОИСКПОЗ("66.02";ОСВ_10!B6:B6000;0);1);-1;1);
"+Займы Банки")+
-СУММЕСЛИМН(СМЕЩ(ИНДЕКС(ОСВ_10!B6:B6000;ПОИСКПОЗ("66.03";ОСВ_10!B6:B6000;0);1);0;9):СМЕЩ(ИНДЕКС(ОСВ_10!B6:B6000;ПОИСКПОЗ("66.04";ОСВ_10!B6:B6000;0);1);-1;9);
СМЕЩ(ИНДЕКС(ОСВ_10!B6:B6000;ПОИСКПОЗ("66.03";ОСВ_10!B6:B6000;0);1);0;1):СМЕЩ(ИНДЕКС(ОСВ_10!B6:B6000;ПОИСКПОЗ("66.04";ОСВ_10!B6:B6000;0);1);-1;1);
"+Займы")+СУММЕСЛИМН(СМЕЩ(ИНДЕКС(ОСВ_10!B6:B6000;ПОИСКПОЗ("66.03";ОСВ_10!B6:B6000;0);1);0;10):СМЕЩ(ИНДЕКС(ОСВ_10!B6:B6000;ПОИСКПОЗ("66.04";ОСВ_10!B6:B6000;0);1);-1;10);
СМЕЩ(ИНДЕКС(ОСВ_10!B6:B6000;ПОИСКПОЗ("66.03";ОСВ_10!B6:B6000;0);1);0;1):СМЕЩ(ИНДЕКС(ОСВ_10!B6:B6000;ПОИСКПОЗ("66.04";ОСВ_10!B6:B6000;0);1);-1;1);
"+Займы")
????
пробовал [vba]
Код
ConvertFormula(cell.Formula, xlA1, xlA1, xlAbsolute)
[/vba] но она по ходу не берет большую формулу


Сообщение отредактировал Flatcher - Пятница, 22.12.2017, 11:13
 
Ответить
Сообщениеподскажите пожалуйста как макросом преобразовать ссылки в формуле типа:
Код
=-СУММЕСЛИМН(СМЕЩ(ИНДЕКС(ОСВ_10!B6:B6000;ПОИСКПОЗ("66.01";ОСВ_10!B6:B6000;0);1);0;9):СМЕЩ(ИНДЕКС(ОСВ_10!B6:B6000;ПОИСКПОЗ("66.02";ОСВ_10!B6:B6000;0);1);-1;9);
СМЕЩ(ИНДЕКС(ОСВ_10!B6:B6000;ПОИСКПОЗ("66.01";ОСВ_10!B6:B6000;0);1);0;1):СМЕЩ(ИНДЕКС(ОСВ_10!B6:B6000;ПОИСКПОЗ("66.02";ОСВ_10!B6:B6000;0);1);-1;1);
"+Займы Банки")+СУММЕСЛИМН(СМЕЩ(ИНДЕКС(ОСВ_10!B6:B6000;ПОИСКПОЗ("66.01";ОСВ_10!B6:B6000;0);1);0;10):СМЕЩ(ИНДЕКС(ОСВ_10!B6:B6000;ПОИСКПОЗ("66.02";ОСВ_10!B6:B6000;0);1);-1;10);
СМЕЩ(ИНДЕКС(ОСВ_10!B6:B6000;ПОИСКПОЗ("66.01";ОСВ_10!B6:B6000;0);1);0;1):СМЕЩ(ИНДЕКС(ОСВ_10!B6:B6000;ПОИСКПОЗ("66.02";ОСВ_10!B6:B6000;0);1);-1;1);
"+Займы Банки")+
-СУММЕСЛИМН(СМЕЩ(ИНДЕКС(ОСВ_10!B6:B6000;ПОИСКПОЗ("66.03";ОСВ_10!B6:B6000;0);1);0;9):СМЕЩ(ИНДЕКС(ОСВ_10!B6:B6000;ПОИСКПОЗ("66.04";ОСВ_10!B6:B6000;0);1);-1;9);
СМЕЩ(ИНДЕКС(ОСВ_10!B6:B6000;ПОИСКПОЗ("66.03";ОСВ_10!B6:B6000;0);1);0;1):СМЕЩ(ИНДЕКС(ОСВ_10!B6:B6000;ПОИСКПОЗ("66.04";ОСВ_10!B6:B6000;0);1);-1;1);
"+Займы")+СУММЕСЛИМН(СМЕЩ(ИНДЕКС(ОСВ_10!B6:B6000;ПОИСКПОЗ("66.03";ОСВ_10!B6:B6000;0);1);0;10):СМЕЩ(ИНДЕКС(ОСВ_10!B6:B6000;ПОИСКПОЗ("66.04";ОСВ_10!B6:B6000;0);1);-1;10);
СМЕЩ(ИНДЕКС(ОСВ_10!B6:B6000;ПОИСКПОЗ("66.03";ОСВ_10!B6:B6000;0);1);0;1):СМЕЩ(ИНДЕКС(ОСВ_10!B6:B6000;ПОИСКПОЗ("66.04";ОСВ_10!B6:B6000;0);1);-1;1);
"+Займы")
????
пробовал [vba]
Код
ConvertFormula(cell.Formula, xlA1, xlA1, xlAbsolute)
[/vba] но она по ходу не берет большую формулу
Автор - Flatcher
Дата добавления - 22.12.2017 в 10:48
китин Дата: Пятница, 22.12.2017, 10:58 | Сообщение № 2
Группа: Модераторы
Ранг: Экселист
Сообщений: 7030
Репутация: 1079 ±
Замечаний: 0% ±

Excel 2007;2010;2016
72 сообщения, а правила не прочитаны, пичалька

Не судите очень строго:я пытаюсь научиться
ЯД 41001877306852
 
Ответить
Сообщение72 сообщения, а правила не прочитаны, пичалька
Автор - китин
Дата добавления - 22.12.2017 в 10:58
Flatcher Дата: Пятница, 22.12.2017, 11:06 | Сообщение № 3
Группа: Проверенные
Ранг: Участник
Сообщений: 94
Репутация: 1 ±
Замечаний: 0% ±

Excel 2010
китин, ну тыкните носом, что не так! файл я думаю в данном случае не обязателен
 
Ответить
Сообщениекитин, ну тыкните носом, что не так! файл я думаю в данном случае не обязателен
Автор - Flatcher
Дата добавления - 22.12.2017 в 11:06
Pelena Дата: Пятница, 22.12.2017, 11:18 | Сообщение № 4
Группа: Админы
Ранг: Местный житель
Сообщений: 19418
Репутация: 4561 ±
Замечаний: ±

Excel 365 & Mac Excel
Найти B6:B6000 заменить на $B$6:$B$6000 не вариант?
Область поиска - формулы

"Черт возьми, Холмс! Но как??!!"
Ю-money 41001765434816
 
Ответить
СообщениеНайти B6:B6000 заменить на $B$6:$B$6000 не вариант?
Область поиска - формулы
Автор - Pelena
Дата добавления - 22.12.2017 в 11:18
китин Дата: Пятница, 22.12.2017, 11:19 | Сообщение № 5
Группа: Модераторы
Ранг: Экселист
Сообщений: 7030
Репутация: 1079 ±
Замечаний: 0% ±

Excel 2007;2010;2016
формула у вас не обтэжена была.
по сути: а Найти
Код
B6:B6000

Найти Все
Заменить
Код
$B$6:$B$6000

Заменить все
разве не прокатит? и макросов не надоть

Не судите очень строго:я пытаюсь научиться
ЯД 41001877306852
 
Ответить
Сообщениеформула у вас не обтэжена была.
по сути: а Найти
Код
B6:B6000

Найти Все
Заменить
Код
$B$6:$B$6000

Заменить все
разве не прокатит? и макросов не надоть
Автор - китин
Дата добавления - 22.12.2017 в 11:19
Flatcher Дата: Пятница, 22.12.2017, 11:21 | Сообщение № 6
Группа: Проверенные
Ранг: Участник
Сообщений: 94
Репутация: 1 ±
Замечаний: 0% ±

Excel 2010
Pelena, не во всех формулах такой адрес. Так то да можно бы было сделать
 
Ответить
СообщениеPelena, не во всех формулах такой адрес. Так то да можно бы было сделать
Автор - Flatcher
Дата добавления - 22.12.2017 в 11:21
Flatcher Дата: Пятница, 22.12.2017, 11:26 | Сообщение № 7
Группа: Проверенные
Ранг: Участник
Сообщений: 94
Репутация: 1 ±
Замечаний: 0% ±

Excel 2010
китин, тэги поправил) спасибо за замечание. С найти/заменить не выйдет так как есть и другие адреса. В принципе так сделать минут 15 займет но хотелось бы домучить макрос
 
Ответить
Сообщениекитин, тэги поправил) спасибо за замечание. С найти/заменить не выйдет так как есть и другие адреса. В принципе так сделать минут 15 займет но хотелось бы домучить макрос
Автор - Flatcher
Дата добавления - 22.12.2017 в 11:26
Pelena Дата: Пятница, 22.12.2017, 11:52 | Сообщение № 8
Группа: Админы
Ранг: Местный житель
Сообщений: 19418
Репутация: 4561 ±
Замечаний: ±

Excel 365 & Mac Excel
Цитата Flatcher, 22.12.2017 в 11:21, в сообщении № 6 ()
не во всех формулах такой адрес
Мы же Вашего файла не видим.
Можно только с именем столбца: Найти B -- Заменить на $B$

Цитата Flatcher, 22.12.2017 в 11:26, в сообщении № 7 ()
хотелось бы домучить макрос
А Replace тоже имеет ограничение по длине текста?

"Черт возьми, Холмс! Но как??!!"
Ю-money 41001765434816
 
Ответить
Сообщение
Цитата Flatcher, 22.12.2017 в 11:21, в сообщении № 6 ()
не во всех формулах такой адрес
Мы же Вашего файла не видим.
Можно только с именем столбца: Найти B -- Заменить на $B$

Цитата Flatcher, 22.12.2017 в 11:26, в сообщении № 7 ()
хотелось бы домучить макрос
А Replace тоже имеет ограничение по длине текста?
Автор - Pelena
Дата добавления - 22.12.2017 в 11:52
bmv98rus Дата: Пятница, 22.12.2017, 13:00 | Сообщение № 9
Группа: Друзья
Ранг: Участник клуба
Сообщений: 4128
Репутация: 770 ±
Замечаний: 0% ±

Excel 2013/2016
Flatcher, вы не хотите просто проименовать область/ти (ОСВ_10!B6:B6000) а потом применить это имя . (alt+MMA)?

Замечательный Временно просто медведь , процентов на 20.
 
Ответить
СообщениеFlatcher, вы не хотите просто проименовать область/ти (ОСВ_10!B6:B6000) а потом применить это имя . (alt+MMA)?
Автор - bmv98rus
Дата добавления - 22.12.2017 в 13:00
InExSu Дата: Воскресенье, 24.12.2017, 02:34 | Сообщение № 10
Группа: Друзья
Ранг: Ветеран
Сообщений: 650
Репутация: 96 ±
Замечаний: 0% ±

Excel 2010, 365
Цитата Flatcher, 22.12.2017 в 10:48, в сообщении № 1 ()
не берет большую формулу

Может так:

Разработчик Битрикс24 php, Google Apps Script, VBA Excel Windows/Mac
 
Ответить
Сообщение
Цитата Flatcher, 22.12.2017 в 10:48, в сообщении № 1 ()
не берет большую формулу

Может так:
Автор - InExSu
Дата добавления - 24.12.2017 в 02:34
Мир MS Excel » Вопросы и решения » Вопросы по VBA » превратить относительные ссылки в абсолютные большая формула (Макросы/Sub)
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2025 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!