VBA Excel. Meter valor de variable en celdas

'defino variables
Dim CONSUMO
Dim CÓDIGO

'meto el valor de la celda activa en la variable CONSUMO y el texto de la celda relativa a la
activa, la meto en la variable CÓDIGO
CONSUMO = ActiveCell.Value
CÓDIGO = ActiveCell.Offset(0, -34).Value

LA PREGUNTA ES LA SIGUIENTE: ¿Cómo meto los valores de las variables en las celdas de otra hoja, por ejemplo quiero hacer algo así, pero no se expresarlo en VBA:

Sheets("SALIDAS").Select
Range("B24") = CONSUMO

Sheets("SALIDAS").Select
Range("B23") = CÓDIGO

GRACIAS.