Daniel Espino

Daniel Espino

Cuando sientas que no puedes seguir, da 3 pasos más...
 61,7K puntos  Ciudad de México, México @danielespino2 desde - visto
Preguntar

Microsoft Excel

Pregunta: ¿Cómo evitar que se trabe excel?
Cuando pones muchas fórmulas cada que haces un cambio por mínimo que parezca vuelve a calcular todas tus fórmulas lo que gasta recursos en tu computadora, lo mejor cuando son muchos datos es usar macro, ¿Cómo tienes tus datos?
Pregunta: Zoom en Celda de excel para escribir
Todas funcionan bárbaro. Me quedo con la ultima. BUENÍSIMO. GRACIAS
Pregunta: Ejecutar macro solo si no se rebasa la fecha del reloj del equipo
¡Gracias! También me ha funcionado a la perfección, agradezco mucho de su apoyo. Mil gracias.
Pregunta: Excel vba problema al ejecutar macro desde checkbox
Bueno ya que solo pones eso no se el evento que estas poniendo para aplicar la macro. Solo necesitas quitar los paréntesis a Now, te dejo un ejemplo: Private Sub CheckBox1_Click() If CheckBox1.Value = True Then Range("C2").Value = Now End Sub Se...
Pregunta: Como ejecutar una macro al cambiar el valor de la celda b4
¡Gracias! Es todo lo que esperaba. Saludos.
Pregunta: Verificar que nuevas filas estén incluidas en un rango con formula (sumar)
¡Gracias! Entendí tu lógica y funciona muy bien! mientras mantenga fijo el encabezado puedo insertar filas arriba o abajo del rango y las sumas también tomarán estos valores sin tener que ajustar manualmente el rango (corriendo el riesgo del olvidar...
Pregunta: Asignar porcentaje de acuerdo a cierto precio
¡Gracias! Excelente respuesta
Pregunta: Macro que me automaticé un buscarv
Daniel, muchas gracias, quedo excelente.
Pregunta: Separar entero, punto, y decimal como entero, a tres celdas diferenciadas
Para mi es más fácil con macro te evitas algunas operaciones en celdas y y fórmulas Sub dividir() Dim a As String Dim b() As String a = Cells(1, 1) b = Split(a, ".") Cells(1, 2).NumberFormat = "@" Cells(1, 2) = String(10 - Len(b(0)), "0") & b(0)...
Pregunta: Macro para copiar dato de A1 - HOJA1 en la primer celda vacía de la columna "C" - HOJA2
Con algo así debería ser suficiente: Sub copiar() Set h1 = Sheets("Hoja1") Set h3 = Sheets("Hoja3") h3.Cells(1, 3).End(xlDown).Offset(1, 0) = h1.Cells(1, 1) End Sub