Amigos espero puedan ayudarme con esto quiero habilitar y deshabilitar la solo lectura via codigo, pero cuando deshabilito se cuelga y se cierra, a veces si funciona pero la mayoria no. Sub ActivarSoloLectura() Application.DisplayAlerts = False If Not ThisWorkbook.ReadOnly Then ThisWorkbook.ChangeFileAccess xlReadOnly End If Application.DisplayAlerts = True End Sub Sub DesactivarSoloLectura2() On Error Resume Next If ThisWorkbook.ReadOnly Then With ActiveWorkbook SetAttr .FullName, vbNormal .ChangeFileAccess xlReadWrite Application.DisplayAlerts = False .Save Application.DisplayAlerts = True End With End If End Sub MACRO S…

Con parto un formulario, muy bueno con varios campos a diligenciar, pero mi pregunta es alguien sabe como optimizar el cargue de la macro y que al momento de dar clic en almacenar no parpade tanto, que eso se ve muy feo???? Muchachos adjunto formulario y sentencia en archivo separado.... me cuentan, mil gracias sentencia macro formulario.xls FORMULARIO.xls

Hola equipo de "AYUDA EXCEL" tengo la siguiente duda; sobre el tema de impresión, quisiera resolver el problema de imprimir si existe valor alguno en el rango ("A1:t30") en una sola Hoja Horizontal si no existe valor alguno (nada escrito) ps simplemente no imprima o si tiene alguna opinion de como dar especificaciones a traves de la macro como por ejemplo decir que imprima hoja 1 y hoja2 (hoja1=range("a1:t30") y (hoja2= range("a31:t60") NOTA: la Hoja esta en horizontal y ajustado al 80% Gracias de antemano..! Libro1.rar

Estimados, anteriormente ya me habian ayudado con este ejemplo de un combobox que esta vinculado a unas hojas ocultas....el problema que cuando quise adaptarlo a mis requerimientos no me funciona, por ejemplo le cambio el nombre a la hoja2 por la que corresponde en este caso resumen y no hace nada. les dejo el archivo para que me ayuden plis. de antemano muchas gracias. comboboxvinculadoahoja_RJ_.rar

Lo que quisiera lograr es que al ubicarme en el # de vehículo los datos del gráfico se actualizaran para dicho número de vehículos de acuerdo a los datos suministrados a la vez que el grafico se mantenga en la posición actual para el caso en que sean muchos datos y al desplazarse hacia los datos de abajo el grafico se mantenga siempre visible. Espero halla forma de hacerlo o incluso una mejor forma de ordenar los datos para poder hacerlo con más facilidad. Gracias por la ayuda. Nota: cómo le cambio el nombre al tema. Gráfico dinámico carreras.rar

Sigo trabajando en mi aplicación y lo que he logrado hasta el momento lo explico a continuación: 1. Desde la hoja factura ingreso datos a la hoja rent o la hoja rdev, dependiendo si se esta facturando o haciendo una devolución. 2. Oprimiendo el botón Eliminar registro, dependiendo si en la hoja factura se encuentra en modo factura o devolución busca un registro determinado para su eliminación a partir de la hoja rent o rdev. 3. En la hoja rsem se puede observar el resumen semanal de productos entregado a cada persona (Esta hoja funciona solo con formulas) Quisiera que me colaboren creando una macro para cambiarla por las funciones que se encuentran en la hoja rsem. …

como estamos mis estimado ,pues veran venga austedes solicitando me ayuden con una pequeña cosita. de por si no me gusta usar el mouse cuando estoy digitando es por eso que tengo mi formulario ordenado para saltar de campo en campo con la tecla tab. pero tengo problemas al asignar los valores a los check box y option boton necesariamente tengo que agarrar el mouse para asignarle un valor a esos controles mi pregunta seria. existe alguna manera de poder asignarle valores con la tecla enter?. asi por ejemplo me voy moviendo con la tecla tab cuando llegue a un checkbox oprimo enter y se seleccione como tildado y asi pueda saltar al siguiente campo con tab. todo eso sin …

Amigos, una consulta. Tengo archivos de pruebas que quiero compartir con otras personas, pero quiero que solo lo pueda instalar en 1 o 2 PCs ¿hay alguna manera de hacer esto?. ps no quiero que compartan el archivo con otros. Gracias, Adjunto mi archivo. Formulario-en-VBA-aplicado-al-Registro-de-Ventas-de-un-Restaurant 12-04.xls

buenas, estoy haciendo unas pruebas con vba, tengo codificados tipos de gastos en la hoja "tipogasto", en la que a cada tipo de gasto se le asigna un número. Lo que quiero es que en la hoja1, cuando en la columna código ponga un número me escriba en la columna c, tipo de gasto, el tipo de gasto que le corresponde a este número según la hoja tipogasto. quiero hacerlo con vba, y lo he conseguido, pero el editor vba se queda colgado ejecutando el código. El archivo adjunto es un pequeño ejemplo, de una base de datos extensa, en la cual debo aplicar este caso en varias ocasiones, para tipos de gastos, proveedores, acreedores, etc....No quiero pensar lo que le puede costar.…

Estimados No se que pasa, pero al ingresar un nuevo cliente y al precionar la tecla Guarda el registro aparece en la hoja CLIENTE, pero al presionar salir, desaparace de la hoja. me pueden ayudar Saluds MACROS.rar

tengo ciertas dudas del como realizar la macro para este tipo de formulario, ya que hay campos por separado donde se debe multiplicar, sumar, pero al momento de darle almacenar se debe llevar toda la información a la hoja BD. Adjunto el archivo para que me saquen de la duda según sus conocimientos. Mil gracias amigos CORREO INTERVENIDO formulario.xls

Hola Compañeros Me ayudarían Con esto Intente lo mas Que pude pero no lo Logre Lo que intento es que al organizar valores primero por fecha y después de mayor a menor si son iguales Me las deje en la Misma Fila delo contrario Me baje el valor hasta que sea igual este es mi codigo Sub Conciliate() C = Range("B" & Rows.Count).End(xlUp).Row F = Range("F" & Rows.Count).End(xlUp).Row If C > F Then For i = 2 To 500 If Range("C" & i) = Range("F" & i) Then End If If Range("C" & i) <> Range("F" & i) Then If Range("C" & i) > Range("F" & i) Then Range("E" &a…

Saludos amigos del foro tengo un gran dilema que no puedo resolver, se trata de un listbox que carga datos de una hoja de más de 40 columnas y una infinidad de filas, para ello conseguí un listbox que me carga los datos, el problema es que no me carga la cabecera sobre los datos, lo cual no quiero que sea con textbox, sino que los cargue de la tabla de Excel y sea fija, el otro problema es q habilite el listbox para q filtre datos, lo cual hace pero me limita la cantidad de columnas mostradas al aplicar el filtro, y yo quiero mostrar al aplicar el filtro de “mes”, desde la columna “A hasta la AI” 35 columnas con todas sus filas. Por favor acudo a Uds. porque sé que me a…

Buenos días, Lo que sucede es que estoy teniendo problemas con una macro que estoy ejecutando pues me aparece el error que hace referencia a que el procedimiento es demasiado largo, no he podido reducirlo pues son al rededor de 270 variables que debo incluir, en el archivo adjunto incluyo una pequeña parte de esta macro donde solamente relaciono 2 variables y corre a la perfección. En general, lo que pretendo es pasar de un documento a las 270 variables al oprimir el botón "Formato". He intentado dividir el procedimiento en varias partes pero no lo he logrado, quisiera pedir su colaboración con este tema pues por más que lo intento no lo he conseguido. Este código es e…

Hola a todos, tengo una duda que no consigo resolver. Quisiera poner un visor pdf en una hoja de mi formulario, por el foro y demás sitios he visto que lo hacen pero con la opción de que se pueda elegir cualquier archivo, yo necesito que sea un visor fijo, es decir, que se me cargue en initialize y pueda ver un pdf fijo. Este pdf es de consulta para rellenar una serie de datos dentro del formulario, por eso necesito que sea fijo...además, este pdf tiene que estar en la carpeta del excel.... Yo he probado con lo siguiente: Webb.Navigate2 (ThisWorkbook.Path & "\*.pdf") "Webb" es el webbrowser. Y con algunas variaciones más, pero me sale "Error en el método 'Navigat…

Buenas tardes a todos! Tengo un problema el cual ya no puedo resolver solo, me re empelotado no doy mas. Tengo un libro con 3 hojas, del cual me hace un libro nuevo de acuerdo a cada nombre que tengo situado en la hoja JEFES columna D, donde cada libro contiene la información de cada jefe, extraida del libro principal. Lo que deseo es que en todos los nuevos libros en las hojas que copio (ventas1 y ventas2) me copie los encabezados tal cual, de la fila 2 a la fila 5 y se pegue en todas... El archivo tiene pocas columnas porque en realidad a veces llego a tener columnas hasta la ZZZ. Muchas gracias por su apoyo. SAludos. Gerardo Bs.As. CONCENTRADO EJEMPLO.rar

hola a todos; el caso es que necesito rellenar un listbox con unas 80 columnas pero quiero irlo filtrando a medida que voy introduciendo datos en los textbox; el listbox lo relleno con rowsource,a pelo, pero no sé filtrarlo, ni si se puede; lo relleno asi: ListBox1.RowSource = "a2:cd2" & ActiveCell.Row pensé en poner varios listbox, pero se me complica el asunto bastante... Gracias de antemano.

Buenas tardes; por favor necesito su ayuda para el siguiente problema: quiero crear un cargo en word con datos que lleno en excel; les adjunto los archivos de word y excel de como podría quedar, si es necesario modificarlo para que pueda funcionar adelante, estoy atento a sus indicaciones. en el excel he dejado comentarios para que se guíen con mi problema. gracias de antemano con su ayuda y tiempo. de excel a word.rar

Buenos dias Quisiera saber si alguien me puede explicar la razon por la cual aparece el sigiente error cuando ejecuto una macro de userform: Run time - Error '457': this key is already associated with an element of this collection. Como lo mencione el problema surge es en formularios, pero no me dice a cual linea pertenece el error, y por lo que logro evidenciar es que existe un conflicto entre estos dos formularios ya que al ejecutar uno de estos, el otro ya no se puede ejecutar y la unica forma de que vuelvan a funcionar es desde el codigo.

Hola amigos: Tengo el siguiente código: Public Buscarhoja As String Private Sub UserForm_Initialize() 'Al iniciar el userform Application.Visible = False 'Ocultar la Aplicación Excel End Sub Private Sub UserForm_Terminate() 'Al cerrar el userform Application.Visible = True 'Mostrar la Aplicación Excel End Sub Private Sub UserForm_Activate() 'cargar número TextBox20 = Sheets("EXTRAS").Range("O1") + 1 'Cargar combobox ComboBox1.RowSource = "FP" ComboBox4.RowSource = "LA" ComboBox5.RowSource = "EP" p = Sheets("CLIENTES").Range("C1").End(xlDown).Row ComboBox2.RowSource = "CLIENTES!D2:D" & p End Sub Private Sub TextBox1_Change() 'Formato de fecha E…

me pueden ayudar con una macro que sume de 1 a varios rangos en una misma columna ejemplo: debe sumar los valores de columnaB pero solo los que sean A, agregar una fila en blanco y ahi mostrar la suma y despues sumar los B, espero me puedan ayudar gracias ColumnaA ColumnaB A 1 A 5 A 8 B 2 B 4 B 3

Mi pregunta es la siguiente, se pueden generar mediante una macro un archivo en PDF dandole un nombre difernte a cada archivo?

Hola, Estoy trabajando con dos archivos de excel, uno de ellos tiene en la primera columna una serie de fechas, y el otro también, ahora, la macro consiste en verificar la fecha que tiene el primero y compararla con la del segundo, y si en difieren, entonces copiar la del segundo. El problema en sí consiste en que en el segundo archivo las fechas las tengo de la forma "mm/dd/aaaa", y en el primero están de la forma "dd/mm/aaaa" el asunto es que no todas las celdas con fechas tienen el mismo formato, entonces, algunas las reconoce bien y otras no, anexo los extractos de archivos, más no el código que es demasiado largo, la parte que utilizo es: Workbooks(1).Sheets…

Hola Equipo de "ayudaexcel" tengo una duda algun tiempo encontre este archivo y veo que traduce algunas palabras en distintas idiomas.! Hay alguna manera de de traducir fraces en excel en la hoja o a travez de un listbox pero que no sea desde un webrowser para entrar a google.! gracias.! disculpen si inicio un tema ya pasado. Pero solo encontre el traductor de google. La cual que es lo mismo que entrar al explore Bueno ahí les subo el archivo aver si se presentan nuevas ideas.! ..Gracias de antemano,! calendario.rar

El tema es el siguiente, tengo una serie de datos los cuales deben ser ingresados a un formato en especial, pero cuando hago una macro solo me guardan los primeros registros y no puedo hacer que siga con los demás, ya que son bastantes archivos.