Страницы: 1
RSS
Запись формулы с помощью макроса
 
Добрый День! Как с помощью макроса записать формулу в ячейку. Пробую: Cells(1,1)= "еслиошибка(A1/A1*A1;0) - не работает!
 
надо использовать соответствующие св-ва объекта Range:  
 
Formula  
FormulaLocal  
FormulaR1C1  
FormulaR1C1Local  
FormulaArray  
 
формула должна начинаться с "="
фрилансер Excel, VBA - контакты в профиле
"Совершенствоваться не обязательно. Выживание — дело добровольное." Э.Деминг
 
Formula, FormulaR1C1, FormulaLocal,  FormulaR1C1Local, FormulaArray
 
Спасибо! Все получилось
 
Код макроса выдает ошибку:  Range("A1").FormulaLocal="=еслиошибка(A1/A1*A1;"-")"  
Я так понимаю ошибка в "-", если вместо поставить 0 то все норм, но мне нужно "-". Помогите, пожалуста!
 
Range("A1").FormulaLocal = "=ЕСЛИОШИБКА(A1/A1*A1;""-"")"
 
чем, нравиться VBA, что там есть кнопка Макрос- Начать Запись. Сделайте это, а потом в ячейку вводите хоть любую формулу, которая Вас интересует. Когда закончите, нажмите Макрос-Остановить Запись. Потом войдите в редактор VBA, скорее всего в модуль 1 и увидите туже формулу на языке VBA. Что-что, а формулы VBA прекрасно умеет записывать.
 
{quote}{login=}{date=14.05.2012 09:46}{thema=}{post}Range("A1").FormulaLocal="=еслиошибка(A1/A1*A1;"-")"{/post}{/quote}  
а потом еще и Excel материться начнет - на циклическую ссылку :)
фрилансер Excel, VBA - контакты в профиле
"Совершенствоваться не обязательно. Выживание — дело добровольное." Э.Деминг
 
:-)
 
с формулами ошибок не сталкивался, но "нормальные" формулы можно спокойно записывать с помощью VBA. Что-то мне кажется, что ошибки лучше всего обрабатывать не формулами Excel , а в VBA (Range - Errors - Error)
Страницы: 1
Читают тему
Наверх