jerryeagle

activeSheet.Pictures. insert( _ "c:\mis documentos\fotos de articulos\2010\" & Range("A1").Value & ".jpg" _ ).Select

En lugar de ActiveWorkbook usa ThisWorkBook.

La posición actual del "cursor" la obtienes así: ActiveCell 'Celda Activa ActiveCell. Row 'No. De Fila Actual ActiveCell. Column 'No. De Columna Activa ActiveCell. Address 'Coordenada de la Celda Activa

Sub Imprimir() Dim Nombre, Nit, NoCuenta As String Dim Inicial, Final As Integer Application.ScreenUpdating = False Inicial = 3 Sheets("base").Select Final = Range("A" & Rows.Count).End(xlUp).Row For Inicial = Inicial To Final Nombre = Cells(Inicial,...

(Sueldo + Otros Ingresos) AS Total

¿Y eso como para que? ¿Cuál es la utilidad de eso?

No explicas si el TextBox esta en un userform o en la hoja, de cualquier forma esta opción funciona: En el evento KeyCode del Textbox: Private Sub TextBox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer) If KeyCode = 13 Then...

No creo que exista una forma de habilitar las Macros usando código VBA, ya que el código VBA son Macros, y si existiera eso, no serviría de mucho la opción de deshabilitar las macros, lo que se puede hacer es que crees una hoja en el mismo libro...

Si quieres que un valor que un valor "numerico" comience con cero, entonces el valor no es numérico, sino texto, osea números con formato texto (string), acuérdate que los ceros a la izquierda "no valen".

Por default, en los formularios al dar enter se cambia de control.