.. ..

Tengo un libro con muchas fórmulas en modo de calculo manual, ya que primero quiero que unas macros se ejecuten en este modo para que así funcionen más rápido y al terminar lo coloco en automático para que las fórmulas hagan al finalizar su trabajo...

Necesito un grande favor explico continuación: Tengo un libro con varias hojas el cual tengo el calculo en manual. Y necesito una macro que al ejecutarla calcule las fórmulas de la fila y hoja completa donde me encuentro activo. Ejemplo. Si me...

Podrías por favor ayudarme con la siguiente macro. Tengo dos datos en las dos celdas LBN1:LBN2, y necesito pegar esos datos en las celdas LAK1:LAK2. Tengo una macro, pero como en una de las celdas tiene un valor "1-1-1" entonces cuando la pega lo...

Solicito de su valiosa colaboración para una macro que borre datos de determinado rango de acuerdo a la fila que este activa. Ejemplo: Si necesito borrar los datos del rango de las columnas "GNP:IBH" y estoy en la fila 50, borre los datos de ese...

Buenas tardes, solicit por favor la ayuda de un experto para que por favor me ayude con la siguiente macro, en el lado izquierdo tengo un rango con datos desde la columna ALN hasta la BXY y seguidamente en la columna BXC tengo unos datos. Con ceros y...

Sub ContarSI() With ActiveCell Range("BYC" & .Row) = WorksheetFunction.CountIf(Range("A" & .Row & ":ALL" & .Row), Range("BYA" & .Row)) End With End Sub buenas tardes. Tengo esta macro la cual cuenta entre esos dos rangos, se encuentra el criterio que...

Buenas tardes, solicito de la ayuda de algún experto para optimizar una macro que tengo, ella realiza muy buen su tarea. Pero su tiempo de ejecución en mi computador supera el minuto aproxmente y no se si sea posible optimizarla para que lo haga en...

¿Necesito ayuda para resolver este sorteo y si es rentable teniendo en cuenta las siguientes probabilidades vs su premio? Hay un sorteo de 300 números supongamos. 001-002-003-004 hasta 300. Y su valor de pago por acierto, es de 400 veces el valor...

Sub ExtraerDuplicados() Dim dic As Object Dim i As Long, j As Long, k As Long Dim a As Variant, b As Variant ' Set dic = CreateObject("Scripting.Dictionary") a = Range("A10:BXY" & Range("A" & Rows.Count).End(3).Row).Value 'RANGO A BUSCAR DUPLICADOS...

Sub concatenar_permutaciones() Dim a As Variant Dim i As Long, j As Long, k As Long, m As Long, n As Long a = Range("A10:AD" & Range("A" & Rows.Count).End(3).Row).Value 'CELDA INICIAL Y FINAL A CONCATENAR ReDim b(1 To UBound(a, 1), 1 To 1000) For i =...