Tor Cheer

¿Para qué se cumpla la condición deben estar las 3 palabras o con que exista una sola de las 3 palabras? Con macro es más factible buscar.

Puede mostrar su código cuando envía los datos en excel, ahí podría estar la solución.

Si comparte una copia de su archivo sera más fácil ayudarle

No estoy en Monterrey pero si en algo le puedo ayudar con mucho gusto puede comentar lo que necesita o subir imágenes de sus datos, o enviar a mi correo una copia de su archivo de lo que necesita.

Esta macro es un ejemplo de lo que podría necesitar, ojala lo pueda adaptar a su macro Sub comparar() uf = Sheets("Resumen").Range("E" & Rows.Count).End(xlUp).Row + 1 For j = 1 To uf v1 = Cells(j, 5).Value v2 = Cells(j, 6).Value If v1 = v2 Then Else...

Si aplica la opción texto en columnas y como separador "espacio" puede hace la separación sin que tenga ancho fijo.

Intente con esta macro Sub Operacion() uf = Sheets("Hoja1").Range("V" & Rows.Count).End(xlUp).Row For i = 1 To uf Valor1 = Sheets("Hoja1").Cells(i, 48).Value Valor2 = Sheets("Hoja1").Cells(i, 22).Value Resultado = Valor1 / Valor2...

Ponga un punto de interrupción en el evento clic del combo box y vaya paso a paso quizá de esa manera pueda ver a donde se va el proceso y porque expone la hoja.

Con esta macro exporta todos los datos de la columna C. Sub ExportarTxt() ruta = "C:\Users\Victorm\Desktop\test.txt" lastrow = Cells(Rows.Count, 1).End(xlUp).Row Open ruta For Output As #1 For i = 1 To lastrow Print #1, Cells(i, 3).Value Next i Close...

Puede subir una imagen del botón que comenta porque no me queda claro o no lo ubico, para poder ayudarle.