Leyendo la nota completo, estoy segurisimo que esto huele totalmente a NSA...

Hola!, Buen día a todos.

Recientemente en el Instituto donde estudio terminamos nuestro proyecto de lenguaje de programacion, pero como puntos extras nos han encargado de incorporarlo a NetBeans.

Algun tiempo atras habia encontrado en un blog la manera, pero ahora me encuentro que ese blog se encuentra cerrado. Seria de gran ayuda que me ayudaran. Igual les puedo pasar mi lenguje de programacion que esta basado en JAVA.

Saludos a todos, espero sus respuestas.

 

Hola! 

Tengo una anomalia en esta carptea, ya que a veces (unas dos veces por semana) cuando quiero acceder a la carpeta de Downloads me dice que la carpeta esta vacia, enseguida reintento acceder y me aparecen los archivo. El dilema es el siguiente:

¿Algun virus?

¿Falta de mantenimiento preventivo?

¿Restauracion o reparacion del sistema?

Saludos, estare abiertos a todas sus respuestas y opiniones.

 

Hola! Que tal? Gracias por tu ayuda! Ahora lo que no se es donde insertar ese codigo, ya que no tengo conocimientos de VBA, si podras reescribir el codigo te lo agradeceria mucho. De hecho hace rato probe con el codigo que pusiste pero me sigue marcando error de compilacion. De ante mano, gracias.

Hola!, buen día! Desearia que alguien me ayudara con un problema que tengo al ejecutar una macro en Excel.

Lo que deseo es ejecutar una macro desde un celda activa, no desde donde inicialmente programe la macro. El codigo es el siguiente.

[color=blue]Sub Macro1()
'
' Macro1 Macro
' lkjbugvy
'
' Acceso directo: CTRL+h
'
    Range(ActiveCell).Select
    With Selection
        .HorizontalAlignment = xlGeneral
        .VerticalAlignment = xlBottom
        .WrapText = False
        .Orientation = 0
        .AddIndent = False
        .IndentLevel = 0
        .ShrinkToFit = False
        .ReadingOrder = xlContext
        .MergeCells = True
    End With
    With Selection
        .HorizontalAlignment = xlGeneral
        .VerticalAlignment = xlBottom
        .WrapText = False
        .Orientation = 0
        .AddIndent = False
        .IndentLevel = 0
        .ShrinkToFit = False
        .ReadingOrder = xlContext
        .MergeCells = True
    End With
    With Selection
        .HorizontalAlignment = xlGeneral
        .VerticalAlignment = xlBottom
        .WrapText = False
        .Orientation = 0
        .AddIndent = False
        .IndentLevel = 0
        .ShrinkToFit = False
        .ReadingOrder = xlContext
        .MergeCells = True
    End With
    With Selection
        .HorizontalAlignment = xlGeneral
        .VerticalAlignment = xlBottom
        .WrapText = False
        .Orientation = 0
        .AddIndent = False
        .IndentLevel = 0
        .ShrinkToFit = False
        .ReadingOrder = xlContext
        .MergeCells = True
    End With
    With Selection
        .HorizontalAlignment = xlGeneral
        .VerticalAlignment = xlBottom
        .WrapText = False
        .Orientation = 0
        .AddIndent = False
        .IndentLevel = 0
        .ShrinkToFit = False
        .ReadingOrder = xlContext
        .MergeCells = True
    End With
    Selection.UnMerge
    Range("A1:E1").Select
    Selection.Copy
    Application.CutCopyMode = False
    With Selection
        .HorizontalAlignment = xlCenter
        .VerticalAlignment = xlBottom
        .WrapText = False
        .Orientation = 0
        .AddIndent = False
        .IndentLevel = 0
        .ShrinkToFit = False
        .ReadingOrder = xlContext
        .MergeCells = False
    End With
    Range("A1:E1").Select
    Application.CutCopyMode = False
    Selection.Copy
    Range("A2:E5").Select
    ActiveSheet.Paste
    Range("H7").Select
End Sub
[/color]

Tengo entendido que para ejecutar lo que deseo se debe escribir el comando Activecell despues de Range, pero cuando hago eso no se puede ejecutar la macro ya que detecta un error.

Cabe destacar que el resto del codigo lo que hace es que selecciona un rango de celdas y las descombina para que asi los datos que esten en una celda se queden en una sola y no se combinen con otras.

Saludos, y espero su pronta respuesta.

Corriganme si estoy mal, pero tengo entendido que todo esto fue iniciado por Nikola Tesla. Otra cosa, por lo que he estudiado la forma de almacenamiento en la informatica cuantica sera en cada atomo del " disco duro ".

Tambien recuerdo que hace algunos meses se rumoreo que en Medio Oriente se encontro un  computador portatil cuantico donde tenia almacenado mas de 20 millones de registros de usuarios de iPhones.

Ahora resulta que ahora es mas grave " ROBAR " dinero inexistente (osease digital), que matar a miles de humanos inocente en Malí o en ]Afghanistan.

Aun no entiendo porque no usar esa organizacion e inteligencia para hackear los servidores de bancos, personas multimillonarias y servidores militares para sacar a la luz la verdad.

Saludos a todos.