Excel avanzado macros

Buen día tengo una hoja principal con las siguientes características:

HOJA PRINCIPAL
B6 C6 D6 E6 F6
ID_CATEGORIA CATEGORÍA DESCRIPCIÓN CANTIDAD VALOR
DATOS FILA 7: XX XX XX XX XX

La macro toma los valores de esta hoja, y los compara en otra hoja, luego suma o resta automáticamente dichos valores teniendo en cuenta si hay existencias de unidades. Ahora bien la macro solo toma un solo valor en este caso el de las cantidades, lo que deseo es que también me tome los valores de la columna (VALOR) específicamente Fila F7. Donde se coloca el valor y que haga lo mismo que hace con la columna CANTIDAD fila E7.

Esta es la macro:

If ActiveCell.Value = ID And CONTROLB = "SALIDA" Then

ActiveCell.Offset(0, 3).Select 'Valor (por,y) y = al valor de la columna 4 de la hoja inventario casilla con el nombre valor
bodegaanterior = ActiveCell.Value
If bodegaanterior < CANTIDAD Then
MsgBox "No hay artículos suficientes" & Chr(13) & "Sólo hay " & bodegaanterior & " artículos en bodega.", vbOKOnly + vbCritical, "**Información de bodega"
Sheets("PRINCIPAL").Select
Exit Sub
End If
bodeganueva = Val(ActiveCell.Value) - Val(CANTIDAD)
ActiveCell.Value = bodeganueva
Selection.End(xlToLeft).Select
MsgBox "Salieron " & CANTIDAD & " " & DESCRIPCIÓN & " de bodega." & Chr(13) & "Disminuyó de: " & bodegaanterior & " a " & bodeganueva & " artículos.", vbOKOnly + vbInformation, "**Salidas"

Esta macro corresponde a la casilla de SALIDA, hay otra macro que corresponde a la casilla ENTRADA. Con las mismas características, en este ejemplo coloco solo esta puesto que teniendo ya esta organizada solo seria copiarla para la casilla de ENTRADA.

Muchas Gracias por su colaboración,