Actividad pública reciente
Ha preguntado en el tema en
Microsoft Excel
Msgbox que me avise para que haga algo
Hola, Me gustaría poder hacer lo siguiente: Me hacen un pedido que a su vez yo tengo que pedir. El solicitante me pide que le avise por teléfono (nº de tef) que ya esta y puede pasar a recogerlo, que se lo envíe vía e-Mail ó por correo ordinario etc....
Sin respuestas
Ha preguntado en el tema en
Microsoft Excel
Código para que ponga nº de regístro automáticamente.
Hola DAM, Nuevamente necesitando ayuda. Tengo un libro donde registro unas solicitudes. Pongo el nombre del solicitante en la columna "B" y en la columna "A" me da el nº de registro. Cada solicitud lleva su apunte correspondiente, que es el nº...
Sin respuestas
Ha valorado "Excelente" la respuesta
Mayúsculas o minúsculas a tipo título con restricciones.
Habría que hacer una macro y poner en alguna parte cuáles palabras no debe pasar a tipo título (de, la, y, con, las, los, a)
Ha valorado "Excelente" la respuesta
Mayúsculas o minúsculas a tipo título con restricciones.
Utiliza esta macro Sub Proper_Case() Dim x As Range ps = Array("de", "los", "y") For Each x In Selection p = Split(x, " ") For i = LBound(p) To UBound(p) a = False For j = LBound(ps) To UBound(ps) If UCase(p(i)) = UCase(ps(j)) Then a = True Next If a...
Ha valorado "Buena" la respuesta
¿Dónde debo colocar un msgbox que cuente las filas que están seleccionadas para eliminar?
Para que te salga un msgbox con el numero de filas filtrada añade a uts códigos lo siguiente: Dim área As Variant Dim UpperLeftCorner As Range Set UpperLeftCorner = Sheets("hoja1").Range("A1") RowCount = -1 For Each área In _...
Ha preguntado en el tema en
Microsoft Excel
Macro que se queda en el limbo
¡Como pitonisa no tengo precio! La macro que he grabado usando la función ESNOD(COINCIDIR) para que me marque los registros que son iguales y poderlos eliminar a posteriori se me ha quedado en esto: Sub COMPARADATOS() Sheets("BASEDATOS").Select...
Sin respuestas
Ha valorado "Excelente" la respuesta
Arreglo duplicidad de "Q"
Podrías enviarme este caso en particular, para corregir la macro
Ha preguntado en el tema en
Microsoft Excel
Se duplican los resultados cuando no hay un marcador de separación
Hola de nuevo, Cuando hay 3 tipos-grupo S1-2BQ IQ GL3 BQ el resultado debería de ser. S1BQ;S1IQ;S2BQ;S2IQ (esto lo hace bien) GL3 BQ también pero luego añade a su libre albedrío el GL3IQ, ¿Cómo se le puede decir que no añada nada que no tenga a su...
Ha valorado "Excelente" la respuesta
Extraer 2 números de una cadena de 4 nº y dos paréntesis
Utiliza la siguiente fórmula: =EXTRAE(A3,SI.ERROR(ENCONTRAR("(",A3,1)+1,1),2) con código VBa Sub extrae2() c = "A3" numeros = Mid(Range(c), InStr(1, Range(c), "(") + 1, 2) End Sub Saludos. DAM
Ha empezado a seguir a 
Dante Amor
Dante Amor
Ha valorado "Excelente" la respuesta
Macro para pasar de abreviaturas a nombre completo y viceversa
Continúo con los cambios a la macro, pero no me contestaste la última duda que te envié. Saludos. DAM