20 de marzo de 2020

Mostrar todas las hojas ocultas ☛[Sencillos pasos]☚


Cuando nos envian archivos, nuestros compañeros o colaboradores, algunas veces, pueden traer hojas ocultas. Cuando hacemos trazabilidad de las formulas, por ejemplo, es posible que se requiera "desocultar" todas las hojas del libro.
Cuando es solo una hoja, no hay mucho inconveniente, es solo darle clic derecho y mostrar, pero y cuando son muchs hojas, mas de 10 por ejemplo, esta tarea se vuelve un poco mas tediosa. 
Es por esto, que veremos en unos sencillos pasos, como desocultar o volver visibles las hojas ocultas.

Paso 1:  Active la pestaña de programador, si no recuerda aqui están los pasos Clic Aqui
 
Paso 2:  Ingrese a Visual basic desde la pestaña de programador

Paso 3: Agregamos un nuevo modulo, recuerde clic derecho en el nombre del libro, en la parte izquierda de la pantalla - clic derecho - Insertar  - Modulo.


Aqui en la parte derecha vamos a pegar el siguiente codigo: 

 

Sub MostrarHojasOcultas()
 Dim cantidad, i As Byte
 cantidad = Sheets.Count
 For i = 1 To cantidad
  Sheets(i).Visible = True
 Next
End Sub


Se verá algo así: 


Solo quedaría ejecutar la macro y ver como todas las hojas quedan visibles.




Si te gustó, síguenos en Twitter  para recibir nuestras actualizaciones y trucos
--> Leer más...

19 de marzo de 2020

[VIDEO] - Enviar hoja activa por Correo electrónico.


Hay acciones en Excel, que las repetimos con frecuencia, las cuales podriamos automatizar con una macro.

Una macro es un conjunto de comandos que se almacena en un lugar especial de Excel de manera que están siempre disponibles cuando los necesites ejecutar. Este ejemplo es para enviar la hoja activa por correo electrónico, lo podriamos realizar de la siguiente manera.
 



Para ejecutar una macro que realice automáticamente este proceso

Antes de hacer la macro, debe activar la pestaña "Programador" o tambien llamada "Desarrollador" en Excel. Si no la tiene activa, aquí le explicamos paso a paso

Cuando active esta pestaña, seleccione la opción Visual Basic como lo indica la siguiente imagen:


Desde el editor de Visual Basic, seleccione del panel izquierdo, clic derecho en el nombre del libro - insertar - modulo, en la parte derecha, escribir el siguiente codigo:






Sub Correo()
    Dim NombreAsunto As String
    Dim Temporal As String
    Dim Mensaje As String
        On Error Resume Next
        NombreAsunto = ActiveSheet.Name
        Temporal = Environ("temp") & "\"
        NombreAsunto = Temporal & NombreAsunto

        ActiveWorkbook.ActiveSheet.Copy
        Application.DisplayAlerts = False
        ActiveWorkbook.SaveAs NombreAsunto
        Application.DisplayAlerts = True
        CommandBars.ExecuteMso ("FileSendAsAttachment")
       
        ActiveWorkbook.Close False
        Kill NombreAsunto
        On Error GoTo 0
End Sub

Enhorabuena, tenemos nuestra macro lista!!!



Ahora vamos a Excel. E insertamos un objeto como este, escoje el que mas te guste:


Clic encima de la imagen elegida en el punto anterior. Clic derecho, asignar Macro y escojemos la que dice Correo, aceptar.


 Ya estamos casi Listos!!!

Ahora, solo es ejecutar y probarla macro.


Lo que hace, es abrir tu aplicacion de correo predeterminada, y copia la hoja activa, y la adjunta, adicional coloca el mismo nombre en el asunto de dicho correo. 


Recuerda guardar el archivo como  libro de excel habilitado para macros. o Guardarlo en su libro personal de macros.

 

 

 

[VIDEO] a continuación CLIC AQUí

 



Si te gustó, síguenos en Twitter  para recibir nuestras actualizaciones y trucos
--> Leer más...

3 de marzo de 2020

Contar horas en un rango - [Recargo Nocturno]

En este ejemplo, tenemos el ejemplo para un colaborador, con sus horas de ingreso y salida, en un rango de fechas, y queremos calcular el total de horas, en los rangos descritos.

Aqui es necesario dividir en dos partes el rango, el primero va desde las 21:00:00 hasta las 23:59:59 y el otro va desde las 00:00:00 hasta las 6:00:00

De acuerdo con esto, primero validaremos si la hora de inicio y la hora final, son exactamente las que tenemos en el rango, dado que si esto se cumple, el valor siempre seria 9; de lo contrario, tendriamos que restar y sumar.

Usaremos la ya conocida funcion SI junto con la funcion Y. Veamos con el ejemplo, en la celda D7


=SI(Y(B7=$C$2;C7=$D$3);VALOR($D$2-$C$2)+VALOR($D$3-$C$3);VALOR($D$2-B7)+(C7-$C$3))


Esta funcion nos permite, primeramente validar si las fechas de ingreso y salidas, corresponden a las planteadas al inicio, en este caso, el ressultado de las horas, ya las sabemos. 
Para la siguietne parte, simplemente resta la hora final del primer rango, con la fecha ingreso, y la hora inicial del segundo rango con la hora de salida real.






Para la siguiente columna llamda formato Numero, lo que hago es multiplicar el valor por 24. OJO debe estar el formato de la celda en Numero.


Ya esta ultima columna, la podemos sumar tal como lo hariamos en cualquier celda numerica.

Para mas ejemplos del tema visita https://ideasdeexcel.blogspot.com/2018/05/condicional-si-con-horas-funcion-valor.html




Si te gustó, síguenos en Twitter  para recibir nuestras actualizaciones y trucos
--> Leer más...

7 de diciembre de 2019

Como quitar saltos de pagina en celdas de excel - Práctico


SALTO DE PAGINA EN UNA CELDA DE EXCEL, son las lineas que van quedando cuando digitamos ALT + Enter luego de escribir una primera palabra.

Se podria entonces definir que salto de pagina es espacio entre líneas o párrafos de texto en una sola celda.




Ahora planteamos el siguiente inconveniente:  Sucede que hemos descargado o recibido un archvio desde internet el cual tiene muchas celdas, con muchisimos saltos de página.

Si necesitamos que queden SIN éstos saltos de pagina, lo podriamos realizar de dos maneras.



Opcion 1 (reemplazar)


1. Pulsamos Ctrl  + L (buscar y reemplazar)



2. En la casilla de Buscar marcamos Ctrl + J
3. En la celda Reemplazar digitamos |
4. Clic en reemplazar todos.


Con esta opcion podrias luego volver a usar la misma tecnica para cambiar el caracter recien cambiado.


Opcion 2 (funcion sustituir y caracter)


1. Nos posicionamos a la derecha de la celda que necesitemos cambiar.
2. escribimos =SUSTITUIR(B2;CARACTER(10);" | ")
El carácter ASCII 10 es el salto de línea que hay que buscar y sustituir por otro carácter (en el ejemplo, la barra vertical).
 



  

Si te gustó, síguenos en Twitter  para recibir nuestras actualizaciones y trucos
--> Leer más...