Export Excel : figer des colonnes (en LS)

Forum destiné aux questions sur le développement : Formules, LotusScript, Java ...

Export Excel : figer des colonnes (en LS)

Messagepar lebanner » 18 Nov 2009 à 12:15

Bonjour,

Je boss sur un export Excel et je ne trouve pas le moyen de figer les 3 premières colonnes du fichier, est ce qu'il existe une méthode et/ou une fonction pour réaliser cette manipulation ?

J'ai trouvé pour les filtres automatiques, pour redimensionner des colonnes mais pas pour figer des colonnes

Merci d'avance pour votre aide

Cordialement
Dernière édition par lebanner le 18 Nov 2009 à 14:10, édité 1 fois.
lebanner
Roi des posts
Roi des posts
 
Message(s) : 683
Inscrit(e) le : 19 Juin 2008 à 09:43
Localisation : Lille

Messagepar Michael DELIQUE » 18 Nov 2009 à 12:19

re,

tu sais le faire avec excel ?
Cordialement

Michael (SMS-Phobique)
----------------------------
"La théorie, c'est quand on sait tout et que rien ne fonctionne. La pratique, c'est quand tout fonctionne et que personne ne sait pourquoi."
Albert EINSTEIN
Avatar de l’utilisateur
Michael DELIQUE
Administrateur
Administrateur
 
Message(s) : 12183
Inscrit(e) le : 16 Déc 2004 à 10:36
Localisation : Paris/Cergy

Messagepar lebanner » 18 Nov 2009 à 12:35

Oui avec Excel je sais le faire mais je souhaite le faire en auto via le LS
lebanner
Roi des posts
Roi des posts
 
Message(s) : 683
Inscrit(e) le : 19 Juin 2008 à 09:43
Localisation : Lille

Messagepar mclement » 18 Nov 2009 à 12:42

enregistres une macro faisant ca en Excel puis regarde le code
mclement
Posteur expérimenté
Posteur expérimenté
 
Message(s) : 321
Inscrit(e) le : 26 Juil 2007 à 04:21
Localisation : Rennes

Messagepar lebanner » 18 Nov 2009 à 12:43

Je suis en train de la faire pour voir ce que cela donne
lebanner
Roi des posts
Roi des posts
 
Message(s) : 683
Inscrit(e) le : 19 Juin 2008 à 09:43
Localisation : Lille

Messagepar lebanner » 18 Nov 2009 à 14:02

Avec le VB Excel : il met :
Code : Tout sélectionner
Range("D1").Select
    ActiveWindow.FreezePanes = True


Donc pour cela fonctionne en LS j'ai mis :
Les déclarations :
Code : Tout sélectionner
Set XLApp = CreateObject("Excel.Application")
XLApp.Visible = True
XLApp.DisplayAlerts = False
XLApp.StatusBar = "Traitement en cours..."
Set XLWorkBook = XLApp.WorkBooks.Add
Set ActiveWorkBook = XLApp.ActiveWorkBook
Set sheet = ActiveWorkBook.ActiveSheet


Code : Tout sélectionner
Sheet.Range("D1").Select
Sheet.FreezePanes = True


Il se positionne bien sur la colonne D1 mais le FreezePanes ne fonctionne pas.

Voici le message d'erreur :
"Instance member FREEZEPANES does not exist"

Merci

Cordialement
lebanner
Roi des posts
Roi des posts
 
Message(s) : 683
Inscrit(e) le : 19 Juin 2008 à 09:43
Localisation : Lille

Messagepar lebanner » 18 Nov 2009 à 14:10

Bonjour,

Voici la solution :
Code : Tout sélectionner
Sheet.Range("D1").Select
XLApp.ActiveWindow.FreezePanes = True


Cordialement
lebanner
Roi des posts
Roi des posts
 
Message(s) : 683
Inscrit(e) le : 19 Juin 2008 à 09:43
Localisation : Lille


Retour vers Développement

cron