jrgces

Puedes usar =INDICE(A:A;FILA()*2) a partir de la fila 1 de cualquier celda, y sustituir *2 por el número que necesites. Quizás haya que sustituir el punto y coma por una coma, dependerá del separador de listas que esté establecido en la configuración...

Prueba con: =DESVEST(SI(A1:A6="COMPRA";C1:C6)) que creo que es correcta, puesto que devuelve lo mismo que =DESVEST(C1;C3;C4)

Rows.Delete borra todas las celdas de la hoja, de ahí los errores #¡REF! Que aparecen en las fórmulas. Hay al menos dos soluciones: 1) Ajustar el rango de celdas borrado, para que no incluya a la celda a la que hace referencia la fórmula. 2) Usar la...

Por ejemplo, para A1, seleccionando en la validación la opción 'Personalizada', la fórmula sería: =Y(CODIGO(A1)>=65;CODIGO(A1)<=68) Quizás haya que sustituir el punto y coma por una coma, dependerá del separador de listas que esté establecido en la...

Prueba desde VBA: Alt F11 Ctrl G sendkeys({SCROLLLOCK}) Tecla entrada

Si por ejemplo el rango Lista fuese de 10 filas, habría que seleccionar el rango A1:A10 de Hoja2 y poner como fórmula del formato condicional: =A1:A10<Lista

Antes del End Sub: Application.Goto [BF1], True

Por ejemplo, sin en A1 está la fecha: =FECHA(AÑO(A1)+3;MES(A1);DIA(A1)) devolverá la misma fecha de 3 años más tarde, así que sustituyendo el 3 por un 5 devolverá la fecha 5 años más tarde.

Puedes establecer una validación de datos en la celda, seleccionando "Personalizada" en el desplegable "Permitir:" y poniendo cómo "Fórmula:"...

Suponiendo que el cuadro de texto se llama TextBox1 y la hoja Hoja1, el código podría ser: [Hoja1!A1].Value = CLng(Left(TextBox1.Value, InStr(TextBox1.Value, "*") - 1)) [Hoja1!B1].Value = Mid(TextBox1.Value, InStr(TextBox1.Value, "*") + 1)