Cómo refrescar por código

Si usas .formula tendrás que poner el nombre de la función en inglés, es decir:

Range("A65000").formula = "=PROPER(" & direcc & ")"

De todas formas, no termino de entender qué es lo que quieres hacer. Si se trata de aplicar a la selección actual la función NOMPROPIO usando VBA, podrías hacerlo directamente usando el objeto WorksheetFunction. Si es esto lo que necesitas, dínoslo, y pienso que podremos escribirte el código.
Un saludo.


Fernando Arroyo
MS MVP - Excel


"Cheeky" escribió en el mensaje news:

Hola Grupo:
Tengo este código

Private Sub CommandButton3_Click()
Dim cel As Range, rangoT As Range, direcc As String
Set rangoT = Selection
For Each cel In rangoT
direcc = cel.Address
Range("A65000").formula = "=NOMPROPIO(" & direcc & ")"
cel.Value = Range("A65000").Value
Next cel
End Sub


que evidentemente no funciona porque la fórmula que introduzco en A65000 no
se "ejecuta", ¿cómo podría hacerse?.

Saludos for everybody.