Contenu récent par ericcool

Bonjour le forum Bonjour richard31 A tester. EPar formule, je ne connais pas donc via le VBA. J'ai placé en code une plage de A1 à 10. Private Sub Worksheet_Change(ByVal Target As Range) If Application.CountIf(Range("A1:A10"), Target) > 1 Then MsgBox "Doublon !!!!", vbCritical, "Oups...

Bonjour le forum Bonjour jp.pascalin, bonjour Phil69970 Essaie ceci : Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.Row = 11 Then Cells(Target.Column + 1).Select End If End Sub Bonne journée à toutes & à tous @+ Eric c

Merci bien pour ces explications on ne peut plus claires. Bonne soirée.

Re, Impeccable bien. Merci pour ces annotations. Encore une question (oui, je sais je suis lourd :cool: mais j'aime comprendre ) .... Tu dis : Pourquoi doit-on, une fois la feuille affichée, remettre la propriété à False ? Merci de ta compréhension.

Bonjour tout le monde Bonjour mapomme EXCELlent ce fichier. Il complétera utilement le premier fichier .Juste une petite chose, s'il te plait : pourrais tu annoter les lignes de codes pour que je les décortique. Apparemment, tu nommes le classeur (je pensais que seules les feuilles...

Bonsoir tout le monde. Pour compléter cet excellent code concocté par MichD, est-il possible que les autres onglets du classeur soient inaccessibles en étant grisés (par exemple). Bonne soirée

Re, Essaies ceci pour l'ouverture spécifique en cellule A1 sur chaque onflet : Private Sub Workbook_BeforeClose(Cancel As Boolean) Dim x As Single For x = 1 To ThisWorkbook.Worksheets.Count ThisWorkbook.Worksheets(x).Activate Range("A1").Activate Next End Sub @+ EricC

Bonjour le forum Bonjour WEIDER Essaies ceci : Sheets("Nomenclature").Select au lieu de : "Feuil1.[A1].Select" @+ EricC

Bonsoir le forum Bonsoir capitainejack Essaie ce code : Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column = 1 Then Target = UCase(Target) End Sub @+ Eric c

Re : CheckBox Bonjour le forum Bonjour Maval, bonjour JC, bonjour Pierrot Pourquoi ne réduis tu pas à sa plus simple expression le cadre bordant ton Chbx. Ensuite, comme te l'a dis Pierrot, tu enlèves ou tu laisses le cadre propre au contrôle avec la propriété "SpécialEffect". @ +

Re : Supprimer ou faire disparaitre 0 ou #DIV/0! bonsoir chris, bonsoir natorp Merci chris pour cette mise à jour. Merci natorp pour ton avancée. Donc si je comprends bien, je ne peux utiliser cette fonction que sur la cellule, résultat de la division ? . Le problème est : si cette...

Re : Supprimer ou faire disparaitre 0 ou #DIV/0! Re le forum Un petit Up pour l'après midi au cas où l'un de vous auriez un petit "tuto" à mettre en ligne. Merci & à bientôt de vous lire Ericcool

Re : Supprimer ou faire disparaitre 0 ou #DIV/0! tBonjour, En cherchant un correctif à #DIV/0! sur le forum, je suis arrivé jusqu'à ce post qui m'a bien aidé (ESTERREUR). J'aurais une tite question concernant le message de Pyrof qui utilise une fonction pour éviter le désagrément. Comment...

Re : Centrage - Alignement feuille Re FROLLINDE Alors là, ça me plait .... :rolleyes: C'est exactement ce que je cherchais... Très bon travail et Grand Merki à toi. Je vais tenter de comprendre le code (j'abuserais en te demandant d'annoter les lignes de commande de ton appli pour me...

Re : Centrage - Alignement feuille Re le forum Re Stapple1600, Re FROLLINDE Bon à force de bidouiller, j'ai placé ton code dans le WorkBook_Open() pour une activation de la feuille à l'ouverture et là c'est presque bon. Oui, le code dans la feuille oblige l'utilisateur à se...