tag:blogger.com,1999:blog-4623278671508370136.post4793574525970195990..comments2023-08-01T13:39:53.991+02:00Comments on EXCEL FORO: Un blog de Excel: VBA: Validación de datos siempre ordenadaExcelforo - Ismael Romerohttp://www.blogger.com/profile/17680553534095355222noreply@blogger.comBlogger9125tag:blogger.com,1999:blog-4623278671508370136.post-2503160786919073102019-04-24T22:57:24.705+02:002019-04-24T22:57:24.705+02:00Ok. Muchas gracias :)
Ok. Muchas gracias :)<br />Soniahttps://www.blogger.com/profile/08999727782942481616noreply@blogger.comtag:blogger.com,1999:blog-4623278671508370136.post-62395498991742853332019-04-22T09:20:39.260+02:002019-04-22T09:20:39.260+02:00Hola Sonia,
en la columna H sería suficiente
=(C2*...Hola Sonia,<br />en la columna H sería suficiente<br />=(C2*3)+(D2*1)<br /><br />En la otra tabla, para las ordenaciones lee este <a href="https://excelforo.blogspot.com/2009/10/la-funcion-jerarquia-la-ordenacion-de.html" rel="nofollow">post</a><br /><br />tendrás una ordenación de los puntos de los equipos, y sobre ello podrás recuperar con funciones de búsqueda el nombre (col A).<br /><br />Para la diferencia de goles simplemente =F2-G2<br /><br />SaludosExcelforo - Ismael Romerohttps://www.blogger.com/profile/17680553534095355222noreply@blogger.comtag:blogger.com,1999:blog-4623278671508370136.post-62708070596602791442019-04-19T23:41:08.122+02:002019-04-19T23:41:08.122+02:00Hola, disculpa mi molestia, mi duda es acerca de o...Hola, disculpa mi molestia, mi duda es acerca de otro tema de EXCEL, me podrías ayudar, es acerca de una tabla de Posiciones de Equipos de fútbol:<br /> Columna A: EQUIPO<br /> Columna B: PARTIDOS JUGADOS<br /> Columna C: PARTIDOS GANADOS<br /> Columna D: PARTIDOS EMPATADOS<br /> Columna E: PARTIDOS PERDIDOS<br /> Columna F: GOLES A FAVOR<br /> Columna G: GOLES EN CONTRA<br /> Columna H: PUNTOS (HA CALCULAR, lo he realizado así =SUMA((C2*3)+(D2*1)+(E2*0)), EXISTE OTRA FORMA CON USO DE FUNCIONES?)<br /><br />APARTE SE PIDE HACER UNA TABLA EN LA MISMA HOJA (PARTE DE ABAJO)<br /> Columna A: EQUIPO<br /> Columna B: PUNTOS (lo he realizado así con BUSCARV), Se puede hacer de otra manera?<br /> Columna C: DIFERENCIA DE GOLES (HA CALCULAR, lo he realizado así =SI(F2>=0;F2-G2;0), EXISTE OTRA FORMA DE HACERLO CON FUNCIONES?)<br /><br />Soniahttps://www.blogger.com/profile/08999727782942481616noreply@blogger.comtag:blogger.com,1999:blog-4623278671508370136.post-17075656818386538552019-04-12T08:19:08.262+02:002019-04-12T08:19:08.262+02:00;-)
gracias por el aporte y por compartir tu idea
...;-)<br />gracias por el aporte y por compartir tu idea<br />SldsExcelforo - Ismael Romerohttps://www.blogger.com/profile/17680553534095355222noreply@blogger.comtag:blogger.com,1999:blog-4623278671508370136.post-81180742300237294012019-04-11T20:50:53.992+02:002019-04-11T20:50:53.992+02:00Hola Ismael, Excelente en ejemplo, yo al ver el ej...Hola Ismael, Excelente en ejemplo, yo al ver el ejemplo me pregunte: ¿Como hacer la validación de datos ordenada sin que la base de datos origen se ordene? y con la GRABADORA DE MACROS lo hice, claro con solo unos pequeños cambios en el código, esto para demostrar lo importante que es la GRABADORA DE MACROS, para los que no sabemos muy bien VBA-Excel.<br /><br />Sub Macro3()<br />Dim Uf&<br /> Application.ScreenUpdating = False<br /> Uf = Range("A" & Rows.Count).End(xlUp).Row - 1<br /> Range("A2").Select<br /> Range(Selection, Selection.End(xlDown)).Select<br /> Selection.Copy<br /> Range("G1").Select<br /> Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _<br /> :=False, Transpose:=False<br /> Application.CutCopyMode = False<br /> ActiveWorkbook.Worksheets("Hoja2").Sort.SortFields.Clear<br /> ActiveWorkbook.Worksheets("Hoja2").Sort.SortFields.Add2 Key:=Range("G1"), _<br /> SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal<br /> With ActiveWorkbook.Worksheets("Hoja2").Sort<br /> .SetRange Range("G1:G" & Uf)<br /> .Header = xlNo<br /> .MatchCase = False<br /> .Orientation = xlTopToBottom<br /> .SortMethod = xlPinYin<br /> .Apply<br /> End With<br /> <br /> Range("E2").Select<br /> With Selection.Validation<br /> .Delete<br /> .Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _<br /> xlBetween, Formula1:="=$G$1:$G$" & Uf<br /> .IgnoreBlank = True<br /> .InCellDropdown = True<br /> .InputTitle = ""<br /> .ErrorTitle = ""<br /> .InputMessage = ""<br /> .ErrorMessage = ""<br /> .ShowInput = True<br /> .ShowError = True<br /> End With<br /> Application.ScreenUpdating = True<br />End Sub<br /><br />y en el código de la hoja:<br /><br />Private Sub Worksheet_Change(ByVal Target As Range)<br />Dim rngCiudades As Range<br /> Set rngCiudades = Hoja2.Range("TblCiudades[Ciudades]")<br /> If Not Intersect(Target, rngCiudades) Is Nothing Then<br /> Call Macro3<br /> End If<br />End Sub<br /><br />Lo hice en la hoja 2, los datos en la columna "A", Copio y ordeno los datos en la columna "G". y La validación de datos en E2.<br /><br />Saludos.<br />Leopoldo Blancashttps://www.blogger.com/profile/07943049512567310849noreply@blogger.comtag:blogger.com,1999:blog-4623278671508370136.post-85630379254130864442019-04-11T13:44:57.053+02:002019-04-11T13:44:57.053+02:00Hola Carlos
es más sencillo de lo que parece
Selec...Hola Carlos<br />es más sencillo de lo que parece<br />Seleccionas el campo de la TblCiudad y con el rango seleccionados Asignas Nombre definido con ese nombre... bien desde el Cuadro de nombres o bien desde la ficha Fórmulas> grupo Nombres definidos>botón Asignar nombres<br /><br />SldsExcelforo - Ismael Romerohttps://www.blogger.com/profile/17680553534095355222noreply@blogger.comtag:blogger.com,1999:blog-4623278671508370136.post-65151874300822888402019-04-11T10:18:37.687+02:002019-04-11T10:18:37.687+02:00Muchas gracias Ismael por este interesante artícul...Muchas gracias Ismael por este interesante artículo.<br /><br />Quizás mi pregunta sea muy elemental, pero me he liado en el paso de asignar un nombre definido a la tabla de ciudades (tblCiudad). ¿Cómo configuras ndCiudades =TblCiudad[ciudades]?<br /><br />Conozco la pestaña de nombres definidos, en fórmulas, pero no consigo configurarlo en la forma que comentas.<br /><br />Saludos.<br /><br />Carlos.Carlos Fernández Canethttps://www.blogger.com/profile/12324935849711486119noreply@blogger.comtag:blogger.com,1999:blog-4623278671508370136.post-58985985063304775222019-04-10T08:17:40.536+02:002019-04-10T08:17:40.536+02:00Correcto Sergio...
pero de momento hay que esperar...Correcto Sergio...<br />pero de momento hay que esperar o pasarse a versiones 'Insiders'<br />;-)Excelforo - Ismael Romerohttps://www.blogger.com/profile/17680553534095355222noreply@blogger.comtag:blogger.com,1999:blog-4623278671508370136.post-85975746745576114282019-04-09T21:01:17.608+02:002019-04-09T21:01:17.608+02:00Ahora se podría hacer más fácil y rápido con las n...Ahora se podría hacer más fácil y rápido con las nuevas funciones matriciales dinámicas: =ORDENAR(A2:A15) te da esa solución... A ver si lo implantan ya para todos los usuarios!!!Sergio Traviesohttps://www.blogger.com/profile/01548877101839725556noreply@blogger.com