Mario Rodríguez

:) Hola! Marcelo (y fejoal) Cuando utilizas Format para guardar números en las celdas: Format(Range(" A3"), "$#,##0.00") "casi" como que te condenas al fracaso: ¡Tal como lo estás experimentando! ______________________ Si tienes un textbox con un...

:) Tan simple como: Sub Muestra() On Error Resume Next Range("D218") = 0 Range("D218") = "=VLOOKUP(R5C5,Hoja2!R7C4:R10C50,25,0)" End Sub Espero no haber "llegado tarde" y que te sea de utilidad. :) .

:) Hola! Diego (y Fer) Veinticuatro millones de datos es... ¡Muchísimo! (Lo mires por donde lo mires). De todos modos te dejaré una macro que -estimo- te puede brindar el conteo en unos 15 segundos (probada con la décima parte de datos, claro está):...

:) Entonces lo siguiente te puede ser de utilidad: Sub Macro451() Dim iCol As Range Application.ScreenUpdating = False For Each iCol In Range("A1:N430").Columns iCol.Copy Cells(Rows.Count, "P").End(xlUp).Offset(1) Next Columns("P").Sort Range("P1"),...

:) . Pon lo siguiente en el módulo de tu UserForm: Private Sub UserForm_Initialize() Dim i% For i = 0 To 11 ComboBox1.AddItem StrConv(Format(DateSerial(Year(Date), 1 + i, 1), "mmmm"), 3) Next End Sub Private Sub ComboBox1_Click() Dim iDate As Date...

:) Hola! Sandra Imagina que en tres celdas de la columna A de la hoja que llamas Hoja12 se cumple el "criterio". Entonces y como dices que deseas "eliminar solo uno": ¿Cuál de ellas deseas eliminar? ¿La primera, la segunda o la tercera?... Saludos,...

:) Hola! Tecknova. Te muestro una forma: Sub Macro367() Dim C As Range, Rng As Range For Each C In Range("A10:A110") If C = Empty Then If Not Rng Is Nothing Then Set Rng = Union(Rng, C) Else Set Rng = C End If Next If Not Rng Is Nothing Then...

:) Hola! Diego. Será necesario que amplíes tu descripción en dos cuestiones: a) Esos "0" y "1": ¿Son el resultado de fórmulas o son valores constantes? b) Imagina el rango Z2:AB3 con la siguiente info: 0 1 0 1 0 1 c) ¿Qué resultado deseas terminar...

:) Hola! Oscar. Te voy a enseñar "una nueva"... (jajajaja): - En una celda cualquiera del libro donde tienes esa dificultad, escribe una fecha cualquiera (por ejemplo: 1/5/2016). - Ve a las "Opciones avanzadas" de tu Excel, localiza "Usar sistema de...

:) Hola! Franklin (y Gustavo) Existen varias razones por las que ese "mil" te estaría pasando a la celda como "uno". Para asesorarte adecuadamente te agradeceré que incorpores a tu libro (o, si quieres en un libro nuevo) la siguiente macro: Sub...