Alvaro Silveira

No necesariamente necesitas hacerlo en el momento de guardarlo. Te paso una función que te permitirá lo mismo en cualquier momento: Function UltimaFechaGuardado() As Date UltimaFechaGuardado = ActiveWorkbook.BuiltinDocumentProperties(12) End Function...

Espero que te sirva: Sub Copiar_Pegar_Rangos() hoja_origen = "Hoja2" hoja_destino = "Hoja3" fila_origen = 1 fila_destino = 1 Application.ScreenUpdating = False Do While Cells(fila_origen, 1) <> "" 'Copia y Pega Rango1 Worksheets(hoja_origen).Activate...

Espero que te sirva este ejemplo básico : Sub Copiar_Pegar() Range("A1:B1").Copy If ("F2") = "" Then Range("F2").PasteSpecial xlPasteAll Else Range("F1").End(xlDown).Offset(1, 0).PasteSpecial xlPasteAll End If Range("A1").Select...

Sin perder el formato de origen no es posible. Si es no perder el formato destino puedes usar la función Concatenar =CONCATENAR (celda1, celda2) incluso agregando separadores por ejemplo: =CONCATENAR (A1," - ",A2) o saltos de linea en la misma celda...

Puedes hacerlo de la siguiente forma: ActiveSheet. Unprotect "hola"

mi nombre es Alvaro y no Dios.... jejejejej en cuanto a tu problemita es bastante sencillo, es un tema de operadores logicos; deberia sr asi : IF (Range("n1") = "1" and Range("n11")= "texto") or (Range("n1")="2" and Range("n11")= "texto") then codigo...

Estimad@: la verdad que lograste marearme o puede ser por la medicamentación que tengo que tomar hasta la semana que viene con suerte ... jajaja Bueno, por lo que entendí tu problema es la ruta del archivo que hay que abrir ... si es esto yo lo...

Tienes una función disponible que es : =dias.lab(fecha_ini;fecha_fin;feriados) esta te resta las dos fecha y contabiliza solo de lunes a viernes por ejemplo : =dias.lab(01/04/08;17/04/08) devuelve 13 incluso puedes hacer un rango con fecha de...

¿Estas usando condicionales anidados? (un if dentro de otro y asi sucesivamente). Si es así lamento comunicarte que va a ser imposible porque no recuerdo bien el numero exacto pero se que es limitado el anidamiento que puedes hacer. Una solución es...

Ante que nada mil disculpa por la demora. No me queda claro, ¿tu tienes una lista y digitas el código en otro lugar fuera de la misma (otra hoja por ejemplo) y quieres que devuelva el resto de los datos asociados? Y la segunda: cuando te referís a...

Antes que nada mil disculpas por la demora... Te cuento que lo que tienes que usar es el evento BeforeClose del Woorkbook Private Sub Workbook_BeforeClose(Cancel As Boolean) if condicion then cancel = false '----- no deja cerrar else cancel = true...