Preguntas esperando respuesta
Actividad pública reciente
Ha preguntado en el tema en
Microsoft Excel
y en 1 temas más
Macro: rutina para desproteger hojas excel
Tengo una rutina para desproteger hojas excel sin saber la contraseña que siempre había funcionado pero últimamente con versiones más modernas de excel tengo problemas. La rutina que utilizo es la típica, pero últimamente no funciona con algunos...
Ha valorado "Excelente" la respuesta
Rutina para filtrar por colores
Ha empezado a seguir a
Ha empezado a seguir el tema Microsoft Outlook
Ha valorado "Excelente" la respuesta
Rutina para contar caracteres subrayados en una cadena de texto.
Te anexo la macro, cambia en la macro "B5" por la celda que quieres revisar. Sub ContarSubrayados() 'Por.Dante Amor Set celda = Range("B5") For i = 1 To Len(celda) If celda.Characters(Start:=i, Length:=1).Font.Underline = 2 Then n = n + 1 End If Next...
Ha valorado "Excelente" la respuesta
Rutina para extraer un numero que esta en la parte final de un texto
Posiciónate en la primera celda de esa columna y después ejecuta esta macro: Sub proceso() 'por luismondelo Do While ActiveCell.Value <> "" tope = Len(ActiveCell) For x = tope To 1 Step -1 extrae = Mid(ActiveCell, x, 1) If IsNumeric(extrae) Then...
Ha empezado a seguir a
Ha preguntado en el tema en
Microsoft Excel
Rutina para seleccionar las celdas visibles de una columna filtrada
Hola expertos, solicito vuestra ayuda para una rutina. Tengo una macro que me filtra una columna con el criterio que le solicito, pero, una vez filtradas, no se como seleccionar estas celdas visibles (no toda la fila ni todo el rango, solo las celdas...
Sin respuestas
Ha valorado "Buena" la respuesta
Función matemática para valorar precios con pendiente cercana a 0 a partir de un punto.
Ha valorado "Buena" la respuesta
Macro para guardar como según valor de celda
Haber parece que no te entiendo.. Quieres que el ficherio se guarde con el bvalor de una celda, ¿pero no sabes el nombre de la ultima carpeta de la ruta..? Para esto necesitamos sabe el nombre de la carpeta... para verificar... para buscarla, pero no...
Ha valorado "Buena" la respuesta
Macro para renombrar hojas
En un modulo escribe lo siguiente: Sub NombreHoja() ' ' NombreHoja Macro ' Renombra las hojas de un libro sumandole 1 a la primera hoja. ' ' Acceso directo: Ctrl+Mayús+N ' xHoja = Sheets(1).Name For i = 0 To Len(Sheets(1).Name) xCaracter =...
