por Jordun » 01 Jul 2006 08:51
Bueno (no tan bueno en realidad),
ya recuperado de la derrota de ayer, aquí les mando la versión mejorada de la macro para traducir funciones al inglés.
Esta macro comprueba primero que la selección incluya una sola celda y que la celda contenga una formula. Además he eliminado las variables declaradas.
Sub trad_func()
'escrita el 30/06/2006 por JLD
'probar si la seleccion incluye solo una celda
If Selection.Rows.Count <> 1 Then
MsgBox "por favor, seleccionar solo una celda"
Exit Sub
End If
If ActiveCell.HasFormula Then 'probar si la celda contiene o no formula
MsgBox Mid(ActiveCell.Formula, 2)
Else
MsgBox "la celda no contiene funciones"
End If
End Sub
No se si será muy útil para ustedes, pero para mi que trabajo casi todo el tiempo con funciones en inglés, si lo es. Les adjunto el archivo.
Gracias a Gali por la idea.
No tiene los permisos requeridos para ver los archivos adjuntos a este mensaje.