Dante Amor

Te anexo la macro Sub Borrar_Filas() 'Por.Dante Amor Application.ScreenUpdating = False For i = Range("C" & Rows.Count).End(xlUp).Row To 3 Step -1 If WorksheetFunction.CountIf(Range("C:C"), Cells(i, "C")) > 1 Then Rows(i).Delete Next...

Envíame tu archivo, me explicas cómo lleno el form y de dónde a dónde quieres pasar información y cuáles datos. Mi correo [email protected] En el asunto del correo escribe tu nombre de usuario “jonathan martinez salazar” y el título de esta pregunta.

Envíame 2 archivos, el primer archivo en excel con la información a exportar. El segundo archivo con la información en txt. Además me envías el procedimiento que realizar para exportar manualmente el archivo a txt, necesito que me digas que opción de...

Estás solicitando 2 macros. Te ayudo con la primera, y luego, en una otra pregunta que realices, te ayudo con la macro para guardar el archivo. Entonces, hay que pegar la información en el libro "resumen", ¿en cuál hoja? Cuál columna inicial, ¿en la...

En la segunda imagen no veo si tienes más profesores, si están hacia abajo o hacia la derecha. ¿Cada profesor tiene un cuadro de "Criterios"? Deberías tener en una hoja con la lista de profesores, de esa forma sería más fácil la captura del profesor...

Te anexo la macro, que realiza lo siguiente: Ejecutas la macroTe solicita abrir el libro externo, iniciando en la carpeta del escritorioSelecciona un libroLa macro abre el libro seleccionadoSelecciona la hoja del libro externoDebes seleccionar el...

No entiendo muy bien qué quieres hacer, mejor explícalo con ejemplos y con palabras. No entiendo si quieres poner el resultado de la operación en el textbox2 Podría ser así: Range("B2").Value = TextBox1.Value If TextBox1.Text = "Comida de trabajo"...

Lo más práctico es guardar el archivo en la misma carpeta donde tengas el archivo con la macro, de esa manera la macro funcionaría en cualquier computadora. Pon tu macro para actualizarla.

Envíame un correo nuevo con tu archivo y con datos de prueba, me explicas uno de los ejemplos y me dices qué esperas de resultado

Si entendí bien quieres copiar lo que tienes de G1:G600 a las celdas L1:¿L600? Puede ser así: Sub Copia_Rango() Range("G1:G600").Copy Range("L1") End Sub . 'S aludos. Dante Amor. Recuerda valorar la respuesta. G racias . Avísame cualquier duda .