tag:blogger.com,1999:blog-8263944010888306433.post6364836976399891435..comments2024-02-24T19:25:18.299+01:00Comments on ExcelAvanzado.com: Transferir los datos de un Rango a un ArrayAdolfo Apariciohttp://www.blogger.com/profile/18373309889444674587noreply@blogger.comBlogger31125tag:blogger.com,1999:blog-8263944010888306433.post-21808883749668439222019-02-19T18:23:21.661+01:002019-02-19T18:23:21.661+01:00hola adolfo
consulta al filtro de una tabla se le ...hola adolfo<br />consulta al filtro de una tabla se le puede asignar como rango matriz y reemplazar la columna adyacente con otro valor<br />Anonymoushttps://www.blogger.com/profile/03184423763974094768noreply@blogger.comtag:blogger.com,1999:blog-8263944010888306433.post-35876645220641004752017-10-27T01:48:28.519+02:002017-10-27T01:48:28.519+02:00Saludos, como podría quedar una rutina que cree 6 ...Saludos, como podría quedar una rutina que cree 6 tablas de bingo en una hoja pero que los números aleatorios no se repitan en ninguna tabla osea no se repitan como columna por ejemplo la columna "B" de la primera tabla que quedaría en la parte superior izquierda no posea los mismos números de columa "B" de la segunda tabla y así hasta la 6ta tabla, esto tmabién con las columnas "I", "N", "G", "O". gracias de antemano.Jorantonyhttps://www.blogger.com/profile/00608178506322718429noreply@blogger.comtag:blogger.com,1999:blog-8263944010888306433.post-18241448918386243872016-12-29T14:12:48.324+01:002016-12-29T14:12:48.324+01:00Estoy usando una macro que me rellena un documento...Estoy usando una macro que me rellena un documento pdf desde una hoja excel, pero en esta hoja voy introduciendo datos a través de un formulario y quisiera pasar al formulario pdf los datos d cada registro. como bien que el array esta predefinido en la macro, no se como hacer para que cambie este rango en función del registro deseado. <br /><br />La macro es la siguiente:<br /><br />Sub PasarDatosaPdf()<br /> Application.DisplayAlerts = False<br /> Application.ScreenUpdating = False<br /> Set h2 = Sheets("Hoja1") <br /> '<br /> celdas = Array("A2", "B2", "C2", "D2", "E2", "F2", "G2", "H2", "I2", "J2", "K2", "L2", "M2", "N2")<br /> '<br /> ruta = "D:\cosas de gentes\VATELIA\NUEVA DOCUMENTACION\"<br /> nomb = "Formulario Orden de fabricacion"<br /> ActiveWorkbook.FollowHyperlink ruta & nomb & ".pdf" '<br /> Application.Wait Now + TimeValue("00:00:03")<br /> For I = LBound(celdas) To UBound(celdas)<br /> DoEvents<br /> SendKeys "{TAB}", True<br /> DoEvents<br /> h2.Range(celdas(I)).Copy<br /> DoEvents<br /> SendKeys "^v", True<br /> DoEvents<br /> Next<br /> '<br /> Application.ScreenUpdating = True<br /> MsgBox "Se enviaron los datos al pdf"<br />End Sub<br /><br />Lo que necesito es cambiar de forma dinámica la linea de código celdas = Array("A2", "B2", "C2", "D2", "E2", "F2", "G2", "H2", "I2", "J2", "K2", "L2", "M2", "N2") donde las celdas son otras...<br /><br />O quizás algún otro método para rellenar el formulario PDF<br /><br />Muchas graciasJose Ramirohttps://www.blogger.com/profile/01795418908784560140noreply@blogger.comtag:blogger.com,1999:blog-8263944010888306433.post-38090848105197349462016-11-13T01:14:16.413+01:002016-11-13T01:14:16.413+01:00Tengo una lista de numeros del 1 al 20 (por ejempl...Tengo una lista de numeros del 1 al 20 (por ejemplo) en la columna A y deseo agruparlos en las columnas c,d,e,f, y g<br />de 5 en 5, pero quiero que se pasen automaticamente.<br />Como le hago? Por ejemplo : https://goo.gl/photos/P5KctXZuct2jiiwf6<br />mazatl99https://www.blogger.com/profile/13281745901628279590noreply@blogger.comtag:blogger.com,1999:blog-8263944010888306433.post-13582939277676997542016-08-09T05:29:53.584+02:002016-08-09T05:29:53.584+02:00buenas noches
si me pueden ayudar tengo una macr...buenas noches <br /> si me pueden ayudar tengo una macro en la que quiero editar el caption o texto que contiene una etiqueta pero solo e logrado seleccionarla el detalle esta en que estoy trabajando en powerpoin ya importe y almacene los datos que necesitaba de un libro exel,pero quiero automáticamente vaciar el dato que tengo en las variable a la etiqueta que tengo en la hoja o presentación de powerpoin.<br /><br />si me dan una idea se los agradecería<br /><br />- E logrado seleccionar con: 'ActivePresentation.Slides(1).Shapes.Range (array ("cedula")).select<br />Anonymoushttps://www.blogger.com/profile/10405628955769411941noreply@blogger.comtag:blogger.com,1999:blog-8263944010888306433.post-15073049225525152162016-05-07T00:32:30.569+02:002016-05-07T00:32:30.569+02:00Buenas tardes,
Si me pueden apoyar, tengo un ran...Buenas tardes, <br /><br />Si me pueden apoyar, tengo un rango de la forma $A:$D pero evidentemente no voy a recorrer todas las celdas, por lo que requiero copiar dicho rango sin tener en cuenta las celdas sin valores (Tenia pensado usar .End(xlUp).Row )Anonymoushttps://www.blogger.com/profile/01710441567236165603noreply@blogger.comtag:blogger.com,1999:blog-8263944010888306433.post-69256269190731451412016-04-08T14:20:06.592+02:002016-04-08T14:20:06.592+02:00Buenos días y para saltar un campo que esté en bla...Buenos días y para saltar un campo que esté en blanco (sin valores) y continue moviendo el resto a la próxima posición libre es posible?ç<br />Muchas gracias¡¡Anonymoushttps://www.blogger.com/profile/17610716922825385385noreply@blogger.comtag:blogger.com,1999:blog-8263944010888306433.post-47946649467670706622015-10-20T21:04:18.428+02:002015-10-20T21:04:18.428+02:00Hola, por favor necesito de su ayuda. Quiero crear...Hola, por favor necesito de su ayuda. Quiero crear un archivo de texto, el nombre del archivo es el valor de una celda y el contenido de dicho archivo es otro valor de una celda.<br /><br />Actualmente tengo este macro, pero me sale error 400, pero mando un MsgBox con el valor de las variables y si me muestra dicho valor <br /><br />Sub pruebitaXML()<br />Dim FSO1 As Object<br />Dim ArchivoTexto1 As Object<br />Dim cont As Integer<br />For Each d In Worksheets("Hoja2").Range("c4:c5") 'd tiene el contenido del archivo<br /> Set FSO1 = CreateObject("Scripting.FileSystemObject")<br /> For Each c In Worksheets("Hoja2").Range("c5:c4") 'c tiene el nombre del archivo<br /> Set ArchivoTexto1 = FSO1.CreateTextFile("\\192.148.1.15\img_cont\" & c)<br /> Next c<br /> ArchivoTexto1.WriteLine ActiveSheet.Range(c).Value<br /> ArchivoTexto1.Close<br />Next d<br /> Set ArchivoTexto1 = Nothing<br /> Set FSO1 = Nothing<br />End Sub<br /><br />Muchas gracias cualquier aporteAnonymoushttps://www.blogger.com/profile/04848274926482654932noreply@blogger.comtag:blogger.com,1999:blog-8263944010888306433.post-40222904196064017102015-10-15T21:19:52.158+02:002015-10-15T21:19:52.158+02:00Ayuda: no me acuerdo cómo ordenar una tabla de 20 ...Ayuda: no me acuerdo cómo ordenar una tabla de 20 datos numéricos que están distribuidos en 5 columnas y seis filas. Gracias.Anonymousnoreply@blogger.comtag:blogger.com,1999:blog-8263944010888306433.post-75479498333191182432015-10-15T21:16:05.764+02:002015-10-15T21:16:05.764+02:00Muy bueno.Muy bueno.Anonymousnoreply@blogger.comtag:blogger.com,1999:blog-8263944010888306433.post-38291109807569105052015-08-13T21:58:10.523+02:002015-08-13T21:58:10.523+02:00Hola,cómo determino el tamaño de una tabla dinámic...Hola,cómo determino el tamaño de una tabla dinámica con vba??Anonymoushttps://www.blogger.com/profile/01001128833963616235noreply@blogger.comtag:blogger.com,1999:blog-8263944010888306433.post-59537885099073567692015-08-13T21:57:46.065+02:002015-08-13T21:57:46.065+02:00Hola,cómo determino el tamaño de una tabla dinámic...Hola,cómo determino el tamaño de una tabla dinámica con vba??Anonymoushttps://www.blogger.com/profile/01001128833963616235noreply@blogger.comtag:blogger.com,1999:blog-8263944010888306433.post-86707860975480174902015-03-26T23:36:42.296+01:002015-03-26T23:36:42.296+01:00Espero puedan ayudarme, Buen día
Necesito imprimi...Espero puedan ayudarme, Buen día <br />Necesito imprimir los valores de un vector en un userfrom la idea es:<br />sub principal()<br />dim vect(3) as variant<br />vect(1)=1<br />vect(2)=2<br />vect(3)=3<br /><br />UserFrom1.Show<br />end sub<br /><br />Private Sub CommandButton1_Click()<br />'Aqui creo yo es donde deberia imprimirse el vector "vect" en un listbox pero nose como<br />End Sub<br /><br />Muchas gracias por leerme, espero puedan ayudarme graciasAnonymoushttps://www.blogger.com/profile/02111630431350724233noreply@blogger.comtag:blogger.com,1999:blog-8263944010888306433.post-54173138246350589602015-03-26T23:08:29.343+01:002015-03-26T23:08:29.343+01:00Este comentario ha sido eliminado por el autor.Anonymoushttps://www.blogger.com/profile/02111630431350724233noreply@blogger.comtag:blogger.com,1999:blog-8263944010888306433.post-25970626736555262262015-03-26T22:59:31.794+01:002015-03-26T22:59:31.794+01:00sub ejemplo()
'En esta parte lees el valor de ...sub ejemplo()<br />'En esta parte lees el valor de la celda A1 y lo asignas a la variable a y asi, copia y pega tal cual esto y veras de lo que hablo<br />a=cells(1,1).value<br />stop<br />end subAnonymoushttps://www.blogger.com/profile/02111630431350724233noreply@blogger.comtag:blogger.com,1999:blog-8263944010888306433.post-65276961551700615952014-11-18T15:55:15.136+01:002014-11-18T15:55:15.136+01:00hola,
he leído el blog y me ha dado muchas luces...hola, <br /><br />he leído el blog y me ha dado muchas luces en varios problemas, sin embargo desde hace un tiempo tengo una duda:<br /><br />¿Es posible separar el texto de una cadena en una matriz?<br /><br />he intentado con la función Split, pero las cadenas que debo evaluar no tienen ningún delimitador.<br /><br />agradezco su ayuda enormementeAnonymoushttps://www.blogger.com/profile/15356809857383153833noreply@blogger.comtag:blogger.com,1999:blog-8263944010888306433.post-63075395365291219632014-10-20T10:16:31.219+02:002014-10-20T10:16:31.219+02:00Hola Jose.
Mira esta entrada del blog por si te ay...Hola Jose.<br />Mira esta entrada del blog por si te ayuda.<br /><a href="http://www.excelavanzado.com/2014/09/arrays.html" rel="nofollow">Arrays</a>Adolfo Apariciohttps://www.blogger.com/profile/18373309889444674587noreply@blogger.comtag:blogger.com,1999:blog-8263944010888306433.post-73409357497605557472014-09-27T01:03:31.796+02:002014-09-27T01:03:31.796+02:00hola, he estado probando la manera como se indica ...hola, he estado probando la manera como se indica para asignar un rango a una matriz pero me ha arrojado un error indicando que no se puede asignar de esa forma, estoy intentando hacer una función que entregue las constantes de la línea de regresión de un rango de datos seleccionado.<br />ojala cuente con vuestro apoyojoseeeehttps://www.blogger.com/profile/05981560417443738941noreply@blogger.comtag:blogger.com,1999:blog-8263944010888306433.post-24611498412700100742014-05-02T12:10:59.991+02:002014-05-02T12:10:59.991+02:00Hola Xpo.
Lo que necesitas hacer es algo parecido ...Hola Xpo.<br />Lo que necesitas hacer es algo parecido a una media móvil pero en lugar de sacar la media móvil completa únicamente necesitas que te de la media movil de 20 (MM20) cada 20 datos.<br />Esto se puede lograr de forma manual, con fórmulas o con macros.<br />Voy a crearte una entrada en el blog que te lo cuente.<br />Un saludo.Adolfo Apariciohttps://www.blogger.com/profile/18373309889444674587noreply@blogger.comtag:blogger.com,1999:blog-8263944010888306433.post-60981447436924010172014-03-25T23:54:12.454+01:002014-03-25T23:54:12.454+01:00COMO HAGO UN MACRO QUE ME TOME DATOS DE EXCEL Y LO...COMO HAGO UN MACRO QUE ME TOME DATOS DE EXCEL Y LOS PASE A VISUAL BASICAnonymoushttps://www.blogger.com/profile/01103809156517415976noreply@blogger.comtag:blogger.com,1999:blog-8263944010888306433.post-10995742130961570752014-03-12T17:00:14.434+01:002014-03-12T17:00:14.434+01:00Hola adolfo buenas tardes!
tengo una columna forma...Hola adolfo buenas tardes!<br />tengo una columna formada por 70000 datos y quiero format otra matria con los promedios de cada 20 datos de la primera si repetir los que ya he promedidado, es decir, tomo los primeros 20, los promedio, se grea el primer valor, luego tomo los 20 siguientes, los promedio y ya tengo el segundo valor, tomo los 20 siguientes para formar el tercero, y asi hasta que llego a los últimos 20 donde estara el dato 70000. Me podria s ayudar por favor?!!Xpo Ferenshttps://www.blogger.com/profile/13705653088390507789noreply@blogger.comtag:blogger.com,1999:blog-8263944010888306433.post-48981482172686365402014-03-11T01:36:59.340+01:002014-03-11T01:36:59.340+01:00HOLA soy nuevo en esto de excel y las macros, teng...HOLA soy nuevo en esto de excel y las macros, tengo una duda, me cree un libro en el cual la columna E3 a E30 contiene los nombres de ciertos gastos o compañias (luz agua hipoteca)y la columna J3 a J30 las fechas de pagos de recibos o ingresos de facturas( la columna J esta con formato fechalarga.<br />quisiera saber si hay alguna macro para que cuando llegue la fecha indicada en la columna J me avise con una ventana diciendome que cierto gasto vencio de la columna E( ejem E6 "agua" vence hoy ).<br />use una macro que encontre.<br /><br /><br />Private Sub Workbook_Open()<br />Dim Fecha1, Fecha2 As Date<br /><br /><br />'si hay valores en J4 se almacena en Fecha1<br />If Range("J4").Value <> "" Then<br /> Fecha1 = Range("J4").Value<br />End If<br />'ahora guardo la fecha del sistema<br />Fecha2 = Date<br />'y comparo:<br />If Fecha1 = Fecha2 Then<br /> MsgBox "Alerta, Hay vencimientos Pendientes", vbInformation, "RECORDATORIO"<br /><br />End If<br />End Sub<br /><br /><br />Pero solo me funciona en la celda J4 y no me avisa de que tipo de vencimiento es ( columna E). He probado a cambiar los rangos por ( J3:J30 ) pero me da fallo y no lo admite. Hay forma de poder hacer lo que yo quiero ? Gracias de antemano y felicidades por este blog y compartir con nosotros tus conocimientos. <br />Un saludo AngelFOBOShttps://www.blogger.com/profile/03850597407485183136noreply@blogger.comtag:blogger.com,1999:blog-8263944010888306433.post-40110500676818449792013-12-22T19:16:01.114+01:002013-12-22T19:16:01.114+01:00Hola Jandro.
Prueba este enlace:
http://www.excel...Hola Jandro.<br />Prueba este enlace:<br /><br />http://www.excelavanzado.com/2013/10/ordenar-un-millon-de-valores.html<br /><br />Un saludo.Adolfo Apariciohttps://www.blogger.com/profile/18373309889444674587noreply@blogger.comtag:blogger.com,1999:blog-8263944010888306433.post-59110396969093102392013-12-21T12:45:18.685+01:002013-12-21T12:45:18.685+01:00Buenos días.
Muy agradecido por encontrar a gente...Buenos días.<br /><br />Muy agradecido por encontrar a gente como tu, que compartes tus conocimientos en la nube, para que todos podamos ser ayudados y aprender.<br /><br />Tengo una duda sobre matrices. <br /><br />He oído por ahí que es mucho más rápido trabajar con matrices dentro el código que hacerlo directamente en las celdas de las hojas de excel. Por ello pasé un grupo de celdas a una matriz (lo he hecho con un While, que me permite transponer filas x columnas, aunque me ha encantado tu explicación: simple y rápida. Ya veremos si lo cambio). Luego mi intención es ir buscando valores en estas celdas y devolver la posición dónde encuentro el valor. Per ahí viene el lío. Yo quería hacerlo sobre la matriz que he preparado, pero no encuentro la forma de utilizar una función nativa de búsqueda (tipo find). O lo hago con un bucle sobre la matriz, o utilizo la función nativa find sobre las celdas de una hoja. ¿Hay alguna función nativa de búsqueda sobre matrices dentro del código de la macro, sin tener que ir a las celdas?<br /><br />Muchas gracias de antemano y saludos!<br /><br />AlexAnonymoushttps://www.blogger.com/profile/04824248059109276912noreply@blogger.comtag:blogger.com,1999:blog-8263944010888306433.post-5994577853144310252012-01-21T15:48:21.247+01:002012-01-21T15:48:21.247+01:00Hola, Se pueden manipular los rangos de excel como...Hola, Se pueden manipular los rangos de excel como Ud lo demuestra con claridad, sin embargo no se si se pueda hacer los mismo con un arreglo, es decir x ejemplo mi arreglo se llama datos y requiero el rango range(datos(2,1):datos(2,30)) donde por supuesto el arreglo datos es mucho mas grande. (la idea es extraer una parte sin necesidad de recorrerlo)Fernandohttps://www.blogger.com/profile/11180836932926264958noreply@blogger.com