Forums Últimos mensajes - Powered by IBM
 
Tags Palabras claves

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

04/05/2004 - 04:25 por Luis Menéndez | Informe spam
Ayuda Hacer una pregunta
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.
email Siga el debateRespuesta 2 respuestasRespuesta Tengo una respuesta
DRAGON AGE™: INQUISITION – Matadragones
 

Leer las respuestas

#1 Héctor Miguel
04/05/2004 - 04:41 | Informe spam
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.

Preguntas similares

 

Busqueda sugerida :