Figer les volets dans Excel par programmation VB

Signaler
Messages postés
18
Date d'inscription
lundi 3 février 2003
Statut
Membre
Dernière intervention
3 mai 2011
-
Labon
Messages postés
18
Date d'inscription
lundi 3 février 2003
Statut
Membre
Dernière intervention
3 mai 2011
-
Labon

J'aimerais figer la 1ere colone du haut dans mon rapport Excel ....Comment puis-je le fair par programmation....

Merci d'avance!

2 réponses

Messages postés
20
Date d'inscription
mardi 25 février 2003
Statut
Membre
Dernière intervention
12 janvier 2005

je te propose ce code ou j'ai fogé les volets à la ligne 13 (il fige entre 12 et 13).
donc figer entre la ligne 1 et 2, met "2:2" à la place de "13:13"

je t'explique comment j'ai trouvé çà (en 2 minutes)
j'ai ouvert excel, j'ai créer une macro où j'ai sélectionner une ligne et figer les titres.
puis je puis aller regarder le code généré dans "outils/macro/visual basic editor", les macros sont dans les modules (double click sur le dossier modules), et le code apparait en VB (ou plutot en VBA je crois).
enfin, bref, çà devrait marcher.

bon, comme t'es sous VB, tu devra surement ouvrir excel en application :
dim tableauexcel as application
tableauexcel=new excel.application
puis utilisé les controls Rows et autre en mettant tableauexcel.Rows("2:2").select

ou :
with tableauexcel
.Rows("2:2").select
.ActiveWindows.FreezePanes=True

etc

donc voici le code généré par la macro

Sub Macro2()
'
' Macro2 Macro
'

'
Rows("13:13").Select
ActiveWindow.FreezePanes = True
End Sub

Paf24
Messages postés
18
Date d'inscription
lundi 3 février 2003
Statut
Membre
Dernière intervention
3 mai 2011

Merci BEAUCOUP Paf, ça fonctionne.....

Labon