> Tous les forums > Forum Bureautique
 VBA : savoir où ont été figés les voletsSujet résolu
Ajouter un message à la discussion
Page : [1] 
Page 1 sur 1
Boogie Palace
  Posté le 17/05/2016 @ 15:46 
Aller en bas de la page 
Petit astucien

bonjour le forum,

je suis sur XL 2010 et je cherche à savoir (via un code VBA), dans le cas où les volets sont figés sur la feuille, où ont été figés les volets.
si, sur une feuille sans volet figé, je me positionne sur B2, et que je fais "figer les volets", c'est "B2" (ou $B$2, peu importe) que je souhaite obtenir via le code VBA que je cherche à écrire.

je sais que pour savoir si les volets sont figés ou pas, j'interroge la propriété ActiveWindow.FreezePanes (True/False), mais je sèche après.

merci de votre aide.
BP

Publicité
Debrief
 Posté le 20/05/2016 à 07:06 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

Bonjour,

Sub Macro1()

With ActiveWindow
.SplitColumn = 4
.SplitRow = 6
End With
ActiveWindow.FreezePanes = True

MsgBox "Colonne = " & ActiveWindow.SplitColumn & " / Ligne = " & ActiveWindow.SplitRow

End Sub

Cordialement,
D.



Modifié par Debrief le 20/05/2016 07:08
ferrand
 Posté le 20/05/2016 à 17:09 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Astucien

Salut Boogie !

Toujours des questions originales !!

Tu devrais obtenir la cellule cherchée ainsi :

Sub test()
Dim c$
With ActiveWindow
If .FreezePanes Then
c = ActiveSheet.Cells(.SplitRow + 1, .SplitColumn + 1).Address
MsgBox c
Else
MsgBox "pas figé"
End If
End With
End Sub

Salut Debrief, j'ai détourné ton exemple pour recentrer...

Cordialement.



Modifié par ferrand le 20/05/2016 17:10
Boogie Palace
 Posté le 26/05/2016 à 16:55 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

merci beaucoup à Debrief pour la méthode et à ferrand pour l'avoir peaufiné.
ça répond parfaitement à ma question.

Page : [1] 
Page 1 sur 1

Vous devez être connecté pour poster des messages. Cliquez ici pour vous identifier.

Vous n'avez pas de compte ? Créez-en un gratuitement !


Sujets relatifs
figer les volets dans excel 13
Comment savoir le nb des mêmes valeurs dans 2 tab differents
Figer les volets
savoir s'il y a un même numéro dans 2 lignes précises
Les volets
Page 3 volets avec Publisher 2007
Excel ne doit pas savoir faire
transposer un tableau excel à savoir que les ligne
Comment savoir si un fichier existe déjà ? en VBA
Figer les volets dans Office Starter 2010
Plus de sujets relatifs à VBA : savoir où ont été figés les volets
 > Tous les forums > Forum Bureautique