CELLS() - Fish Information From One Worksheet To Another

I'm trying to fish information from one worksheet to another.... Here's my sub, what's my SUBcranial problem?


Private Sub bt_PopulatePage_Click()
' Inventory Data Transfer to Report Structured Page
Sheets("Liquor Data").Select 'Switch to Liquor Data Sheet
Dim x 'Line Numbers x = Liquor Data Line

For x = 2 To Last_Row("B") 'Start at the first Liquor Entry Line
Sheets("Liquor Data").Select
t_liq = Cells(x, 2) ' Liquor Name in Starting in B,2
t_Class = Cells(x, 4) ' Class starting in B,4
t_type = Cells(x, 5) ' Type Starting in B,5
t_dist = Cells(x, 8) ' Distributor Starting in B,8
Sheets("Inventory Form").Select 'Select Inventory Page
Cells(x + 7, 1) = t_liq
Cells(x + 7, 2) = t_Class
Cells(x + 7, 3) = t_type
Cells(x + 7, 4) = t_dist

Next x
End Sub