Enrique Bernal

Pues mira lo que yo creo es que tienes un simple propbolema de visualización, ya que en teoría deberías arregalro el formato de fechas y listo, ahora si el formato de fechas esta bien, el problema seríoa en el formato de ingreso: 1) Podrías cambiar...

En lugar de una macro yo pondría una fórmula, siguiendo tu ejemplo en D2 pondría:=SI(Y(A2="", C2>0), D1, A2) Revisa y dime si te funciona.

Bueno si lo haces desde las hojas de excel sin USEFORM yo te puedo ayudar, y si necesitas que controle que no se dupliquen debes indicar en base a que quieres el control, el nombre, el nombre y la edad,¿?

Pues eso no es tanto de excel si no de word, ya que en word existe algo que se llama correspondencia, en dfin estos son los pasos 1) Tienes bien definida tu lista en excel 2) Vas a Word y en la pestaña de correspondencia eliges Seleccionar...

Imagino que quieres un texbox que muestre info, en todo caso te comento que puedes utilizar esto: a = 01/06/2011 msgbox "Los datos han sido grabados el " & a & " en el archivo local"

Esta macro hace lo que necesitas la debes pegar en el visual de la hoja 1, pero debes considerar lo siguiente: 1) El juego por así llamarlo funciona en la hoja 1 desde la A1 hasta F19 2) Debes primero escribir en la hoja 2 todas las notas en la misma...

De poder se puede, pero es medio liado explicarte como funciona desde un block te invito a revisar el siguiente link donde puedes encontrar información más detallada http://dataage.blogspot.com/2009/03/calcular-horas-laborales-entre-dos.html

Pensaría que lo que necesitas es que Y = 153,5 y que la manera de determianrlo es usando la formula que me pasaste, pero no entiendo como funciona en la fórmula(4,3-4), que acción hace la ","

A ver si te entiendo, la macro funciona bien, ¿pero luego de terminar la impresión te sale ese error y te pide depurar? ¿O no hace lo que debe hacer y te pide depurar? Si es lo primero antes de entrar en detalles te diría que simplemente controles el...

Esto debería corregir el error Sub cmbCopiar() On Error GoTo Indice Dim a As String Dim d As String a = InputBox("Nombre del Archivo: ", "MiArchivo") d = a If d = "" Then Else Workbooks(a).Sheets("Mana_Infantil").Activate Selection.Copy...