Foros del Web » Soporte técnico » Ofimática »

Macro Seleccionar 2 columnas separadas

Estas en el tema de Macro Seleccionar 2 columnas separadas en el foro de Ofimática en Foros del Web. Hola colegas, intento seleccionar un grupo de columnas separadas con un macro de modo de protegerlas, pero no logro seleccionarlas como quiero... Encontre este codigo: ...
  #1 (permalink)  
Antiguo 23/01/2009, 16:55
Avatar de Pablus00  
Fecha de Ingreso: diciembre-2003
Ubicación: A un click de distancia
Mensajes: 1.044
Antigüedad: 20 años, 4 meses
Puntos: 11
Macro Seleccionar 2 columnas separadas

Hola colegas, intento seleccionar un grupo de columnas separadas con un macro de modo de protegerlas, pero no logro seleccionarlas como quiero...

Encontre este codigo:
Range("A:A, D:F").Select 'selecciona las columnas A, D, E y F, pero NO funciona, da erro 1004, salvo que se redacte asi:

Range("A:A", "D:F").Select y me selecciona de la A a la F, en vez de la A, de la D a la F.

las columnas que quecesito seleccionar y bloquear son de la e-f y la J me podran orientar como?
__________________
-- Nunca te des por vencido, aún vencido -- Web
  #2 (permalink)  
Antiguo 23/01/2009, 20:40
 
Fecha de Ingreso: mayo-2004
Ubicación: CABA - Argentina
Mensajes: 278
Antigüedad: 19 años, 11 meses
Puntos: 3
Respuesta: Macro Seleccionar 2 columnas separadas

A ver,
Cita:
las columnas que quecesito seleccionar y bloquear son de la e-f y la J
Hice un Macro llamado EFJBLOK (que significa blockear E,F, y J)

Código:
Sub efjblok()
    Range("E:F,J:J").Select
    Range("J1").Activate
    Selection.Locked = True
    Selection.FormulaHidden = False
    Range("A1").Select
End Sub
Recorda q para q el blockeo quede realmente "activo", tenes que proteger la hoja.

Cualquier duda, a tu dispocision.
__________________
ReC Blog =)
  #3 (permalink)  
Antiguo 24/01/2009, 07:03
Avatar de Pablus00  
Fecha de Ingreso: diciembre-2003
Ubicación: A un click de distancia
Mensajes: 1.044
Antigüedad: 20 años, 4 meses
Puntos: 11
Respuesta: Macro Seleccionar 2 columnas separadas

Gracias Sidv, funciona sin problemas :D
__________________
-- Nunca te des por vencido, aún vencido -- Web
  #4 (permalink)  
Antiguo 26/01/2009, 09:13
Avatar de Pablus00  
Fecha de Ingreso: diciembre-2003
Ubicación: A un click de distancia
Mensajes: 1.044
Antigüedad: 20 años, 4 meses
Puntos: 11
Respuesta: Macro Seleccionar 2 columnas separadas

Hola Sidv, probe tu condigo en un archivo nuevo y funciono sin problemas pero al agregarlo a mi codigo actual no funciona, me sigue dando error 1004 error en el metodo Range de objeto _global y no se a que se debe, si selecciono una columna sola es decir Range("cualquiera:cualquiera").select funciona bien, pero si agrego una coma, y pongo otra columna, salta el error :s

... algo que tambien modifica la seleccion es que si en algun momento tengo una celda supongamos A1 agrupada con B1, al seleccionar la columna A, me selecciona A y B juntas,
__________________
-- Nunca te des por vencido, aún vencido -- Web
  #5 (permalink)  
Antiguo 26/01/2009, 09:59
Avatar de Pablus00  
Fecha de Ingreso: diciembre-2003
Ubicación: A un click de distancia
Mensajes: 1.044
Antigüedad: 20 años, 4 meses
Puntos: 11
Respuesta: Macro Seleccionar 2 columnas separadas

Cada vez entiendo menos, hago correr el macro dandole play desde el panel de visual basic y no funciona, me da el error mencionado 1004, pero si lo asigno a un boton de la ventana formularios se ejecuta normalmente... :S
__________________
-- Nunca te des por vencido, aún vencido -- Web
  #6 (permalink)  
Antiguo 26/01/2009, 10:05
Avatar de Pablus00  
Fecha de Ingreso: diciembre-2003
Ubicación: A un click de distancia
Mensajes: 1.044
Antigüedad: 20 años, 4 meses
Puntos: 11
Respuesta: Macro Seleccionar 2 columnas separadas

Sigo agregando informacion ajaja, creo que ya di con el problema que la macro la estoy ejecutando con un boton de visual en vez de un boton de formularios de excel, y la macro solo correo bajo los botones de excel.. alguien sabe como se ejecuta con los botones de visual :D
__________________
-- Nunca te des por vencido, aún vencido -- Web
  #7 (permalink)  
Antiguo 27/01/2009, 04:49
Avatar de Pablus00  
Fecha de Ingreso: diciembre-2003
Ubicación: A un click de distancia
Mensajes: 1.044
Antigüedad: 20 años, 4 meses
Puntos: 11
Respuesta: Macro Seleccionar 2 columnas separadas

finalmente encontre la solucion, la parte del codigo que seleccionaba la columna no se ejecuta con un boton de visual basic, la unica forma que encontre es crear esa aplicacion aparte, ej,

sub SELECCION()
Range("E:F,J:J").Select
end sub

, y luego llamarla desde el codigo del boton, application.run "SELECCION", saludos
__________________
-- Nunca te des por vencido, aún vencido -- Web
  #8 (permalink)  
Antiguo 27/01/2009, 09:33
Avatar de abrahamvj  
Fecha de Ingreso: julio-2006
Ubicación: Lima, Peru
Mensajes: 708
Antigüedad: 17 años, 9 meses
Puntos: 18
Respuesta: Macro Seleccionar 2 columnas separadas

OJO, los botones de controles son objetos ActiveX que funcionan a traves de eventos, y cuando estan en las hojas, son objetos de las hojas y su codigo esta asociado a los modulos de clase de las hojas. Por ejemplo, para hacer correr tu codigo a traves de un boton de controles de tu hoja, pues, en el modulo de dicha hoja iria asi:


Private Sub CommandButton1_Click()
Range("E:F,J:J").Select
End Sub

Obviamente mi boton se llama CommandButton1, y repito, todo esto va en el codigo de la hoja respectiva, y como vez usamos su evento Click.

Abraham
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 14:58.