Actividad pública reciente
Ha respondido en
Microsoft Excel
Sobre macros y solver
Finaliza esta pregunta para poder atender a otros usuarios
Ha respondido en
Microsoft Excel
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
Microsoft Excel
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
Microsoft Excel
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
Microsoft Excel
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
Microsoft Excel
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
Microsoft Excel
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
Microsoft Excel
Convertir Mayúsculas a Minúsculas
Intenta con esto Cells(FilaDestino, ColumnaDestino) = WorksheetFunction.Proper(Cells(FilaOrigen, ColumnaOrigen))
Ha respondido en
Microsoft Excel
Archivo Protegido
Si quieres envíame el archivo a [email protected] y te lo devolveré desprotegido.
Ha respondido en
Microsoft Excel
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
Microsoft Excel
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
Microsoft Excel
Cursor del mouse
Puedes intentar usando la instrucción: SendKeys "{F2}" en el evento Selection_Change del objeto WorkSheet.
Ha respondido en
Microsoft Excel
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
Microsoft Excel
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
Microsoft Excel
Contraseña VB en Excel
Envíame el archivo ([email protected]) y te lo devolveré desprotegido.