Libellé d'onglet automatisé.

ROGER2327

XLDnaute Barbatruc

• 21 Octobre 2010

• #16

Re : Libellé d'onglet automatisé.

Re...

tbft à dit:

Bonsoir Roger

Je ne pense pas qu'elle fonction car
Set AD = Intersect(Target, .Precedents)
renvoi nothing quand il y a une formule dans la cellule.......

Cliquez pour agrandir...

Voyez le classeur joint...
​

ROGER2327
#4366

Lundi 16 Haha 138 (Saint Vadrouille, emblème, SQ)
30 Vendémiaire An CCXIX
2010-W42-4T20:18:48Z

 

Pièces jointes

• Temp.xls

  14 KB · Affichages: 38
• Temp.xls

  14 KB · Affichages: 38
• Temp.xls

  14 KB · Affichages: 40

Vote positif 0 Vote négatif

E

eutrophisation

XLDnaute Occasionnel

• 22 Octobre 2010

• #17

Re : Libellé d'onglet automatisé.

Lorsque la feuille est protégée cela ne fonctionne pas

 

Vote positif 0 Vote négatif

ROGER2327

XLDnaute Barbatruc

• 22 Octobre 2010

• #18

Re : Libellé d'onglet automatisé.

eutrophisation à dit:

Lorsque la feuille est protégée cela ne fonctionne pas

Cliquez pour agrandir...

Heureusement ! Si une feuille protégée n'était pas protégée, que diriez-vous ?
Si vous ne voulez protéger que l'interface et permettre l'exécution du code VBA, limitez la protection :

Code:

[COLOR="DarkSlateGray"][B]Feuil1.Protect UserInterfaceOnly:=True[/B][/COLOR]

Et n'oubliez pas de placer ce code dans le module du classeur :

Code:

[COLOR="DarkSlateGray"][B]Private Sub Workbook_Open()
  Feuil1.Protect UserInterfaceOnly:=True
End Sub[/B][/COLOR]

car la variable UserInterfaceOnly est réinitialisée à la valeur False lors de l'enregistrement du classeur.​

ROGER2327
#4369

Mardi 17 Haha 138 (Saint Homais d'Aquin, prudhomme, SQ)
1er Brumaire An CCXIX
2010-W42-5T08:41:22Z

 

Pièces jointes

• Temp.xls

  16 KB · Affichages: 43
• Temp.xls

  16 KB · Affichages: 46
• Temp.xls

  16 KB · Affichages: 43

Vote positif 0 Vote négatif

E

eutrophisation

XLDnaute Occasionnel

• 22 Octobre 2010

• #19

Re : Libellé d'onglet automatisé.

Super cela fonctionne c'est ce que je cherchais

 

Vote positif 0 Vote négatif

tbft

XLDnaute Accro

• 22 Octobre 2010

• #20

Re : Libellé d'onglet automatisé.

@Roger

Pardon et Merci pour la correction de ma bêtise..
Je pense que je vais pas tarder à l'utiliser...
Encore merci...

 

Vote positif 0 Vote négatif

ROGER2327

XLDnaute Barbatruc

• 23 Octobre 2010

• #21

Re : Libellé d'onglet automatisé.

Re...

tbft à dit:

@Roger

Pardon et Merci pour la correction de ma bêtise..
Je pense que je vais pas tarder à l'utiliser...
Encore merci...

Cliquez pour agrandir...

Ne vous excusez pas ! Une légende tenace veut que l'évènement Worksheet_Change ne peut être exploité à partir d'une cellule contenant une formule.
C'est parfaitement faux, car la propriété Precedents renvoie la collection de toutes les cellules intervenant dans la formule d'une cellule qui en contient une. Encore faut-il connaître cette propriété d'usage assez rare. Et le nombre de propriétés des objets d'Excel est si grand qu'il n'y a pas de honte à en ignorer quelques unes. Si j'ai pu vous la faire découvrir, j'en suis heureux.
​

Cordialement,

ROGER2327
#4379

Mardi 17 Haha 138 (Saint Homais d'Aquin, prudhomme, SQ)
1er Brumaire An CCXIX
2010-W42-5T23:59:34Z

 

Vote positif 0 Vote négatif

E

eutrophisation

XLDnaute Occasionnel

• 23 Octobre 2010

• #22

Re : Libellé d'onglet automatisé.

BONJOUR
Je remercie votre générosité sans limite ROGER2327.
Je profite de cette opportunité pour vous soumettre ce probleme. Dans le cadre de notre travail nous sommes appellés souvent à saisir des valeurs plusieurs fois dans une meme cellule au minimum deux fois. Ma question est la suivante est il possible que chaque saisie (valeur) dans la cellule soit enregistrer quelque part comme par exemple dans un commentaire avec au départ leur date de saisie RESPECTIVE...La memoire de la cellule.

 

Vote positif 0 Vote négatif

DoubleZero

XLDnaute Barbatruc

• 23 Octobre 2010

• #23

Re : Libellé d'onglet automatisé.

Bonjour à toutes et à tous,

Cela peut-il aider ?

http://boisgontierjacques.free.fr/pages_site/commentaire.htm


Historique de saisie d'une cellule

Mémorise l'historique des cellules dans la zone commentaire des cellules.

-Commentaire Historique Cellule -

-Alt+F11
-Double clic sur Feuil1
-Choisir WorkSheet
-Choisir événement Change

Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False
If Target.Column = 3 And Target.Count = 1 Then ' colonne 3 seulement
If Target.Comment Is Nothing Then Target.AddComment ' Création commentaire
Target.Comment.Text Text:=Target.Comment.Text & _
Format(Target.Value, "# ##0.00 €") & " Modifié par:" & Environ("UserName") & _
" Le " & Now & vbLf
Target.Comment.Shape.TextFrame.AutoSize = True
End If
Application.EnableEvents = True
End Sub

Cordialement,

00 / 🙂🙂

 

Vote positif 0 Vote négatif

E

eutrophisation

XLDnaute Occasionnel

• 23 Octobre 2010

• #24

Re : Libellé d'onglet automatisé.

Ce sont des nombres que je saisie sur les cellules . Les colonnes concernées sont P, R, T,V,X,Z,AB, AD, AF, AH, AJ, AL, AM, AN.
La plage concernée est p21:AN2020
merci pour la rapidité de la reponse.

 

Vote positif 0 Vote négatif