bacter582

Como estas amigo, disculpa la tardanza, no había visto tu pregunta, si todavía no has dado con la solución de tu problema te dejo aquí algunas notas. Suponiendo que tus datos están en un archivo llamado c:\datos.xls en ese archivo datos.xls Coloca...

Como estas amigo, tranquilo estamos para ayudar en lo que se pueda Ingresa un combobox y prueba este código, los distintos item en el combobox los agregas donde esta combobox1. Additem Private Sub CommandButton1_Click() Dim ctrl As Control Dim i As...

Crea un userform y agrega 10 textbox y un commadbuton y pruebas este código Cada vez que le des al botón te pedirá el numero de textbox a mostrar. Espero te sea de ayuda. Saludos Bacter Private Sub CommandButton1_Click() Dim ctrl As Control Dim i As...

Como estas amigo, desarrolle algunas fórmulas para resolver tu problema Espero te sean de ayuda Primero incluí una fila de encabezado entonces ahora las fechas empiezan a partir de A2=01-01-2011 La columna B se llama es domingo, la columna C se llama...

Si son números positivos y negativos los que manejas, puedes usar las funciones máximo y mínimo para obtener el mejor y el peor resultado =MAX(A5:A13) =MIN(A5:A13)

No es necesario un macro para eso Con una fórmula obtienes el resultado que necesitas Prueba esta =SI(A2=A1;1;SI(B1=1;0;1)) Y la copias en toda la columna B

Como estas amigo Cuando aplicas el formato, solo es para visualización, el numero sigue guardado como originalmente era, si deseas redondearlo, debes aplicar la fórmula =redondear(A1;2) Y así si te tomara el valor redondedo Pruébalo y si tienes...

Como estas amigo, te dejo un modulo que te puede ayudar Saludos Bacter Sub buscar_y_colorear() Dim mirango As Range Dim busqueda As String busqueda = InputBox("Ingrese la palabra que busca") Range("a1").Select Set mirango = Range(ActiveCell,...

Como estas amigo, para puedes corres esta sencilla macro. Sub colocar_punto_y_Coma() Dim i As Integer Dim j As Integer For i = 1 To 2 For j = 1 To 30 Cells(i, j).Value = Cells(i, j).Value & ";" Next Next End Sub Si necesitas incluir más filas o...

Sustituye en el primer if la ,"""", por ,RC[-1].