Isaac Reyes

H0la aabucossi: No le veo problemas al código. A ver si puedes enviar una imagen de la tabla de origen y una imagen de la tabla dinámica. S@lu2

H0la Mr. Acá encontré algo que te puede ser útil. Busca varias palabras a la vez en un documento de Word Me comentas cómo te va con eso. S@lu2

H0la Jorge: Por lo que entiendo, me imagino que quieres establecer el criterio de la columna A de h2 en la columna A de h1, B de h2 a B de h1 y lo mismo con el resto de las columnas. Si estoy entendiendo bien, lo que deberías hacer es, en la...

Intenta reemplazando esta línea If Target <> "" Then MsgBox "Celda llena": Exit Sub Por esta otra If Target <> "" Then Target.ClearContents: Exit Sub Y dime si es lo que buscabas. S@lu2

Si es así, te sugiero que dividas el problema y una vez que comiences a implementar la solución, vayas preguntando cada parte. Lo que veo es que el problema se puede dividir de la forma siguiente: Ingreso de nuevos equiposCrear una tabla con la...

H0la Giuseppe: Está raro eso! ¿Puedes subir una imagen de la planilla y el código? S@lu2

Estimada Brenda: Revisa este enlace y me comentas si es lo que buscas. Sumatoria con macros automáticamente con userform desde excel S@lu2

Con este código debiera bastar Sub unir() 'por GP' Dim lngFila As Long 'fila de la primera celda vacía en columna B' lngFila = Sheets("Nombre_hoja").Range("B" & Sheets("Nombre_hoja").Rows.Count).End(xlUp).Row + 1 'Unir celdas'...

Algo así en el evento click de tu botón, tendría que funcionar bien (Suponiendo que tu cuadro de vendedor se llama txtVendedor y tu cuadro ventas se llama txtVentas) 'Por GP' Dim lngFila As Long lngFila = Range("A" &...

Comencemos por lo más obvio a ver si llegamos a una solución ¿Has intentado reemplazar la línea lpunto = InStr(1, TextBox2, ".") 'por' lpunto = InStr(1, TextBox2, ",") S@alu2