jgirj

jgirj

 26,7K puntos  Colombia @jgirj desde - visto

Actividad pública reciente

Ha respondido en

Sobre macros y solver

Finaliza esta pregunta para poder atender a otros usuarios
Ha respondido en

Worksheets 2

Hay 2 opciones: 1. Private Sub CommandButton1_Click() worksheets("Datos").Visible=True Sheets("Datos").Select Range("E6").Select ActiveCell.FormulaR1C1 = TextBox1 TextBox1 = Empty TextBox1.SetFocus worksheets("Datos").Visible=False End Sub 2. Private...
Ha respondido en

Introducción a las Macros

Escribe a mi correo con el asunto ManualVBA y te enviare documentos que pueden servirte. [email protected]
Ha respondido en

Ejecución de macro

Usa este código: Private Sub Worksheet_Change(ByVal Target As Excel.Range) Select Case Target.Address Case "$A$3" MiMacro End Select End Sub En un módulo inserta este código (MiMacro es el nombre de la rutina que quieres que se ejecute, lo pongo como...
Ha respondido en

Saltar a la celda

Supongamos que queremos escribir un valor en la celda A1 y que al terminar saltemos a la celda B7 y luego a la C9 y luedo a la D1. En el editor de VBA escribamos el siguiente código en la ventana de la hoja correspondiente: Private Sub...
Ha respondido en

Consulta de código en visual basic para abrir libros de excel

Enviame un correo a [email protected] con el asunto Todoexpertos y te enviare el archivo con el ejemplo.
Ha respondido en

Solver y excel

En esta página encontrarás todo lo que necesitas para resolver tu problema. http://support.microsoft.com/kb/843304
Ha respondido en

Necesito ayuda!

¿Funcionó?
Ha respondido en

Convertir Mayúsculas a Minúsculas

Intenta con esto Cells(FilaDestino, ColumnaDestino) = WorksheetFunction.Proper(Cells(FilaOrigen, ColumnaOrigen))
Ha respondido en

Archivo Protegido

Si quieres envíame el archivo a [email protected] y te lo devolveré desprotegido.
Ha respondido en

Desplazar celdas

Solo tienes que reemplazar la linea: Application.Workbooks("Libro2").Worksheets("Hoja1").Range(Rango) = Target Por: Worksheets("Hoja2").Range(Rango) = Target
Ha respondido en

Ordenar registros

Este ejemplo puede servirte: A B C D E F Jer Comp Prod Ord Comp Prod 6 Comp1 555,37 1 Comp11 948,95 11 Comp2 269,43 2 Comp12 855,85 10 Comp3 334,12 3 Comp9 842,49 5 Comp4 606,37 4 Comp6 799,62 8 Comp5 371,91 5 Comp4 606,37 4 Comp6 799,62 6 Comp1...
Ha respondido en

Cursor del mouse

Puedes intentar usando la instrucción: SendKeys "{F2}" en el evento Selection_Change del objeto WorkSheet.
Ha respondido en

Numero de dígitos de un numero

Si te refieres al número de caracteres numéricos entonces Si el numero es entero: Digitos=len(Numero) Si el numero es decimal y necesitas el total de caracteres: Digitos=len(numero)-1 para restarle la coma o el punto Si el numero es decimal pero solo...
Ha respondido en

Control facturas

No necesitas macros, hazlo con formato condicional. Parate en la celda C2, ve a la barra de menú... Formato... Formato Condicional. En el primer cuadro de opciones selecciona Fórmula. En el cuadro de entrada adyacente excribe: =$K2="Pagado" Click en...
Ha respondido en

Contraseña VB en Excel

Envíame el archivo ([email protected]) y te lo devolveré desprotegido.

Mejores respuestas proporcionadas

1
1
2
1