Seleccionar, copiar e insertar columnas en excel

Posts: 408

Joined: Sun Aug 13, 2006 05:38 AM

Seleccionar, copiar e insertar columnas en excel
Posted: Tue Sep 09, 2008 07:35 AM

Perdón por preguntar una de kinder para los que saben, pero no me funciona, tengo una hoja de excel y necesito seleccionar las columnas B a H para poder copiarlas e insertarlas en la posición de la columna I, considerando

Code: Select all Collapse

         oExcel:workBooks:open( oConfig:cPath +  'archivos\nomina.xls' )
         oHoja := oExcel:get( "activeSheet" )

considerando el dicho de un desesperado va a todas he intentado (entre muchas otras convinaciones)

Code: Select all Collapse

            oHoja:columns( "2:8" ):select()
            oHoja:columns( "B:H" ):select()
            oHoja:columns( "B1:H1" ):select()
            oHoja:range( "2:8" ):select()
            oHoja:range( "B:H" ):select()
            oHoja:range( "B1:H1" ):select()
            oExcel:columns( "2:8" ):select()
            oExcel:columns( "B:H" ):select()
            oExcel:columns( "B1:H1" ):select()

¿Alguien que lo haya hecho puede ayudarme?

Saludos

Quique

pymsoft

Posts: 383

Joined: Tue Oct 11, 2005 01:01 PM

Seleccionar, copiar e insertar columnas en excel
Posted: Tue Sep 09, 2008 08:10 AM

quique:

en VB serìa asi:

Code: Select all Collapse

    Columns("B:H").Select
    Selection.Copy
    Range("I1").Select
    ActiveSheet.Paste

y en harbour serìa algo asi (no probado)

Code: Select all Collapse

    oHoja:Columns("B:H").Select()
    oHoja:copy()
    oHoja:Range("I1").Select()
    oHoja:Paste()

espero te sirva

Pedro Gonzalez

quique

Posts: 408

Joined: Sun Aug 13, 2006 05:38 AM

Seleccionar, copiar e insertar columnas en excel
Posted: Tue Sep 09, 2008 03:18 PM

Gracias pymsoft, pero

no tengo visual basic, pero con xharbour no funcionó

oHoja:Columns("B:H").Select()

por alguna razón me selecciona de al A a la U, tal vez sea porque la hoja tiene esas columnas en blanco (se ve la cuadricula de excel) y el resto en gris (no se ve la cuadricula de excel), pero supongo que no debería de afectar, porque seleccionando e insertando renglones no tengo problema

oHoja:copy()

Este me copia toda la hoja, supongo que debería usar oExcel:selection:copy(), pero si la primera no funciona ya esta parte sale mal

oHoja:Range("I1").Select()

marca error "Error description: Error 1478812:RANGE/0 S_OK: SELECT"

oHoja:Paste()

Ya no llega aquí

Saludos

Quique

quique

Posts: 408

Joined: Sun Aug 13, 2006 05:38 AM

Seleccionar, copiar e insertar columnas en excel
Posted: Tue Sep 09, 2008 05:15 PM

No pude instertar columnas, terminé seleccionando todo el rango de celdas e insertarlo como rango de celdas

Saludos

Quique

pymsoft

Posts: 383

Joined: Tue Oct 11, 2005 01:01 PM

Seleccionar, copiar e insertar columnas en excel
Posted: Wed Sep 10, 2008 08:42 AM

quique,

el VB es el de Excel (Alt-F11)

Pones grabar macro y te salva todo el codigo, el cual luego puedes verificar.
Lograste solucionar al final?

saludos

Pedro Gonzalez

quique

Posts: 408

Joined: Sun Aug 13, 2006 05:38 AM

Seleccionar, copiar e insertar columnas en excel
Posted: Wed Sep 10, 2008 04:55 PM

pymsoft

Si trabajé con los macros de excel, visual basic solamente lo trabajé cuando lo estudié, asi que practicamente estoy en cero, solo nociones, pero supongo que el problema está en el archivo de excel, porque todo mundo me decía que el rango se selecciona con "B:H" tanto las macros, tu, y demas personas que trataron de ayudarme, pero nunca funcionó correctamente.

Si logré solucionar el problema pero no de la manera deseada, en lugar de copiar e insertar columnas copié e inserte rango de celdas, con rango de celdas o de renglones no tuve ningún problema. De hecho el problema solamente lo tuve con la selección para copiar, porque despues de eso ajusto los tamaños de las celdas y ahí si me acepta el rango "B:H".

Saludos

Quique

pymsoft

Posts: 383

Joined: Tue Oct 11, 2005 01:01 PM

Seleccionar, copiar e insertar columnas en excel
Posted: Thu Sep 11, 2008 12:21 PM

quique,

bueno, lo importante es resolver el problema

me parece raro que no puedas seleccionar las columnas... estaran ocultas?, hay otro rango seleccionado? que version de excel usas?

saludos

Pedro Gonzalez

quique

Posts: 408

Joined: Sun Aug 13, 2006 05:38 AM

Seleccionar, copiar e insertar columnas en excel
Posted: Thu Sep 11, 2008 02:29 PM

no están ocultas

no hay nada seleccionado

office 2007

Saludos

Quique

pymsoft

Posts: 383

Joined: Tue Oct 11, 2005 01:01 PM

Seleccionar, copiar e insertar columnas en excel
Posted: Thu Sep 11, 2008 02:41 PM

quique,

yo uso el 2003, a mi me funciona.

sera un problema del 2007? o de la hoja?

saludos

Pedro Gonzalez

quique

Posts: 408

Joined: Sun Aug 13, 2006 05:38 AM

Seleccionar, copiar e insertar columnas en excel
Posted: Thu Sep 11, 2008 02:53 PM

creo que el problema ha de ser de la hoja, porque como comentaba arriba, las columnas que selecciona al indicar el rango son todas las que están en la parti visible de la hoja (las que muestran la cuadricula de excel) para serte sincero, practicamente no conozco excel porque no lo uso mas que para vaciar la información del programa sobre la hoja, los formatos me los da el cliente.

Saludos

Quique

FiveTech Support Forums

Continue the discussion