Dante Amor

Dante Amor

https://www.youtube.com/@CursosDeExcelyMacros
 5.749K puntos  Ciudad de México, México @aprendemos desde - visto
Preguntar

Respuestas en Ingeniería Informática

Respuesta en y en 1 temas más a

¿Cómo tomar datos de un Link?

Utiliza la siguiente fórmula: =ESPACIOS(EXTRAE(SUSTITUIR(A2,".",REPETIR(" ",99)),99,99)) Nota: Si utilizas punto y coma ( ; ), como separador de argumentos. Reemplaza la coma ( , ) por punto y coma ( ; )
Respuesta en y en 4 temas más a

Mostrar ListBox segun seleccion de ComboBox

Supongo que tienes algo como esto en tu combo: Prueba el siguiente código para el combo: Private Sub ComboBox1_Change() Dim i As Long With ListaEquipos .RowSource = "" If ComboBox1.Value = "" Or ComboBox1.ListIndex = -1 Then ListaEquipos.RowSource =...
Respuesta en y en 3 temas más a

Código para Imprimí hoja oculta

Tienes que hacerla visible para imprimirla. Una opción es utilizar lo siguiente, apagas la actualización de pantalla, haces visible la hoja y la imprimes, de esa manera no se muestra la hoja. Sub ImprimeHojaOculta() Application.ScreenUpdating = False...
Respuesta en y en 4 temas más a

Fórmula buscar con 3 criterios excel

Pon la siguiente fórmula en la celda H1 =SUMAPRODUCTO((A6:A17=G1)*(B6:B17=G2)*(C5:F5=G3)*(C6:F17)) Salu dos
Respuesta en y en 2 temas más a

Area de impresion en excel

Realiza lo siguiente: 1. Selecciona las celdas que quieras imprimir. 2. En el menú Diseño de página selecciona Área de impresión. 3. Selecciona la opción "Establecer área de impresión. Si quieres cambiar el área, repite los pasos Si quieres borrar el...
Respuesta en y en 2 temas más a

¿Cómo puedo combinar puntos y enteros en una sola casilla en combinación de correspondencia excel a word?

La forma en que resuelvo esos casos es creando una nueva columna en excel. Aquí explico algunos casos: Correspondencia en word la fecha sale en ingles como se pone en español? Guardar documentos de acuerdo a un texto variable Decimales en campos...
Respuesta en y en 2 temas más a

Añadir excepción al exportar ficheros txt visual basic excel

Hice algunos ajustes al código, prueba con el siguiente: Sub test() Dim hojas As Variant, sh As Variant hojas = Array("Hoja1", "Hoja2") Application.DisplayAlerts = False Application.ScreenUpdating = False Dim lr As Long For Each sh In hojas With...
Respuesta en y en 2 temas más a

Macro Mover todo el contenido de una carpeta en otra ruta excel visual basic

Prueba lo siguiente: Option Explicit Sub MoverArchivos() Dim archivo As Variant Dim origen As String, destino As String origen = "C:\trabajo\Folder1\" destino = "C:\trabajo\varios\" archivo = Dir(origen & "*.*") Do While archivo <> "" Name origen &...
Respuesta en y en 2 temas más a

Visual Basic macro crear carpeta en otra ruta

Tienes mal el nombre de la variable: Dim sseparadorruta as string Y la utilizas así: (te falta la primera letra "e") ssperadorruta = Application.PathSeparator Y luego la tienes con la letra "e": Application.ActiveWorkbook.SaveCopyAs Filename:=sruta &...
Respuesta en y en 4 temas más a

Leer archivo TXT y validar Campo + Ruta Computador

Prueba la siguiente macro. Pon los archivos txt en una carpeta. Los archivos modificados quedarán en otra carpeta. Cambia en el nombre de las carpetas en estas líneas: sPathIn = "C:\trabajo\Folder1\" 'Ruta con archivos origen sPathOu =...