Aşağıdaki örnekte, etkin çalışma sayfasındaki seçili aralıktan iki satır aşağıda ve üç sütun sağda olan aralığın içeriği çift alt çizgili olarak biçimlendirilir
Workbook.ActiveSheet.Selection.Offset[2, 3].Font.Underline := xlDouble;
Aşağıdaki örnek, B5:G7 aralığının kopyasını altına oluşturur
With Workbook.Sheets[1].Range['B5','G7'] do begin
Offset[Rows.Count, 0].Insert(xlShiftDown);
Copy(Offset[Rows.Count, 0], xlPasteAll);
end;