Hi,

I'm experincing some problems with trying to accomplish the following.

Using Excel as a DB and have exisiting code that will enter a ne
record after the last entry in the list.

Before the Data Entry form is displayed i would like to copy the Cel
Format of the previous columns for the new record column only.

The following activates the first cell of the required range (the lef
most):

ActiveWorkbook.ActiveSheet.Activate
Range("A1").Select
Do
If IsEmpty(ActiveCell) = False Then
ActiveCell.Offset(1, 0).Select
End If
Loop Until IsEmpty(ActiveCell) = True
ActiveCell.Value = txtClarifyRef.Value
ActiveCell.Offset(0, 1) = txtCaseTitle.Value
ActiveCell.Offset(0, 2) = cboOperatingSystem.Value

ActiveCell.Offset(-1, 14).Select

I am hoping to select a range from this ActiveCell to an offset valu
(10 columns along). Copy the formatting (not the values) and apply i
to the row below (but with same column references)

--
Message posted from http://www.ExcelForum.com