Excel - rangos

haber amigo abraham, estoy trabajando con las opciones de Formularios que tiene EXCEL, y quiero que los valores sean copiados a un nuevo rango de celdas de las mismas dimensiones para poder de ahi ponerlos en una lista desplegable nueva, ajjjaja lo del macro si sale pero cuando copio el codigo del macro a la de la funcion personaliza, no funciona ...porque??? no se...ademas quiero que ni bien cambie de opcion elija al toque la columna sin necesidad de ejecutar un Macro

mira te envio lo que quiero hacer :

function nuevaformula(condicion)
if condicion=1 then
rango de entrada = columna1
elseif condicion=2 then
rango de entrada =columna2
end if
end sub

Porfa dime que entiendes... eso es basicamente lo que quiero, claro que eso esta mal, es solo un ejemplo pues.....pero quiero hacer eso y no me sale...