Огромное человеческое Спасибо и дай Бог тебе здоровья!
Все работает, подправил немного строки 22 и 32 - я видел - вот это вы имеете ввиду:
Пустые.jpg
Так я так и сделал - посчитал в них цикл StringGriD-ов 1 и 2
Код:
for i := 0 to StringGrid1.RowCount-1 do
пока попробовал стал писать ответ, спустился ниже - смотрю а там уже так написано)))
Все бьет - открыл файл MS Excel, там в каждой таблице по 25 строк (с учетом заголовков), но так как выше я сделал загрузку со второй строки MS Excel в StringGrid 1 и 2, то полчилось что выгружалось в каждую таблицу по 24 строки. Открыл полученный XML файл в Notepad++, грохнул все лишние строки, в итоге полчилось то, что и должно было получиться а именно 48 строк из двух таблиц обернутых в тэги.
Вот так как код написан сейчас он работает четко, без "пустышек".
Спасибо еще раз! От души!