Como poner hora y fecha en otras celdas Buenas tardes, qusiera ver quien puede ayudarme con esta situacion, en la siguiente sentencia, estoy pidiendo que cuando se escriba algo en la celda B41:B90, en las celdas E y F, me ponga fecha y hora respectivamente, pero no se pone al menos que borre datos( aunque no los hay en la celda , yo quiero que al aparecer los datois que se ponen en la celda B41, automaticamente me aparescan los datos en las celdas E y F. Esta es la sentencia que yo estoy usando: Private Sub Worksheet_Change(ByVal Target As Range) If Not Application.Intersect(Target, Range("B41:B90"))" Is Nothing Then" Range("E" & Target.Row) = Date …

Cordial saludo, quisiera saber si es posible crear una macro en Excel que abra varios archivos PDF de una carpeta, los imprima y luego los cierre; los nombres de los archivos se encuentran en una hoja de Excel. agradezco toda la ayuda posible. Saludos, PedroCS

Buenas a todos. Desde antes gracias por su ayuda. Tengo un codigo para insertar una imagen cuando cambia la celda "E5" la imagen la inserta segun el valor de la celda "G3". Pero quisiera que me insertara la imagen que se llama "Imagen no encontrada" cuando la imagen no exista dentro del directorio. Private Sub Worksheet_Change(ByVal Target As Range) If Not Target.Address = "$E$5" Then Exit Sub On Error Resume Next 'Control de errores Me.Shapes("Foto").Delete ActiveSheet.Shapes.AddShape(msoShapeRectangle, 432.3077165354, 1, _ 118.8461417323, 105).Select Selection.ShapeRange.Name = "Foto" Selection.ShapeRange.Fill.Visible = msoFalse Se…

antes que nada saludos todos, me gustaria saber como puedo pasar datos de una hoja cualquiera de un libro cualquiera a un formulario en especifico, la intension es hacer que otra persona llegue con su usb y su informacion previamente capturada para evitar copiar y pegar en el nuevo libro, tambien me gustaria saber los pros y contras que generaria, para ello se me ocurre la propiedad showmodal del formulario pero como no me ha funcionado, ¿alguien puede optimizar esta idea? o alguien sabe alguna otra? de antemano muchas gracias del libro al formulario.rar

Tengo una macro que me abre ie y me abre una web https logueandome con user y password, pero después de eso necesito que navegue dentro de la pagina a otra dirección, el primer paso me lo hace con la web que adjunto pero el siguiente paso no, me echais una mano. Es decir despues de .Navigate range("I4").Value tengo que ir a .Navigate range("j4").Value, como construyo esta macro. (puedo jacerlo con ie o con cualquier otro navegador). Un saludo. IR() Set obj = CreateObject("InternetExplorer.application") With obj .navigate Range("I4").Value End sub

Amigos como están, necesito que me ayuden con un problema, tengo que agrupar horas de trabajo de acuerdo a la cantidad y una fecha específica. Por ejemplo tengo a la persona: Andrés, él trabajo en las siguientes fechas: 21 enero 2014: entró a trabajar a las 8:00 horas y terminó a la 13:00 horas, total horas trabajadas (5) 21 enero 2024: (ese mismo día en la tarde entró a las 15:00 horas y salió a las 23:00 horas, total de horas trabajadas (8) Se considera el siguiente sistema para agrupar las horas normales y horas extras: - Normales hasta las 8 horas - Extras_1 = entre 8 y 10 horas - Extras_2 = mayor a 10 horas Entonces el día 21 enero 2014 Andrés trabajo 13 h…

Me surgió la duda de como automatizar mediante una macros un registro que al seleccionar un empleado , año, mes y dia se filtre los datos correspondientes y pegarlos a una hoja con el mes y dia seleccionado... les subo mi avance espero su ayuda Empleados_Prueba2.rar

Buenas tardes, soy nueva aquí y necesito ayuda Necesito crear un programa en excel que haga lo siguiente: En un excel llamado "PRUEBA" tengo escrito lo siguiente en una columna: ensayo 1 ensayo 2 ensayo 3 ... (hasta x ensayos) Tengo que crear un programa que lea esa columna, por ejemplo, que lea "ensayo 1", busque el documento excel con ese mismo nombre, lo abra, haga el promedio de los datos que aparecen en columnas en la ultima fila, copie esa ultima fila (los promedios), y los pegue en la fila del documento excel llamado "PRUEBA" donde pone "ensayo 1" justo después de "ensayo 1". He hecho la parte de las medias por individual pero no se como hacer todo eso …

Estimados, ojalá y me puedan ayudar a solucionar este error que anexo.... y les platico... Resulta que este archivo trabaja muy bien en mi máquina y en la de todas donde trabajo, pero cuando se lo mandamos al cliente les manda este error solo a ellos, ya lo revisó el cliente con su gente de sistemas pero ahora piden que si se puede compilar a 64 bits. Me pueden ayudar a solucionarles este problema que solo a ellos les arroja? De antemano, muchas gracias y saludos. error compi.zip

Buenos días tengais Vereis, con esto de no poder tocar el documento mientras está activado el userform, me preguntaba si sabías de algún modo de poder recorrer un documento como la celda activa a través del userform. Aquí os dejo un ejemplo de como lo había pensado (Las ideas son bienvenidas) Había pensado poner un scrollbar dentro del userform y al clickar que la celda activa fuera bajando hasta el final del documento. Además de agregar dos botones para ir tanto al principio (Pone en el botón A1, asumiendo que el texco comienza en ese punto) y otro que apunte a la última fila ocupada. grácias por vuestra ayuda, saludos. Scroll.zip

Hola, tendo dos dudas, la primera es como puedo hacer para que cuando le doy al boton guardar me deje el textbox1 y textbox2 con los datos que tengan puestos y que me borre combobox1, combobox2 y textbox3 centrando el foco en combobox1, ahora mismo lo tengo como esta porque no consigo mi proposito. Y la segunda duda es como puedo pasar los datos del formulario a la Hoja2 en las posicones que pongo como ejemplo en dicha hoja y de forma ilimitada y quiero decir de forma ilimitada que no se limite a las ocho posiciones que tengo en el ejemplo. Libro1.rar

Buenos dias encontre este excel para control de almacen y lo quise probar al hacerlo me sale el error cuando le doy dobe click a informe de movimientos segun lo que se aprecia en la captura de pantalla en el word adjuntado. agradeceria mucho su ayuda gracias Excel Stock Control con Access.part1.rar Excel Stock Control con Access.part2.rar

Hola a todos, me estoy encontrado con un problema, y no le encuentro solución por ninguna parte. Cuando desde un libro de excel llamo a otro y le pido que me ponga un formulario de otro excel, y repito esta acción varias veces, este ya no aparece, y no logro entender porque esto sucece. Adjunto dos archivos con el asunto en cuestión. Como siempre, muchas gracias por vuestra ayuda. PRIMERO.xls SEGUNDO.xls

Buenas noches, tengo un problemilla y he estado buscando por internet pero no encontre nada, espero que me puedan ayudar en el foro de la misma forma con la que yo espero ayudar. El problema es el siguiente. Tengo un libro con varias hojas, entre ellas las siguiente: Empleados con los Nombre de empleado y el turno en el que trabaja , Mañana Tarde o Noche, con cada uno de los dias del mes (vamos un cuadrante de turnos) Cuadrante con una lista desplegable que coge el nombre del empleado y después en cada una de las celdas pone de los dias de la semana todo cogido de Empleados. Con esto consigo ver en la hoja Cuadrantes, el cuadrante individual de ca…

Buenos días a todos y Felices Fiestas. Tengo un problema que espero me podais ayudar. Tengo un Calendario en Excel y necesito buscar el dia 1 en que celda está. Uso el siguiente comando: Fila = Hoja1.Range("B5:H10").Find("1").Row Colu = Hoja1.Range("B5:H10").Find("1").Column Pues bien, sencillo no? solo tengo que buscar el valor 1, pues lo que me hace es darme la fila y columna del número 10. Alguien sabe porque? Muchas gracias y un saludo

Hola que tal, quisiera hacer una consulta, intente desarrollar la siguiente macro pero me surgieron algunas dudas. La misma consiste en levantar todos los datos de una Tabla de excel, (siempre estará en la misma ruta) y pegarlos en el libro activo, en la celda activa donde ejecuto la macro. Osea esta macro la voy a guardar como complemento y así utilizarla en cualquier excel que abra, por eso necesito que el código me reconozca el excel donde la ejecuto para poder pegar los datos de la tabla y obvio luego me lo cierre sin guardar. Así es como lo propuse, pero solo anda para un libro llamado "Libro1" y necesito que ande para cualquiera, ademas tampoco me estaba p…

Hola amigos de Ayuda Excel. Nuevamente por aquí para pedirles un . He intentado hacerlo pero pero no logro el objetivo. Necesito copiar el rango A5:K5 (fila que estará siempre oculta) y deben ser insertadas 5 filas iguales en la primera celda vacía de la columna A. La macro se ejecutará a través de un botón. Agradecido de antemano por su valiosa colaboración. INSERTAR 5 FILAS AYUDA EXCEL 2.xlsm

Buenos días, he diseñado una plantilla de excel para recoger estadísticas en tiempo real sobre un partido de fútbol sala. He creado una macro para cronómetro general, es decir, se inicia con el partido y se finaliza cuando termina, pero necesito saber el tiempo que participa cada jugador en dicho partido en relación a ese crono. Sería que cada vez que el jugador entra a jugar se empiece a sumar en su cuenta personal, cuando sale se pause el crono y se active cuando vuelva a entrar. Los cambios son ilimitados. tengo 3 "BOTONES" 1"TITULAR". Debe recoger el tiempo del jugador desde que se inicia el partido. 2"ENTRA". Debe registrar el tiempo del jugador …

Hola a todos: Hoy soy yo al que le toca recurrir a vosotros para ver si alguno se ha visto en la misma situación En el adjunto, al introducir cualquier valor en una celda y por medio del evento Worksheet_Change(), se muestra un formulario donde se van registrando los valores introducidos. El formulario se muestra como No Modal, de forma que puedo volver a la hoja e introducir otro valor en otra celda. El problema consiste en que, al mostrar el formulario este queda activado y no me permite volver a la hoja de forma automática, o sea, tengo que seleccionar de nuevo la celda donde quiero introducir la información. A ver si alguien conoce, algún méto…

Buenos días; A ver si me podéis ayudar. Tengo una consulta SQL en Excel que me cuenta las fechas por número de semana, todo funcionaba bien hasta este año. Buscando por internet he encontrado la solución ( [vbMonday],[vbFirstFourDays] ) pero no me funciona, no sé qué pongo mal. Esta era la consulta que funcionaba hasta este año ( ahora en la semana 8 me cuenta lo de la 7 ). Query = "Select count (Columna1) from [Hoja1] where Columna1 In" & Datos & "And DatePart('ww',Columna2)=" & SemanaActual & "And DatePart('yyyy', Columna2)=" & AñoActual & "And (Not tipo_Columna3='No' or Columna3 is null)" Esta es con la solución qu…

Hola chicos, Se me ocurre una idea, y no sé si es posible ejecutarla. El tema es el siguiente: "Tengo un código con el típico 'On error goto error' y dentro de la etiqueta error otro código con un MsgBox que me informa del tipo y número de error producido. Aquí el ejemplo: Sub HolaMundo() ' Limpiamos los errores anteriores (por si acaso)... Err.Clear ' Tratamos los errores del procedimiento... On Error GoTo error (AQUÍ EL CÓDIGO DEL PROCEDIMIENTO) salir: ' Y salimos del procedimiento... Exit Sub error: ' Mostramos por pantalla el tipo de error y la descripción del mismo... MsgBox Prompt:="Upps, parece que hubo un error... …

Private Sub CommandButton29_Click() With UserForm1 TextBox2 = TextBox2 - 1 Unload Me End With End Sub no logro que reste una vez que lo doy al boton! que puedo haccer!

Chicos, una pregunta express: ¿Cuál era el método para ocultar las ventanas de alerta como por ejemplo, la ventana de cerrar la aplicación (ya se me olvidó... ?‍♂️)?

Buenas tardes, espero puede conseguir una ayuda urgente a un caso que me acaba de suceder. estuve haciendo un proyecto en la PC de mi casa que es excel 365 y para poder transformar valores de numeros utilice el "Format" por ejemplo: Format(.Cells(fila, 2), "00000") - "en lugar de mostrarme 1 , con este Format me mostraba 00001" Format(Val(Sheets("TEMP").Cells(fila, 18)), "#,##0.00") - "en lugar de mostrarme 10000", con este Format me mostraba 100.00 Pero ahora estoy ejecutando en una PC que usa Excel 2013 , me sale error en todos estos Format que habia considerado. Espero alguien me pueda ayudar, si puedo cambiar el Format con otro co…

Estimados buenas noches. Agradecería su colaboración con el siguiente caso: Estoy con el siguiente código que no me funciona, necesita dar doble clink en el ListBox y que se cargue la información en la hoja excel, cada click debe ir colocándose desde la ultima celda utilizada para abajo. Codigo Private Sub ListBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean) Dim uf As Integer uf = Hoja2.Range("A" & Hoja2.Rows.Count).End(xlUp).Row + 1 With Me.ListBox1 Hoja2.Cells(uf, 2) = .List(.ListIndex, 0) Hoja2.Cells(uf, 6) = .List(.ListIndex, 2) Hoja2.Cells(uf, ? = .List(.ListIndex, 3) End With ListBox mas hoj…