jgirj

Finaliza esta pregunta para poder atender a otros usuarios

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...

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

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...

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...

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

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

¿Funcionó?

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

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