Buenas tardes, pretendo ocultar las celdas AF8:AF10, o que el texto resulte del mismo color que el fondo, en el mes de febrero de los años no bisiestos. He intentado esto... pero me da error. ¿Me podéis orientar? Sub VerificarAnioBisiesto() Dim año As Integer ' Asignar el valor de la celda B2 a la variable año año = Range("B2").Value ' Comprobar si el año es bisiesto If (año Mod 4 = 0 And año Mod 100 <> 0) Or (año Mod 400 = 0) Then ' Hacer visibles CELDAS Range("AF8:AF10").EntireColumn.Hidden = False Else ' Si no es bisiesto, ocultar CELDAS Range("AF8:AF10").Fuente.Color = RGB(255, 255, 25…

He estado leyendo macros, para ver si puedo escribir un VBa que me valga, creo haber llegado al punto, pero me falta el toque, para que funcione. Tengo una celda A4 la cual cual cambia de color automáticamente en funcion del valor de A1, es decir, si la celda A1 es distinto de 2, la celda A4 se tiñe de color rojo, sino se queda tranparente. Por otra parte, hay una macro, que esta en el archivo adjunto, que si cambia la celda A4 a Rojo, me ponga un mensaje de OK, en teoría creo que esta bien escrita, pero no me funciona. Alguien me puede ayudar. Muchas Gracias prueba de Color.xls

Hola amigos, Necesito hacer una prueba y yo solito no he podido. Quiero pasar la información de varias hojas a una central. Me explico:Tengo una hoja central llamada Base de Datos y varias hojas nombradas por C 45, C 46.... Pues al pulsar un botón quiero que la información que hay en esas hojas de C ... se pasen a Base de datos y a su vez que las hojas se renombren quitando la C dejando solo el nº para que no se puedan ejecutar una segunda vez. No sé si me explicado bien, sino para cualquier cosita estoy a vuestra disposición. Muchas gracias, Un cordial Saludo Vic PruebaBaseDatos.xls

Hola, soy nuevo en el foro y necesitaria copiar un rango de una hoja a otro rango de una hoja en otro libro distinto, lo ideal seria exportar ese rango a una ubicacion y despues al abrir el otro libro importarlo. No tengo ningun ejemplo porque es simplemente lo que explico y no se como crear un archivo explicativo. Muchas gracias os agradezco vuestra ayuda.

Buenas a todos, Estoy buscando como evitar que sin necesidad de proteger una hoja evite que copien y peguen formulas. Encontré esto Private Sub Worksheet_SelectionChange(ByVal Target As Range) Application.CutCopyMode = False End Sub [/CODE] Pero permite que se arrastre una formula. Es posible evitar que se arrastre una formula?? Saludos y gracias de antemano!

Me gustaria funciones en excel 2010, he revisado las formulas y no se encuentro el error Control de Actividades.rar

Estimad@s Cuando ejecuto una libro hecho en macros, no me permite ejecutar la macros ;me sale este mensaje "Debido a su configuración de seguridad, se han deshabilitado todas las macros. Para ejecutar macros es necesario que vuelva abrir este libro" . Habilite los permisos en el centro de confianza , desconecte los firewall y el antivirus , hasta desconecte el internet .. Pero a pesar de ello sigue saliendo ese mensaje. De ante mano Gracias por su aportes

Saludos amigos espero estén bien Necesito generar un código numérico de cinco (05) dígitos no aleatorio en la Celda "Q4"que valla precedido de dos letras ejemplo : AA - 00000, cuya numeración valla del 0000 al 9999 y cuando llegue al 9999 se reinicie automáticamente en 0000 debiendo actualizar la numeración cuando se haga click en el botón Limpiar Mucho les sabre agradecer la ayuda que me puedan brindar PRUEBA.xlsm

buenas tardes, por alguna razon no consigo registrar el dtpicker en office 2010, lo registre mediante ayudas de internet en varias maquinas con MSCOMCT2.OCX pero en otras no me deja. gracias por la ayuda

Hola gente, mi pregunta es como puedo programar el botón de guardar de este formulario si tengo 2 text box que son nombre y fecha y 3 listbox que son articulo, cantidad, motivo como se muestra en la imagen, espero tener una pronta repuesta, gracias [ATTACH]40458.vB[/ATTACH]

Buenos dias: Estoy tratando de generar una macro con un tabla dinamica, pero al ejecutarla me sale el siguiente error: "Se ha producido el error 5 en tiempo de ejecucion - Argumento o llamada a procedimiento no valida" Me señala en amarillo el error: ActiveWorkbook.PivotCaches.Create(SourceType:=xlDatabase, SourceData:= _ "Sheet1!F1C1:F4916C10", Version:=xlPivotTableVersion12).CreatePivotTable _ TableDestination:="Sheet1!F1C12", TableName:="Tabla dinámica1", _ DefaultVersion:=xlPivotTableVersion12 Agradezco me indiquen como debo proceder para la generación correcta de la macro. Muchas gracias. Saludos

Buenas!! ? A ver quién puede ayudarme, tengo un libro con más de 100 hojas y quiero que se borre el contenido de todas, menos de dos hojas concretas ("GS" y "Macros") a partir de la celda A3. Me parece que debería ser muy sencillo, pero el código me da error 13 no coinciden los tipos (línea 5? Sub Botón4_Haga_clic_en() Dim hoja As Worksheet For Each hoja In Application.Worksheets If hoja.Name <> "GS" Or "Macros" Then hoja.Range("A3:G6000").Clear End If Next hoja End Sub He probado declarando las hojas que quiero proteger como worksheet y comparando con If hoja.Name <&g…

Buenas tardes, expertos en la plantilla que adjunto de prestamos, cuando calculo el prestamo y los registro en la hoja estado me registra de la mayor a menor los registro, esto me podrian indicar que debo hacer para que se registre de forma ascendente Por otro en la hoja resumen el porcentaje me muestra muy elevado, ejemplo si es 20% aparece 200% Por favor me puede ayudar, adjunto el archivo Planilla Prestamos 1.5Final.xlsm

Hola Amigos: Recurro a uds. solicitandoles su ayuda estoy buscando la manera de solucionar lo siguiente, tengo un libro con una cantidad variable de hojas cada una tiene tambien una cantidad variable de datos en la columna A lo que necesito hacer es poder comparar todas las hojas entre sí para poder encontrar los duplicados y poderlos marcar y luego borrar, preferiblemente si hubiera alguna manera de seleccionar cual o cuales hojas necesito comparar, de no ser así pues aunque sea una comparacion de todas entre sí a la vez. Adjunto un pequeño archivo de como tengo los datos. Gracias de antemano y espero haberme podido dar a entender. JG2 comp.rar

:tennis: Hola buen día!!! El problema que tengo es el siguiente: Tengo una hoja de excel que esta protegida con contraseña para evitar que el usuario modifique los datos contenidas en ella. En dicha hoja, dentro de otros datos, va insertada una imagen (foto del usuario en cuestión). En otra hoja de excel contenida en el mismo libro el usuario introduce los datos necesarios y al final pide que se inserte su fotografia. Lo que necesito es que al momento de insertar la foto en la hoja y que el usuario pulse un comando "actualizar datos" se pase la imagen a la otra hoja. Agradeceré su ayuda infinitamente. Gracias Modelo.xls

Buenas, les cuento, tengo casi nulos conocimientos de VBA para las macros de excel y se me asignó una tarea para los próximos días, la cual intento llevar adelante hace un tiempo pero no logro realizarlo. El problema a resolver es: En una carpeta se encuentran 7 archivos -libros de excel-, 1 por cada vendedor con su nombre. (este el formato base: https://dl.dropbox.com/u/10387731/Ejemplo.xlsx ) Y necesito generar un nuevo libro que reúna en UNA SOLA HOJA (las filas una debajo de la otra), la primer hoja de cada uno de los 7 libros de cada vendedor (se llaman "CARGA" las Hoja1, aunque no se si este dato importa demasiado). Ahora bien, necesitaría que se genere con cier…

Hola a todos necesitaria,como podeis ver en el libro de ejemplo que acompaño,un macro que me copiara el resto de las filas pero que esa en concreto me la separar por el signo+ y que me la fuera copiando consecutivamente gracias a todos por vuestro tiempo Prueba .xls

hola a todos, necesitaria si me podrian ayudar en lo siguiente, tengo una macro que me abre una cantidad "x" de paginas web, a veces se cierran algunas de ellas, y lo que necesitaria es, si hay alguna forma de que, al presionar el commandbutton me identifique si la pagina que va a abrir se encuentra abierta o no, en el caso de que se encuentre abierta que no lo haga nuevamente de lo contrario que la abra. gracias saludos

Hola! tengo un libro con información de proveedores de abarrotes, me gustaría poder filtar la informacion por proveedor y que se genera una nueva hoja y se guarde en una carpeta x Saludos

Hola amigos de Ayuda Excel Por acá otra vez solicitando su colaboración El código para eliminar filas cuando lo ejecuto y confirmo la eliminación en la segunda pregunta, aparece el mensaje indicando que la operación se hizo satisfactoriamente, pero luego me sale en el mensaje de operación cancelada, pero efectivamente eliminó la fila. Me podrán ayudar, me imagino que no está en la linea correcta. Lo he movido pero no logro solución. Gracias ELIMINAR FILA.xlsm

Hola,Actualmente tengo una macro que me hace una comprobación de si un fichero está abierto o no.Al pasar estos archivos a una carpeta compartida via web he tenido que actualizar la ruta del archivoAl actualizar la ubicación del archivo y el nombre del archivo con la propia, funciona toda la macro excepto la funcion isfileopen." If IsFileOpen(UbicacionNombre) Then' Display a message stating the file in use.MsgBox "El fichero " & NombreFicheroEmpleados & "está en uso. Lo tienen que cerrar para poder continuar", vbCritical, "MENSAJE DE ERROR"Application.ScreenUpdating = TrueExit SubEnd If"UbicacionFicheroEmpleados = "https://bsi1870ext-my.sharepoint.co...1870_net/Do…

Hola que tal, mi pregunta es la siguiente: Tengo una macro para crear calendarios mensuales. La he modificado para intentar adaptarla a lo que quiero. En la hoja 1 se ve el resultado de dicha macro y en la hoja 2 se ve lo que quiero conseguir. No se como continuar para hacer lo que quiero. Me podéis indicar como continuar. Gracias. MacroCalendarioPrueba.zip

Hola amigos de este gran foro, les doy un gran saludo, aqui con un tema que espero me puedan colaborar ya que lo requiero para mi trabajo, me gustaria saber como se hace para modificar un formulario de ingreso de datos agregando controles al mismo para tener otras opciones, bien para mayor detalle subo mi Excel, y en la primera hoja esta el contenido de lo que deseo hacer, de manera adelantada gracias... Registro_Clientes.zip

Muy buenos días, tardes, noches compañeros. Disculpen que los venga a molestar, pero estoy realizando un proyecto que es sencillo, pero de alguna manera se me complicó, jejeje. La cuestión está, en que necesito validar un rango de celdas, y que estas no se encuentren vacías (en el archivo adjunto sería de la celda B6 a la B17). El problema está en que en medio de dicho rango de celdas, hay 3 que son "opcionales" o hay una "excepción", es decir que se pueden o no llenar, pero no logro correr una macro para que valide que las celdas estén vacías, pero que omita estas 3 celdas que son opcionales (en el archivo adjunto van marcadas en color amarillo). Actualmen…

Buenos días mis apreciados Foreros, la presente es para ver si me pueden apoyar en algo, tengo un archivo de Inmobiliaria, donde en una Hoja tengo "Recibo", y otra hoja que se llama "Histórico", en la hoja de recibo necesito que se traslade la información a histórico, y al pasar el saldo de la hoja de Recibo en histórico me figura otro monto. Ya revise mi macro y todo, pero no entiendo porque me calcula otro monto. En el anexo, el saldo que bebe ir en la Hoja Histórico M2 es de 660 y me traslada otro valor. Quisiera saber cual es mi error. INMOBILIARIA DORG 8.1.xlsm