прдположим  
b=10-15  
как сделать чтобы ответ был 5 а не -5 только без квадратов и корней чо то такого простого действия не нашел в vba

как сделать чтобы вместо буквы в ячейки было число  
B = 15  
Cells(1, 2) = Mid("ABS", 2, 1)

при открытии текстового файла при помощи  
Workbooks.OpenText  
вот в этой строке макроса ошибка  
If "%" & Workbooks("1 (" & x & ").txt").Worksheets("1 (" & x & ")").Cells(b, 1).Value = "%" Then  
это получается потомучто excel при открытии текстового файла вместо строки -lyla-eos вставляет формулу =-lyla-eos как это избежать

имеется столбец в котором строки текста чередуются с пустыми строками. Необходимо изменить столбец таким образом чтобы сумма любых подряд идущих строк текста + сумма ниже лежащих пустых строк равнялось 100 при условии что максимальное число строк подрят (без пустых строк) исходного столбца меньше 90