Vba To Pull Column Data Into Userform?

I got it when I click on the cell it loads the userform but it is populating with row data instead of column data.

I would like when I click on for example cell T4 and the userform pops up to see the textbox data going down the rows instead of across which is is currently doing.

so clicking on T4 brings my userform up filled in with information from

T5 and U5
T6 U6
T7 U7
T8 U8
T9 U9

I have when I click on the cell T4 column

label amount receipt

electricity 384.00 ZgHl2V

This way I can change amount or receipt and update my worksheet.

VB:
Private Sub UserForm_Activate()
Dim r As Long
r = ActiveCell.Row

[Code].....