Dante Amor

Dante Amor

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

Respuestas en Visual Basic

Respuesta en y en 3 temas más a

Como copiar solo celdas con contenido

Puedes poner un ejemplo de lo que tienes en tu rango y cómo esperas el resultado. Si pudieras poner 2 imágenes, una donde se vea el rango de celdas a copiar y otra imagen donde muestres cómo quedaron las celdas pegadas.
Respuesta en y en 2 temas más a

Me gustaría saber si se puede determinar en excel si el RFC es persona física o moral

Partiendo de esta base: Morales: Se compone de 3 letras seguidas por 6 dígitos y 3 caracteres alfanumericos =12 Físicas: consta de 4 letras seguida por 6 dígitos y 3 caracteres alfanuméricos =13 Entonce podemos saber si es física o moral por el...
Respuesta en y en 2 temas más a

Que Macro utilizar para leer varios archivos de Exención .CSV para dejar una lista en Excel?

Faltaron algunos detalles en tu petición. - Cómo se llama la hoja donde vas a poner los resultados - En cuáles columnas vas a poner los resultados - La sumatoria de la columna G ya está hecha, en cuál celda está la sumatoria, o la macro tiene que...
Respuesta en y en 1 temas más a

Quiero hacer dinámica una macro que oculta filas

Cuando dices dinámica, supongo que te refieres a la última fila con datos de la columna D. Te anexo la macro actualizada Sub ocultarfilas() 'Act.Por.Dante Amor 'Macro para ocultar filas que no tengan matriz Application.ScreenUpdating = False u =...
Respuesta en y en 2 temas más a

Macros que me acumule Datos en filas consecutivas una debajo de otra de una hoja por, Datos colocados en un formato de hoja Y.

Te anexo la macro. Deberás actualizar en la macro los nombres de las hojas; en cuál columna destino va cada dato, te puse algunos ejemplos. Sub Registrar() '--- ' Por.Dante Amor '--- ' Set h1 = Sheets("HojaY") 'Hoja formato Set h2 = Sheets("HojaX")...
Respuesta en y en 1 temas más a

Enviar Rango de Celdas a diferentes correos electrónicos

Te anexo la macro actualizada Sub Folio() 'Act.Por.Dante Amor Dim NombreArchivo As String, ruta As String, j As Integer, i As Integer Dim dam As Object ' ruta = "C:\Compartida\COLILLAS DE PAGO" ' j = 1 For i = 2 To Range("H" &...
Respuesta en y en 1 temas más a

Buscar registros repetidos y mostrarlos en un listbox

Te anexo la macro actualizada Private Sub CommandButton1_Click() 'Por.Dante Amor 'Validar apellido en columna A y nombre en B If TextApe = "" Or TextNom = "" Then MsgBox "Captura apellido y Nombre" Exit Sub End If Set h1 = Sheets("Registros") 'nombre...
Respuesta en y en 2 temas más a

Macro para imprimir recurrente en Excel después de Buscarv

Te anexo la macro suponiendo que tus clientes están en la hoja "clientes" y en la columna A tienes los códigos de cliente, más o menos de esta forma: Ahora, en la hoja etiquetas (hoja para imprimir), en la celda "D2" pones el código de cliente...
Respuesta en y en 2 temas más a

Buscar valores repetidos en una columna y, en caso de encontrarlos, verificar si los valores de la columna contigua también se r

Te anexo un ejemplo para que lo adaptes a tu formulario Private Sub CommandButton1_Click() 'Por.Dante Amor 'Validar apellido en columna A y nombre en B If TextApe = "" Or TextNom = "" Then MsgBox "Captura apellido y Nombre" Exit Sub End If Set h1 =...
Respuesta en y en 2 temas más a

Macro q busque una fecha y rango en todas las hojas del libro y las pegue como imagen una debajo de la otra en una sola hoja

Te anexo la macro. Crea una hoja llamada "Resumen" En la celda "F1" de la hoja "Resumen", pon la fecha que necesitas Cambia en la macro en esta línea: filas = 10, el número 10 por el número de filas que contiene el recibo. Sub Resumen_Recibos()...