Text alignment when passed to workbook using the offset function

[AndyEd]

I'm using the following to pass a textbox value to a cell reference within a worksheet.

.End(xlUp).Offset(1, 2).value = Me.txtRequester.value

How can I specify that the cell value is centered when passed across. I guess it's using TextAlign=fmTextAlignCenter, but I'm not sure how or where?

The options I have found mention an active cell, but there is not one in this case.

Any help would be greatly appreciated.

 

[NoSparks]

like this

With Range("D1").End(xlUp).Offset(1, 2)
    .Value = Me.txtRequester.Value
    .HorizontalAlignment = xlCenter
End With