Seleccionar las columnas que tengo en un inputbox
Con la siguiente línea ingreso en un inputbox las columnas que quiero seleccionar
Ran1 = Application.InputBox("Ingresar columna ejem. (A:A) (B:B) ", , , , Type:=2)Pero a partir de aquí no sé como seleccionar las columnas.
1 respuesta
Respuesta de Dante Amor
1
¿Una vez que seleccionas la columna, para qué la vas a utilizar?
En el inputbox, pero con Type:=8, puedes seleccionar un rango de celdas o columnas. Prueba lo siguiente:
Sub SeleccionarColumna()
'Por.Dante Amor
Dim rng As Range
On Error Resume Next
With Application
Set rng = .InputBox("Selecciona la columna", "COLUMNA", Default:=Selection.EntireColumn.Address, Type:=8)
If rng Is Nothing Then Exit Sub
End With
rng.Select
End Sub.Si te ayuda. No olvides valorar.
Si, me funcionó, Gracias.
Pero solo deja seleccionar una columna, ¿Vedad?
Por default selecciona la columna donde está el cursor. Pero te pasas a la hoja y puedes seleccionar las columnas o el rango de celdas que quieras.
