Dante Amor

H o l a: Envíame tu archivo con los formularios. Recuerda poner en el asunto tu nombre de usuario.

H o l a: En el archivo que me enviaste no pusiste ejemplos, las hojas están vacías. Podrías enviar un archivo con ejemplos. Importante: dime de todas las columnas que van a quedar en la hoja2, cuál de ellas siempre va a tener datos.

H o l a: En un correo nuevo puedes enviarme el archivo con algunos datos de ejemplo. Mi correo [email protected] En el asunto del correo escribe tu nombre de usuario “osmar luque” y el título de esta pregunta.

H o l a: Te anexo la macro Sub Bimestres() 'Por.Dante Amor Set h1 = Sheets("Hoja1") Set h2 = Sheets("Hoja2") h2.Cells.ClearContents k = 1 For i = 1 To h1.Range("A" & Rows.Count).End(xlUp).Row n = 1 a = h1.Cells(i, "C") For j = 1 To h1.Cells(i, "B")...

Te anexo la macro para cuando le des doble click al control Image te abra la ventana de diálogo y puedas seleccionar el archivo con la foto. Private Sub Fotografia_DblClick(ByVal Cancel As MSForms.ReturnBoolean) 'Por.Dante Amor If TxtCedula = "" Then...

H o l a: Te anexo la Función: Function CalculaFecha(hini As Range, hfin As Range, fini As Range, hora As Range) 'Por.Dante Amor h2 = hini.Address h3 = hfin.Address h5 = fini.Address hr = hora.Address rdo = Evaluate("=WORKDAY(" & h5 & ",INT(" & hr &...

H o l a: Te anexo la macro Sub BuscarFecha() 'Por.Dante Amor [F1] = Date dia = Date - DateSerial(Year(Date), 1, 1) + 1 Set b = Columns("A").Find(dia, lookat:=xlWhole) If Not b Is Nothing Then b.Offset(0, 1) = [D1] Else MsgBox "En la columna A no...

H o l a: Si no están habilitadas las macros, no se podría ejecutar una macro para habilitar las macros. Para que las macros estén habilitadas revisa el siguiente enlace: http://excelforo.blogspot.mx/2013/06/vba-habilitar-macros-de-excel.html Otra...

Te anexo la macro, al final ordena la información para que los códigos queden juntos. Sub FolioPredio() 'Por.Dante Amor Application.ScreenUpdating = False Application.StatusBar = False Set l1 = ThisWorkbook Set h1 = l1.Sheets(1) Set l2 =...

H o l a: ¿Y en dónde quieres que se genere la matriz? ¿En una hoja? ¿En cuáles celdas? ¿Siempre debe decir "Ciudad " y un número?