Claudio Cruz

Enviame los archivos a [email protected] y así podría evaluar mejor si puedo ayudarte.

Prueba el siguiente código: Sub sumRango() Dim cellIni$, cellFin$, varSuma cellIni = "C2" 'Esta celda corresponde a la primera fila de tu tabla de valores Range(cellIni). Select 'Nos posiscionamos en la primera fila de valores Do If...

¿Podrías enviarme un ejemplo de lo que comentas? Mi correo es [email protected]

Necesitas de una fórmula condicional, en I558 escribe: =if(K558="contado","efectivo","cuenta corriente") Mi excel esta en ingles, pero el equivalente a la version en español es si. Es decir, si tu excel esta en español, la función a utilizar sera SI....

A ver, tengo un codigo que puede ayudarte, lo que necesitas es: Un formulario con un boton de comando, etiqueta, un combobox y otro boton de comando para cerrar el formulario. El codigo para el formulario es: Private Sub cmdGetDir_Click()...

Entonces, solo cambia lo siguiente: cellIni = ActiveCell.Offset(0, -1).Address y cellFin= ActiveCell.Offset(0, -1).Address Avisame si te funciona y te recomiendo probarlo completamente antes de finalizar la pregunta.

El código de abajo, podría ayudarte. Con este código copias una hoja la guardas en un archivo separado y la envías a la dirección de correo que tengas en la celda G22, al final eliminara el libro creado.

En ingles lo harías así: =MID(G22,1,SEARCH("@",G22,1)-1) Donde G22 es la celda donde se encuentra la dirección electrónica. Solo te falta buscar los equivalentes de estas funciones en español. Seguro que no tendrás problemas en localizarlos.

He hecho lo que comentas con el siguiente código: Sub InsLineas2() Dim cellIni$, cellFin$, varSuma Range("A3").Select 'Nos posicionamos en la primera fila de valores Do If IsEmpty(ActiveCell) = False Then cellIni = ActiveCell.Address 'Asignamos la...

Prueba con Range("H2").value = nombre