Mario Rodríguez

:) Hola! Fernando Asegúrate de incluir en un Userform -al menos- un ListBox, e incorpórale (al userform) el siguiente código: Private Sub UserForm_Initialize() Dim lb As Object, i%, mWidth For Each lb In Controls If TypeOf lb Is MSForms.ListBox Then...

:) Sólo por "arriesgar" diría que son dos las soluciones: k = 85, y k = -85 ¿Acerté?... Saludos, Mario (Cacho) Rodríguez. .

:) "Acabo de inventar" (si es que ya no lo estaba, claro) una forma de saber si un número es múltiplo de 11. - Por ejemplo 2013. De "derecha a izquierda" separamos la cifra cada dos números, o sea: 20|13 y los sumamos: 20 + 13 = 33 Como "33" es...

:) A ver... a) El ID: ¿Lo tienes en una celda, en un textbox, en un List/Combobox? b) ¿Cómo se llama la tabla en la que se encuentra la info? c) La info: ¿La deseas poner en un rango del Excel, en un List/Combobox? Tienes, entonces, varias cosas que...

:) Hola! Jorge. Intenta con: Sub evaluar_Repetidos() Dim LR&, ws1 As Worksheet, ws2 As Worksheet Set ws1 = Sheets("Hoja 1"): Set ws2 = Sheets("Hoja 2") Application.ScreenUpdating = False ws2.Cells.Clear LR = ws1.Cells(Rows.Count, "b").End(xlUp).Row...

:) Tu descripción es insuficiente: habría que ver el archivo... :) .

:) Hola! Gladys Tu ejercicio venía planteando tirar una pelota a un muro lo más alto posible y de pronto dices: - "La habitación tiene una altura de 20 pies". Pregunto: ¿Qué habitación?... O sea: ¡ Esa acotación no tiene "nada que ver con nada"!...

:) A propósito del comentario de Rober Chispas me ha quedado un "espina" clavada, por lo que pregunto: ¿Todavía estamos a tiempo como para ayudarte, Ashley?... Saludos, Mario (Cacho) Rodríguez. :) .

:) En lo que te voy a mostrar, los datos están desde A2 y hacia abajo: With Range("a2", [a1].End(xlDown)) If .Count <> Evaluate("SumProduct(1 / CountIf(" & .Address & ", " & .Address & "))") Then MsgBox "Hay datos repetidos." End If End With Saludos,...

. En respuesta a tu comentario: - "... no se cómo haserle para llegar a la ecuacción del enunciado ...", diría que puedes hacer: y = mx + b ---> pasa "mx" al otro miembro: y - mx = b ---> divide ambos miembros por "b": (y - mx) / b = 1 --->...