Macro pour figer les volets

wikika Messages postés 53 Date d'inscription Statut Membre Dernière intervention -
ccm81 Messages postés 10909 Date d'inscription Statut Membre Dernière intervention - 23 juil. 2020 à 17:00

Bonjour,

je souhaiterai compléter ma macro qui protège toutes les feuilles de mon classeur en figeant les volets en ligne 5

Sub Protection()
    Dim Sh As Worksheet
    For Each Sh In Sheets
        Sh.Protect "DRHFOR1234"

    Next Sh
End Sub

j'ai pensé à y ajouter

Rows("5:5").Select
    ActiveWindow.FreezePanes = True

mais cela ne fonctionne pas

merci de votre précieuse aide

Configuration: Windows / Chrome 84.0.4147.89

Afficher la suite

A voir également:

Macro pour figer les volets
Figer les volets - Guide
Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
Jitbit macro recorder - Télécharger - Confidentialité
Télécharger macro convertir chiffre en lettre excel - Télécharger - Tableur
Macro maker - Télécharger - Divers Utilitaires

1 réponse

Réponse 1 / 1

ccm81 Messages postés 10909 Date d'inscription Statut Membre Dernière intervention 2 433

Bonjour

Sub ok()
Dim sh As Worksheet
For Each sh In Worksheets
  sh.Select
  sh.Rows("5:5").Select
  ActiveWindow.FreezePanes = True
Next sh
End Sub

Cdlmnt

Discussions similaires

figer les volets avec open office

figer les volets

Transformer un chiffre en lettres dans excel sans macro

FIXATION DE LIGNE DANS OPENOFFICE CALC

recup couleur de cellule sans macro

Votre réponse

Discussions similaires