"IF пусто, THEN "" ELSE значение
Спасибо. Сделал так:
if ThisComponent.Sheets(0).getCellByPosition(C, R).Type = com.sun.star.table.CellContentType.VALUE then
ThisComponent.Sheets(1).getCellByPosition(Indx * 6 + N, R - StartColRow).SetValue(ThisComponent.Sheets(0).getCellByPosition(C, R).GetValue)
else if ThisComponent.Sheets(0).getCellByPosition(C, R).Type = com.sun.star.table.CellContentType.EMPTY then
ThisComponent.Sheets(1).getCellByPosition(Indx * 6 + N, R - StartColRow).ClearContents(1023)
else
MsgBox "Не Число! Данные потеряются!"
ThisComponent.Sheets(1).getCellByPosition(Indx * 6 + N, R - StartColRow).ClearContents(1023)
endif
endif