Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Conserver la position des commentaires

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion modus57
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire
M

modus57

XLDnaute Occasionnel
Bonsoir a tous.

Est-il possible par code VBA de conserver la position des commentaires lors de l’insertion, de la suppression ou de la modification de la hauteur des lignes située au-dessus ou en-dessous des commentaires.

J'ai lu toutes les discussions concernant ce sujet sur ce forum, je n'ai pas trouvé de réponse, j’utilise le code ci-dessous, cela fonctionne uniquement lorsque des lignes sont insérées ou supprimées.

Auriez-vous une solution SVP.

Cordialement @ +
 

Pièces jointes

Dernière édition:
Trier par date Trier par votes
Re : Conserver la position des commentaires

Bonsoir,

À défaut de conserver la position exacte par rapport à chaque cellule, cette macro replace tous les commentaires à la même distance de leur cellule respective :

VB: 
Sub ReplacerCommentaires()
    Dim cmtr As Comment
    For Each cmtr In ActiveSheet.Comments
       cmtr.Shape.Top = cmtr.Parent.Top + 6
       cmtr.Shape.Left = cmtr.Parent.Offset(0, 1).Left + 6
    Next
End Sub

A+
 
Vote positif 0 Vote négatif
Re : Conserver la position des commentaires

Bonsoir Grand Chaman Excel, le forum.

Merci pour ta réponse Grand Chaman Excel.

Je reviens sur cette discussion car je n'ai pas trouvé de solution, ni sur les autres forums.

Ci-joint un autre fichier sur lequel on peut constater qu'entre la propriété 1 et la propriété 2 le dimensionnement des commentaires ont une réaction similaire.

Par contre avec la propriété 3 le dimensionnement du commentaire réagi différemment.

Hors je souhaiterai que les commentaires dans tous les cas restent à leur position d’origine. Mais je crains que ce ne soit pas possible.

Une autre curiosité, lors de la saisie de caractères dans le commentaire, la taille de celui-ci ne s'ajuste pas automatiquement malgré que l'option "Taille automatique" soit activée, il faut après chaque saisie appuyer sur la touche "echap".

Suis-je un doux rêveur ou existe-t-il une solution.

@ + peut-être
 

Pièces jointes

Dernière édition:
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

A
  • Question Question
XL 2019 Duplication inexpliquée des règles MFEC
Réponses
7
Affichages
369
amgue
A
  • Question Question
Microsoft 365 VBA : Problème de reconnaissance de variable avec fonction FIND
Réponses
2
Affichages
244
Dranreb
R
  • Question Question
Microsoft 365 Interrompre synchronisation OneDrive d'un dossier ou sous-dossie
Réponses
5
Affichages
581
wDog66
M
  • Question Question
Microsoft 365 Automatisation de la date et des lignes sur Feuil1
Réponses
5
Affichages
618
Musbek
M
  • Résolu(e)
XL 2016 Quoi de moins simple que de déterminer le RECT de la barre des tâches en multi-moniteurs ? Fichier pour test...
2
Réponses
23
Affichages
548
Dudu2
T
  • Résolu(e)
Microsoft 365 VBA Exporter une sélection de plages nommées au format PDF
Réponses
12
Affichages
961
tnion
T
  • Résolu(e)
XL 2010 Sauts de page
2
Réponses
18
Affichages
1 K
TooFatBoy
D
  • Question Question
Microsoft 365 Mise à jour des références / liens depuis un sharepoint
Réponses
3
Affichages
352
Dégé59
D
Z
  • Question Question
XL 2010 Empêcher la demande de sauvegarde pour un fichier non modifié utilisant un Complément Xlam
5 6 7
Réponses
96
Affichages
3 K
Zorgloub
Z
  • Résolu(e)
XL 2016 VBA - Question complexe ! Activer la Feuille ou le UserForm selon la position du curseur de la souris
Réponses
5
Affichages
1 K
Dranreb
Y
  • Question Question
XL 2019 Masquer automatiquement des lignes selon la valeur d'une cellule ?
Réponses
2
Affichages
314
Yogean
Y
M
  • Résolu(e)
XL 2010 Ressortir uniquement les nombres de la musique d'une course hippique
Réponses
5
Affichages
246
mamarus1
M
N
  • Question Question
Microsoft 365 afficher/masquer des lignes en fonction de la valeur d'une cellule qui aura été renseignée par une autre feuille (via un copier/collé automatique)
Réponses
5
Affichages
845
Nel'
N
Z
  • Résolu(e)
Microsoft 365 Récupérer les éléments d'une liste en fonction de leur position
Réponses
2
Affichages
696
Zarnir
Z
V
  • Question Question
XL 2019 Numéro d'ordre automatique
Réponses
1
Affichages
443
vilcoyotte90
V
C
  • Résolu(e)
Copier/Masquer des lignes de couleur pour alimenter un tableau
Réponses
9
Affichages
794
vgendron
M
  • Question Question
XL 2021 Protection des onglets
Réponses
2
Affichages
338
MANU64360
M
  • Résolu(e)
XL 2016 VBA - Calcul des hauteur et largeur des Headings (pour les forts en thème)
2
Réponses
23
Affichages
896
Dudu2
C
  • Question Question
Microsoft 365 je cherche un code excel pour copier la couleur d'une cellule, à toutes les cellules qui ont la même valeur dans mon tableau.
Réponses
1
Affichages
397
sylvanu
  • Résolu(e)
XL 2016 Démo pour positionner un UserForm ou ContextMenu sur la grille (Toute version)
10 11 12
Réponses
178
Affichages
9 K
TooFatBoy
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…