Hola a todos, tengo un problemilla. Tengo un archivo de Excel compartido al que trato de acceder por medio de una macro con el siguiente código: Workbooks.Open Filename:= _ "I:\Mi Carpeta\Mi archivo.xlsm" _ , UpdateLinks:=3, ReadOnly:=True El problema es que hay veces, que me sale Error 13: No coinciden los tipos y que solo con descompartir el libro se soluciona el problema, pero necesito que el archivo esté compartido. ¿Alguien sabe porque me da ese error o como solucionarlo? El caso es que me da solo a veces y no en todos los archivos que trato de abrir de ese modo. Muchas gracias de antemano.

Buenos días; A ver si me podéis ayudar. Tengo una consulta SQL en Excel que me cuenta las fechas por número de semana, todo funcionaba bien hasta este año. Buscando por internet he encontrado la solución ( [vbMonday],[vbFirstFourDays] ) pero no me funciona, no sé qué pongo mal. Esta era la consulta que funcionaba hasta este año ( ahora en la semana 8 me cuenta lo de la 7 ). Query = "Select count (Columna1) from [Hoja1] where Columna1 In" & Datos & "And DatePart('ww',Columna2)=" & SemanaActual & "And DatePart('yyyy', Columna2)=" & AñoActual & "And (Not tipo_Columna3='No' or Columna3 is null)" Esta es con la solución qu…

Estimados tengo un libro excel que abro desde mi pc y me da el siguiente error. Se ha producido el error 1004 en tiempo de ejecución. Error odbc. El tema es que lo abro desde otras PCs y funciona bien. Ya intente agregar la misma version de office que de las otras PCS, inclusive agregue los parches hotfix. En la depuración me sale el siguiente error. With Worksheets("PODER_RESCATE") Range("W100").Activate Worksheets("PODER_RESCATE").QueryTables("listDiaActividad").Refresh 'Worksheets("ARQUEO").cargaCombo 'Worksheets("PODER_RESCATE").CB_Fechas.Select 'Worksheets("PODER_RESCATE").CB_Fechas.Clear Acciones.CB_Fechas.Clear Range("W101")…

hOLA BUENOS DIAS, ESTOY DESARROLLANDO UN PROGRAMA QUE EN OFFICE 2007 ME ARROJA UN ERROR PARA GUARDAR LOS DATOS. EL MENSAJE DICE ERROR 1004, ERROR EN EL METODO PASTESPECIAL DE LA CLASE RANGE. EN DONDE DEBO ESCRIBIR LAS FECHAS ME SUPONGO QUE EL ERROR DEBE SER POR EL USO DE LOS MONTHVIEW. EN EL MODULO 2 SE ENCUENTRA LA MACRO QUE REALIZA EL PROCEDIMIENTO DE GUARDAR LOS DATOS. AGRADEZCO TODA LA AYUDA Y SUGERENCIA QUE ME PUEDAN APORTAR. GRACIAS HERMANAZOS Control de Acceso Final 6.xlsm

BUENAS ESTIMADOS SOY FLORENCIO MENCIAS DE HONDURAS CENTROAMERICA. SOY SUPER NUEVO EN ESTE GRUPO. TRABAJO CON MACROS Y BISUAL BASIC PERO HACE UNOS DIEZ DIAS AL MOMENTO DE QUERER TRABAJAR MIS ARCHIVOS BASADOS EN MACROS Y BISUAL BASIC ME APARECE UN ERROR Y NO HE PODIDO DECIFRARLO O ARREGLARLO EL ERRO ES EL SIGUIENTE: PARTE QUITADA: PARTE/XL/VBAPROJECT.BIN (VISUAL BASIC PARA APLICACIONES (VBA)). ALQUIEN PODRIA DARME UN CONSEJO DE AYUDA YA QUE ESTOY SUPER ATRAZADO CON VARIOS TRABAJOS. GRACIAS

Buenas tardes; Tengo un problemita con una consulta SQL. En nombre de la columna de la que estoy filtrando un dato tiene espacios y ….por mas que he probado no consigo hacerla funcionar, siempre me da error. Como debo ponerlo (Descripción Casas )??. He probado con [ ] , con “”, con variable y nada. Dato = "'" & "Londres" & "'" Devolu = "'" & "Fin" & "'" Exacto = " = " Query = "SELECT * FROM Consulta where [Descripción Casas]" & Exacto & Dato & _ " and Motivo" & Exacto & Devolu Pd: no subo excel porque no se puede probar, si fuera necesario le s…

Hola. Estoy en un proyecto y me he quedado atascado por un simple código, que seguro que tiene una fácil solución pero que llevo horas intentando resolver. He creado un bucle For next que va cargando en una variable Array la posición de la última celda con datos en distintas columnas, empezando por "A" y hasta el final del bucle. El caso es que donde tengo el problema es en la propiedad "Range", me dice que no coinciden los tipos. Seguro que es por la forma de implementar el código pero es hasta donde sé. Es la primera vez que meto el "Range Rows.Count" dentro de un bucle. Pongo el código aquí mismo, si es necesario subiría el ejemplo. For x = 1 T…

bueno tengo una macro con un InputBox que me permite copiar una hoja del libro de excel pero cuando la pongo a funcional y le doy cancelar entonces me muestra un error y al darle depurar me señala en amarillo este código (ActiveSheet.Name = UCase(nombre) ) y al igual me crea una hoja exactamente igual. [COLOR=#660066]Private[/COLOR][COLOR=#000000] [/COLOR][COLOR=#660066]Sub[/COLOR][COLOR=#000000] [/COLOR][COLOR=#660066]CommandButton2_Click[/COLOR]() [COLOR=#660066]Sheets[/COLOR]([COLOR=#008800]"TORTA ENVINADA COD. 100"[/COLOR]).[COLOR=#660066]Visible[/COLOR][COLOR=#000000] [/COLOR]=[COLOR=#000000] [/COLOR][COLOR=#000088]True[/COLOR] [COLOR=#660066]Application[/COLOR…

hola todos hice este archivo en excel 2003 y funciona bien, dentro de lo que cabe con un inexperto, el problema es que a la hora de ejecutarlo con el excel 2010 de la pc de un tio, no funciona bien el problema es que cuando uno ingresa los datos por segunda vez, por ejemplo [TABLE=class: grid, width: 500] [TR] [TD=width: 40]Nº [/TD] [TD=width: 40]Sexo[/TD] [TD=width: 54]Madre[/TD] [TD=width: 54]Padre[/TD] [TD=width: 54]Peso[/TD] [TD=width: 75]Fcha. Nac.[/TD] [TD=width: 75]Palpar 1[/TD] [TD=width: 26]G[/TD] [TD=width: 75]Palpar 2[/TD] [TD=width: 26]G[/TD] [TD=width: 75]Palpar 3[/TD] [TD=width: 26]G[/TD…

Buenas tardes, tengo un problema en m codigo: Private Sub Buscar() With Sheets("Primaria") Me.ListTabla.RowSource = "" If CbxMeses1 = "" And CbxDocentes1 = "" Then ListTabla.List = Sheets("Primaria").ListObjects("Primaria").DataBodyRange.Value Exit Sub End If For X = 2 To .Range("A" & Rows.Count).End(xlUp).Row ok = False If CbxMeses1.ListIndex = -1 Then If CbxMeses1 = "" Then ok = True End If Else Mes = Split(Range("E" & X).Text, "/")(0) If CStr(CbxMeses1.ListIndex + 3) = Mes Then ok = True End If End If …

buenos dias: les envio un archivo en TXT en donde al oprimir un optionbutton me habilita un inputbox donde se solicita digitar un numero, pero al dejar vacio y dar aceptar o dar boton cancelar me sale "ERROR 13 NO COINCIDEN LOS TIPOS" en la siguiente linea del archivo adjunto. CANTPEQ = InputBox("Ingrese la cantidad a enviar", "CANTIDAD A ENVIAR") Agradezco su ayuda MUESTRA.txt

Hola, tengo un problema al momento de ejecutar una macro que cree un tabla dinamica, en diferentes computadoras. el codigo es el siguiente: Sub Macro1() Dim WSD As Excel.Worksheet Dim WSI As Excel.Worksheet Dim PTCache As PivotCache Dim PT As PivotTable Dim PRange As Range Dim FinalRow As Long, FinalCol As Long Set WSD = Worksheets("Origen") Set WSI = Worksheets("Indicadores") ' Eliminar cada Tabla Dinamica existente en la Hoja---- For Each PT In WSI.PivotTables PT.TableRange2.Clear Next PT '========================================================================================…

Buenas tardes: Estoy desarrollando, junto a un compañero, un programa en vba. El caso es que, en uno de los userform, tras pulsar en un boton, se ejecuta una macro que carga datos en un listview. La carga de datos la realiza correctamente, pero tras ejecutar el codigo, se queda una hoja de excel vacia en segundo plano (detras del userform) y ya no desaparece hasta cerrar la app. Decir que se le ha dado aspecto de programa al archivo. No consigo que desaparezca la hoja con visible=false . Alguna idea? Mil gracias

Saludos apreciados Foreros, Tengo un error en mi código vba que al agregar un dato (Botón agregar), los datos del formulario tipo de aumento, tasa% y Domicilio laboral me carga otra cosa que no es lo que preciso. 1.- Tipo de Aumento: debe ser semestral, bimensual o cuatrimestral me carga un dato numérico (16777215) 2.- Tasa - Domicilio laboral: Repite en mismo dato numérico (16777215) Les dejo el archivo para ver si me puede dan una mano con ello. De antemano Gracias Inmobiliaria AYUDA EXCEL.xlsm

Hola compañeros Quisiera pedir un favor.. es que tengo un problema diseñe varios Formatos en mi empresa.. pero en alguno computadores de mis compañeros las imgenes con cuandran con las herramientas por ejemplo Este es uno de los User Form Dañados..Pero solo Ocurre hasta ahora en dos PC no he probado en otros Ese es el computador de mi compañera Asi es en el mio La versión del Excel no cree que sea ya que.. en otros pc tiene versiones inferiores y se ve perfectamente.. Aclaro que el Daño o el Error Es Solo visual Muchísimas Gracias..

Beunas noches. Tengo un formulario en el cual llevo trabajando algunos días, bueno bastantes. Lo que pasa es que tengo una macro que guarda los datos del formulario a una hoja de excel, pero al darle clic en registrar me sale un error "Se a producido el error 13 en tiempo de ejecucion, No coiciden los tipos" Si alguien pudiese revisar mi archivo para decirme en que estoy mal. Se los agradezco.

Muy buenas compañer@s !!! Necesito una ayudita con una macro. Tengo dos hojas principales donde se introducen los datos y siete que son las que los reciben al ejecutar unas macros. Hay varios temas que no consigo solucionar. En las siete hojas que reciben los datos, necesito que la primera fila debajo de los títulos sea fija y no se actualice. Escribo los datos y le doy el formato que quiero, que sería como el de la hoja "CAJA", pero al ejecutar la macro se eliminan. También he observado que en la hoja "FACTURACION" en la columna A, introduzo las fechas, como por ejemplo 01/10/2024 ,y al ejecutar las macros alguna fecha cambia y me aparece1…

Buenas, tengo un formulario en el que recojo datos de tiempo separados por un punto como coma (25.012). El mismo formulario me sirve para modificar los datos introducidos anteriormente. El tema es que cuando carga datos introducidos anteriormente, en vez de cargarlos con el punto los carga con la coma (25,012) El problema viene aquí, ya que al guardar los datos me los guarda con valor en los decimales de 25.000 en vez de 25.012 Los tres decimales los convierte en 000 Que puede ser? Esto es lo que tengo para que me cargue los datos en los textbox TextBox1 = Format(Range("I" & UltLinea + 1).Value, "00.000") TextBox2 = Format(Range("J" & UltLinea + 1).Value, …

Hola chicos os quiero felicitar por vuestra pag sin vosotros muchos de nosotros estariamos perdidos muchas gracia a todos.El motivo escribiros es que tengo unos errores: 1º- En el formulario Clientes cuando agrego a un nuevo cliente y le doy al BOTON AGREGAR en el aviso que me pone me tenia que poner el ( El cliente <nombre tal> se ha agregado correctamente).Pero el <nombre tal > no me sale de la persona en el aviso.Pero solo con el boton agregar en los demas botones si me sale bien y no se porque? La otra cuestión es : 2º-Tengo dos formularios uno CALENDARIOCITAS y otro HORARIO CITAS.Lo que intento hacer es que cuando das a un boton de una fecha como lo he…

Hola a todos buen día, hace poco termiiné de estudiar un curso rapido de Excel y terminé con exito la primera etapa de un proyecto que quiero implementar, al menos eso creía, resulta que este libro funciona hasta que lo cuelgo en una carpeta y lo uso como libro compartido: Les adjunto el archivo trabajado, lo que quiero lograr es trabajar con un libro compartido sin los errores que me aparecen: 1. No puedo proteger el libro 2. se deshabilita el boton que llama mi Formulario Principal, ubicado en la Hoja2 3. Ocultar y proteger ciertas Hojas. Pueden ingresar con ADMIN y contraseña 12345678. de antemano les agradeceré que me den una …

Hola Amigos de Ayuda Excel, De nuevo por aquí solicitando de su apreciable apoyo. Tengo un en el cual con una lista desplegable oculto y muestro cierta cantidad de columnas, conforme al número seleccionado en el cuadro de lista. Quiero hacer lo mismo para las filas pero me da un error y no se a que se debe (La hoja no está bloqueada). Gracias de antemano por su ayuda. saludos, BARB PROPUESTA DE CONTROL POLIZAS ULTIMA 7-5-13 (5).zip

hola, quiero hacer una escogida automatica con excel. tengo un lado 70 zonas de trabajo libres (zona 1, zona 2,etc.) y por otro lado 900 comerciales que pueden cambiar de su zona asignada si estan interesados. Cada comercial que quiere cambiar entrega su solucitud con su preferencias (1ª) zona 34, 2ª) zona 6, etc.). a la hora de hacer de asignar se hace por antigüedad en la empresa. ¿como lo hago? ASIGNACION ZONAS.xls

Hola, quiero poner un botón en excel que escanee un documento, automaticamente guardarlo en un archivo y guarde la ruta en una celda De momento solo he encontrado como escanear un documento con esto: Sub Insertar_desde_escaner() CommandBars.FindControl(id:=1764).Execute End Sub pero me muestra lo encaneado en la hoja del libro de Excel, cosa que no quiero. ¿alguna idea? Muchas gracias. Saludos, Carlos Toc

Escoger por medio de CHECKBOX que datos lleva mi tabla dinamica Buenos Días: No se como hacer para crear una macro que al realizar una tabla dinamica me permita escoger por medio de los CHECKBOX que campos y en donde va lo que escoja. Por favor necesito de sus conocimientos lo mas pronto posible

Hola Tengo mi userfrom para escribir en la última fila y funciona bien, el inconveniente se presenta cuando a las últimas filas vacías les coloco bordes o les cambio el formato de las celdas, al insertar datos con los textbox no se insertan los datos en estas filas vacías que solo contienen bordes o formatos pero no datos. Que puedo hacer para que al insertar los datos aparezcan en las filas vacías que tienen bordes y formatos. Gracias