Que la macro me pida que seleccione con el raton un rango

[Luis Menéndez]

Estimados todos me gustaría que alguien me diese un trocito de codigo para
que una macro que se dedica a dar un formato a un texto volcado con datos se
pare a pedirme, no el rango de filas con una pregunta en un inputbox , si no
que yo seleccione el rango para luego seguir la macro con su trabajo. Es
decir que la macro tiene que pararse y dejarme moverme con el curso a ver
dónde quiero que continue los comandos.

Muchas Gracias A Todos.

[Héctor Miguel]

hola, Luis !

> ... que una macro que ... se pare a pedirme ... que yo seleccione el rango para luego seguir [...]

usa el 'inputbox' =>del objeto 'application'<= [que NO es lo mismo que un 'inputbox' de vba] [p.e.]
[... otras lineas de tu codigo ...]
Dim NuevaCelda As Range
On Error Resume Next ' por si las dudas '
Application.ScreenUpdating = True ' el 'refresco' de la pantalla debe estar 'activo' '
Set NuevaCelda = Application.InputBox( _
Prompt:="Selecciona la celda de salida...", _
Title:="Nueva celda", _
Default:=ActiveCell.Address, _
Type:=8) ' Type:=8 'significa' que 'se espera' un objeto rango seleccionado =>por el usuario<= '
If NuevaCelda Is Nothing Then
Exit Sub ' u otras instrucciones '
Else
NuevaCelda.Cells(1, 1) = "Aprobado"
End If

[... otras lineas de tu codigo ...]

saludos,
hector.

[Luis Menéndez]

Muchas Gracias Héctor lo probaré cuando tenga un momento.
"Héctor Miguel" <NOhemio...@PLShotmail.com> escribió en el mensaje
news:uaq#AFYMEH...@tk2msftngp13.phx.gbl...