Katinga

Graciñas. Lo veo mas o menos aunque no me entero de mucho. Intentaré mirar el archivo con mas detenimiento.

Gracias a los dos por contestar tan rapido. Corazon, en teoria tendria que salir una linea recta con proyección hacia el eje Z. Te adjunto el archivo de nuevo modificado, pero no me aparece nada en la grafica. Seguire intentandolo. Graciñas de nuevo 3Dprueba_io_120503.xls

Hola Chicos. Estoy intentando hacer una grafica en 3D insertando las coordenadas X, Y, Z en un hoja de excel, pero por mas que modifico la forma de insertar los datos no soy capaz. Lo único que consigo es que me salga una grafica, en 2D pero con prespectiva. Tambien he estado leyendo algun Blog sobre el tema y dice que Excel no contempla este tipo de graficas. No se si estan en lo cierto o realmente es posible. Si no se puede siempre me quedará Autocad, pero es mas complejo despues para sacar datos de la grafica. Como os dije, he encontrado esto, pero no se como interpretarlo: Excel no se ofrece eso. Revisé el sitio de Jon Peltier y él no tiene una solución. La única referencia que veo por alguien conocido es en el sitio de Andy Pope: http://www.andypope.info/charts/3drotate.htm Pretendia hacer algo del estilo: X .......... Y .........Z 20 ........ 30.8......17 20.5......32.6......17 21.........34.5.......17 21.5 ......36..... 17 22 .........37.9......17 22.5 .....39.2......17 23 ...... 41.6......17 23.5 .....43.4 ....17

Bueno, no voy con mucho tiempo, pero prefiero ir poniendo algo a ver si mientras voy aclarando conceptos. Lo que intento es buscar varias macros, relacionadas con el BuscarV - La macro correspondiente a CurrentRegion, no soy capaz de que funcione, - Tampoco soy capaz de ejecutar la que lleva el codigo con "Find" He mirado lo que me indico "mjofra" sobre CurrentRegion, y si lo entiendo pero no soy capaz de hacerla funcionar en macro. Curiosamente si lo hice en otra tabla, pero no se porque en esta no va. Subo el archivo, para irlo completando y asi poder tener todos los códigos en orden relacionados con este proceso. Un saludo y gracias de nuevo Como no se porque me sigue dando error al subir el archivo en .zip os vuelvo a dejar el enlace de megaupload. http://www.megaupload.com/?d=3P3W0ELI

Re: pegar textbox numerico con formato numero Carai Logastur, estas al acecho Casi me quedo con la segunda opción, es algo mas absurda pero menos compleja en cuanto a código, ya que la primera habria que darle formato a B6 para que registrara decimales. Gracias de nuevo

Ya estoy aca de nuevo. Me sucede una cosa curiosa, que desconozco el porque lo hace. Subo un archivo para que lo veais. Si doy formato número a todo el rango B y pongo en el textbox1 un número introducido a mano en la celda B4, al ejecutar la macro me pega el número en la celda B6 pero con formato texto. Por muchas vueltas que le de no soy capaz que siga respetando al rango B4 como formato numero Os vuelvo a dejar el enlace en megaupload: http://www.megaupload.com/?d=3CQ4OXTS

Ok. Tambien funciona. MyRango = Sheets("Hoja2").Range("B4:F" & Sheets("Hoja2").Range("B" & Rows.Count).End(xlUp).Row) Sheets("Hoja1").Range("B8").Value = _ Application.WorksheetFunction.VLookup(Hoja1.[b5], MyRango, 5, False) Ciertamente son dos formas distintas de buscar un valor. A tu juicio ¿Cual de las dos es la mas correcta?

Hola Logastur!! Ultimamente te tengo atareado. Le he pasado un vistazo a tu código y es perfecto. Eres un fenomeno. A pesar de todo ya se en que fallaba mi código pero no se como solucionarlo. El problema lo tenia con el CurrentRegion. Asi no funciona: Sheets("Hoja1").Range("B8").Value = _ Application.WorksheetFunction.VLookup(Hoja1.[b5], Sheets("Hoja2").Range("B4").CurrentRegion, 5, False) Pero asi si: Sheets("Hoja1").Range("B8").Value = _ Application.WorksheetFunction.VLookup(Hoja1.[b5], Sheets("Hoja2").Range("B4:F11"), 5, False) Si acoto el rango de busqueda funciona perfectamente, pero tendría el problema que cada vez que ingreso un campo mas tendria que modificar ese rango de busqueda. Realmente ¿Que funcion hace CurrentRegion? Lo tengo puesto en otros codigos de la macro, de la misma forma y funciona perfectamente, pero no se el porque aqui no. Ya te digo que tu codigo va perfecto, pero intento aprender algo mas sobre el codigo de buscarV sin rangos acotados.

Me esta pasando algo curioso. Intento buscar en la hoja2 el precio de lo que pongo en la celda B5 de la hoja1 y me da error. He modificado el codigo para que la busque en la hoja3 y funciona, pero en la hoja2 no va ¿Que estoy haciendo mal? Como no puedo subir el archivo, os dejo un enlace de Megaupload http://www.megaupload.com/?d=EJWPQFE1 Graciñas

Ok. Perfecto. Tengo tantas cosas en la cabeza, que ni yo misma se donde estan. Tienes toda la razon. ¿Y para mostrarla 0,5 segundos en vez de 1?

Hola Chicos: Estoy intentando que en una parte de un proceso me muestre un UserForm, indicando el punto en el que se encuentra la macro y pasados 1 segundo que se cierre automaticamente. He incluido dentro del código de la Userform la siguiente macro, pero no acaba de funcionar bien del todo, a veces va y otras no hace ni caso: Private Sub UserForm_Initialize() Application.OnTime Now + TimeValue("00:00:01"), "Cierra" End Sub Sub Cierra() On Error Resume Next Unload UserForm21 End Sub ¿Sabeis donde esta el error?

Re: Advertencia Seguridad: Vinculos Ha funcionado perfecto. Ahora ya se porque me aparece. Supongo que como todos para ir probando macros, estas las desarrollo primero en un archivo tipo prueba, y si funcionan las exporto al archivo principal. Y lógicamente aunque no tenga que recoger ningun dato del archivo primitivo "prueba" crea los vinculos con él. Muchas gracias Logroastur

Desde hace unos días, que estoy trabajando en un archivo con macros, me aparece en la parte de arriba del excel 2007, el siguiente texto: Advertencia de seguridad: Se ha deshabilitado la actualización automática de los vinculos Tengo que darle a Opciones y seleccionar habilitar para que desaparezca. Y esto cada vez que abro el archivo. He buscado informacion al respecto y solo soy capaz de solucionarlo si entro en: Opciones de excel - Centro de confianza - Configuracion del centro de confianza - Habilitar actualizacion automatica de todos los vinculos del libro (no recomendado) Ciertamente no se lo que estoy haciendo, ni tampoco se el porque me sale este mensaje si tan solo escribo código en VBA. Agradeceria que me comentarais un poco el porque de este aviso de seguridad y como solucionarlo. Graciñas

Me respondo a mi misma en esta pregunta chorra, pero la verdad es que me esta dando un juego impresionante: ActiveSheet.Shapes(1).TextFrame.Characters.Text = vbCrLf & "Esto funciona"