Sebastian Sebas

Dante Amor respondió: Te anexo las 2 macros. Cambia "abc" por el password que desees Sub Proteger_Hojas() Dim sh As Worksheet For Each sh In Sheets If LCase(Left(sh.Name, 4)) = LCase("Arte") Then sh.Protect "abc" End If Next End Sub ' Sub DesProteger_Hojas() Dim sh As...

Dante Amor respondió: Prueba esto: Sub Duplicar_Plantilla() Dim dic As Object Dim c As Range ' Set dic = CreateObject("Scripting.Dictionary") For Each c In Sheets("Tabla").Range("A5", Sheets("Tabla").Range("A" & Rows.Count).End(3)(0)) If Not dic.exists(c.Value) Then...

Dante Amor respondió: Para realizar lo que necesitas debe hacer con VBA. Si estás de acuerdo te ayudo con el código. Tengo las siguientes dudas, puedes responder en el siguiente orden. 1. En la hoja "Data" vas a seleccionar datos solamente de las columnas A o B o puede...

Angel Navales respondió: Por lo que entiendo quieres que los que tengan más de 10 años queden marcados por un color, y que en ese conjunto si el nombre contiene JOSE se marquen en otro color diferente. Si esto es cierto basta con añadir una segunda condición If anidada...

gggirald respondió: Con la nueva forma de trabajar de Todoexpertos he visto esta pregunta pendiente de respuesta. A lo mejor a estas alturas ya has encontrado una solución adecuada. Si no es así prueba con esto: @echo off Setlocal EnableDelayedExpansion set cadorig=%1...

Enrique Bernal respondió: Esta macro copia la celda completa que esta activa, la pega en la celda A1 de la hoja 2 y te devuelve a la celda activa inicial. Sub Copia_Pega() a = ActiveCell.Address Range(a).Select Selection.Copy Sheets("Hoja2").Select Range("A1").Select...

Dante Amor respondió: Prueba lo siguiente. - Cambia en la macro la carpeta donde tienes tu adobe acrobar "C:\Program Files\Adobe\Reader 11.0\Reader\" - Cambia en la macro en nombre del programa Acrobat Reader "AcroRd32.exe Sub ImprimirPdfs() 'Por.Dante Amor Dim ruta As...