Respuesta
en
Microsoft Excel
y en 1 temas más
a
Extraer el año, mes y día de una tabla a otra?
Prueba así Sub REG_CONT() Set h1 = Sheets("REG") Set h2 = Sheets("DAT") f = j j = j + 1 n = 0 dc = "D" h2.Cells(j, "A") = h1.Cells(i, "A") h2.Cells(j, "B") = h1.Cells(i, "B") h2.Cells(j, "C") = h1.Cells(i, "C") h2.Cells(j, "G") = Year(h1.Cells(i,...
Respuesta
en
Microsoft Excel
y en 1 temas más
a
Como modificar mi macro para regresar a la hoja activa
No es necesario que cambies de hoja, puedes poner lo siguiente y copia de la hoja "machote" a la hoja "destino" Sub Restaurar() ' Restaurar Macro' Restaura los valores de la hoja ' Acceso directo: CTRL+r Sheets("Machote").Range("B7").Copy Sheets("Leo...
Respuesta
en
Microsoft Excel
y en 3 temas más
a
Como cambiar el fin de línea (LF a CRLF) en un archivo excel con VBA
Intenta lo siguiente, en una celda cualquiera que no ocupes escribe el número 1. Copia esa celda donde escribiste el número 1 (la celda quedará con el marco punteado de que está la celda copiada) Ahora, selecciona las celdas que tienen los datos. Ve...
Respuesta
en
Microsoft Excel
y en 1 temas más
a
Mal funcionamiento de código para copiar valor variable en celda definida por otras variables
Cambia esto: 'SI ESTÁ en JORNADAS copiamos el día # para mover el cursor a la celda fecha If Not busca Is Nothing Then ' Selection.Cells(1, 1).Select ActiveCell.Activate fecha = (2 + quedia) ActiveCell.Offset(0, fecha).Activate ActiveCell = quelugar...
Respuesta
en
Microsoft Excel
y en 1 temas más
a
Como mejorar copiar y pegar de una tabla a otra
Te anexo una opción Sub pegadato() Application.ScreenUpdating = False u = Range("E" & Rows.Count).End(xlUp).Row Sheets("Liquidacion_Nomina").Range("E10:G" & u & ",M10:Q" & u & ",V10:Z" & u & ",AB10:AB" & u).Copy...
Respuesta
en
Programación
y en 2 temas más
a
Guardar cada 20 segundos excel pero que no se abra si se ha cerrado el libro
Realiza lo siguiente: Cambia el siguiente código Private Sub Workbook_open() Application.OnTime Now + TimeValue("00:00:20"), "savebook" End Sub Por lo siguiente: Private Sub Workbook_open() Call savebook End Sub ' Private Sub...
Respuesta
en
Microsoft Excel
y en 1 temas más
a
Abrir archivo txt modificarlo y ¿Como guardarlo con el mismo nombre pero con extensión csv?
Supongo que ya tienes la macro para modificar tu archivo. Entonces utiliza lo siguiente para abrir el txt y después para guardar como csv: Sub Abrir_Txt() 'Por Dante Amor 'ABRIR txt ruta = ThisWorkbook.Path & "\" arch = "algo1" Workbooks.OpenText...
Respuesta
en
Microsoft Excel
y en 1 temas más
a
¿Cómo puedo crear una macro en excel que bloquee ciertas celdas combinadas al cumplir una condición con un botón?
Cuando modificas una celda combinada, en Target tienes todas las celdas que componen la celda combinada, por lo tanto, tienes que bloquear el rango completo de las celdas. Suponiendo que tienes las celdas combinadas C5 y D5; y también, quieres...
Respuesta
en
Microsoft Excel
y en 3 temas más
a
Visualizar un PDF dentro de un Form en Excel
Realiza lo siguiente: 1. Entra a al menú de VBA, Herramientas, Referencias y marca la casilla de Microsoft Internet Controls. 2. Abre tu userform, entra al menú VBA, Herramientas, Controles adicionales y marca la casilla Microsoft Web Browser: 3....
Respuesta
en
Microsoft Excel
y en 1 temas más
a
Como reemplazar los datos de una columna por otro valor en excel con uma macro
No tengo claro el resultado que necesitas, solamente pusiste una imagen, ayudaría si pones otra imagen con el resultado esperado. Mi duda es porque pusiste este comentario: Dependiendo el numero de empaques que se tenga por registro En tu imagen...